[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