--- a/Workspace.st Sun Sep 08 14:53:33 2013 +0200
+++ b/Workspace.st Mon Sep 09 00:14:08 2013 +0200
@@ -2370,7 +2370,7 @@
context:nil
codeView:editView
into:[:listOfSuggestions :listOfActions :titleWhenAsking |
-(listOfSuggestions contains:[:l | l isEmptyOrNil]) ifTrue:[self halt].
+"/ (listOfSuggestions contains:[:l | l isEmptyOrNil]) ifTrue:[self halt].
suggestions := listOfSuggestions collect:[:entry | entry isArray ifTrue:[entry first] ifFalse:[entry]].
implementations := listOfSuggestions collect:[:entry | entry isArray ifTrue:[entry second] ifFalse:[nil]].
actions := listOfActions.
@@ -2557,10 +2557,10 @@
!Workspace class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.299 2013-09-08 12:38:28 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.300 2013-09-08 22:14:08 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.299 2013-09-08 12:38:28 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.300 2013-09-08 22:14:08 cg Exp $'
! !