changed: #initializeDefaultAbbreviations
authorClaus Gittinger <cg@exept.de>
Thu, 12 May 2011 10:12:46 +0200
changeset 4250 396c7dcb7095
parent 4249 44daffb1b034
child 4251 2e01c273519d
changed: #initializeDefaultAbbreviations
Workspace.st
--- a/Workspace.st	Sun May 08 11:08:27 2011 +0200
+++ b/Workspace.st	Thu May 12 10:12:46 2011 +0200
@@ -148,6 +148,14 @@
         'nn'    'notNil '
         'ie'    'isEmpty '
         'ne'    'notEmpty '
+        'int'   'isNil ifTrue:[!!]'
+        'nnt'   'notNil ifTrue:[!!]'
+        'inf'   'isNil ifFalse:[!!]'
+        'nnf'   'notNil ifFalse:[!!]'
+        'iet'   'isEmpty ifTrue:[!!]'
+        'net'   'notEmpty ifTrue:[!!]'
+        'ief'   'isEmpty ifFalse:[!!]'
+        'nef'   'notEmpty ifFalse:[!!]'
         'ien'   'isEmptyOrNil '
         'nen'   'notEmptyOrNil '
 
@@ -273,7 +281,7 @@
             at:abbrev put:text "/ ifPresent:[ self error:'duplicate abbreviation key' ]
     ].
 
-    "Modified: / 31-10-2010 / 12:52:46 / cg"
+    "Modified: / 12-05-2011 / 10:12:40 / cg"
 !
 
 updateStyleCache
@@ -1861,9 +1869,9 @@
 !Workspace class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.230 2011-01-15 13:23:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.231 2011-05-12 08:12:46 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.230 2011-01-15 13:23:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.231 2011-05-12 08:12:46 cg Exp $'
 ! !