changed: #initializeDefaultAbbreviations
authorClaus Gittinger <cg@exept.de>
Sun, 31 Oct 2010 12:53:00 +0100
changeset 4186 178e5a5da19b
parent 4185 44ac2c080798
child 4187 16652b9859a7
changed: #initializeDefaultAbbreviations
Workspace.st
--- a/Workspace.st	Fri Oct 29 10:23:43 2010 +0200
+++ b/Workspace.st	Sun Oct 31 12:53:00 2010 +0100
@@ -151,11 +151,11 @@
         'ien'   'isEmptyOrNil '
         'nen'   'notEmptyOrNil '
 
-        'it'    'ifTrue:[\!!]'
-        'if'    'ifFalse:[\!!]'
-        'itf'   'ifTrue:[\!!] ifFalse:[\]'
-        'int'   'isNil ifTrue:[\!!]'
-        'inf'   'isNil ifFalse:[\!!]'
+        'it'    'ifTrue:[!!]'
+        'if'    'ifFalse:[!!]'
+        'itf'   'ifTrue:[!!] ifFalse:[]'
+        'int'   'isNil ifTrue:[!!]'
+        'inf'   'isNil ifFalse:[!!]'
         'ints'  'isNil ifTrue:[^ self]'
         'infs'  'isNil ifFalse:[^ self]'
         'nnt'   'notNil ifTrue:[!!]'
@@ -187,7 +187,7 @@
 
         'ex'    'Error handle:[ex | !!] do:[]'
         'sh'    'self halt'
-        'mt'    'MessageTally spyOn:[\!!\]'
+        'mt'    'MessageTally spyOn:[!!]'
 
         'ih'    '!! ifTrue:[ self halt ].'
         'ik'    'includesKey: #'
@@ -273,7 +273,7 @@
             at:abbrev put:text "/ ifPresent:[ self error:'duplicate abbreviation key' ]
     ].
 
-    "Modified: / 29-10-2010 / 10:23:34 / cg"
+    "Modified: / 31-10-2010 / 12:52:46 / cg"
 !
 
 updateStyleCache
@@ -1821,9 +1821,9 @@
 !Workspace class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.225 2010-10-29 08:23:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.226 2010-10-31 11:53:00 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.225 2010-10-29 08:23:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.226 2010-10-31 11:53:00 cg Exp $'
 ! !