[Pkg] The Trunk: Tools-fbs.482.mcz

commits at source.squeak.org commits at source.squeak.org
Tue Jul 9 21:08:52 UTC 2013


Frank Shearar uploaded a new version of Tools to project The Trunk:
http://source.squeak.org/trunk/Tools-fbs.482.mcz

==================== Summary ====================

Name: Tools-fbs.482
Author: fbs
Time: 9 July 2013, 10:07:54.176 pm
UUID: 44ffe1eb-429a-5246-a3d3-a711b6da9ac8
Ancestors: Tools-fbs.481

Make things use Cursor currentCursor (because InputSensor >> #currentCursor delegates to it anyway).

=============== Diff against Tools-fbs.481 ===============

Item was changed:
  ----- Method: Debugger>>openNotifierContents:label: (in category 'initialize') -----
  openNotifierContents: msgString label: label
  	"Create and schedule a notifier view with the given label and message. A notifier view shows just the message or the first several lines of the stack, with a menu that allows the user to open a full debugger if so desired."
  	"NOTE: When this method returns, a new process has been scheduled to run the windows, and thus this notifier, but the previous active porcess has not been suspended.  The sender will do this."
  	| msg builder spec |
  	Sensor flushKeyboard.
+ 	savedCursor := Cursor currentCursor.
+ 	Cursor currentCursor: Cursor normal.
- 	savedCursor := Sensor currentCursor.
- 	Sensor currentCursor: Cursor normal.
  	(label beginsWith: 'Space is low')
  		ifTrue: [msg := self lowSpaceChoices, (msgString ifNil: [''])]
  		ifFalse: [msg := msgString].
  	builder := ToolBuilder default.
  	spec := self buildNotifierWith: builder label: label message: msg.
  	self expandStack.
  	builder openDebugger: spec.
  	errorWasInUIProcess := Project spawnNewProcessIfThisIsUI: interruptedProcess.
  !



More information about the Packages mailing list