--- a/UndefinedObject.st	Tue Apr 16 14:27:04 2013 +0200
+++ b/UndefinedObject.st	Thu Apr 18 20:41:50 2013 +0200
@@ -108,6 +108,7 @@
     "Modified: 3.1.1997 / 15:06:15 / cg"
 ! !
 
+
 !UndefinedObject class methodsFor:'queries'!
 
 canBeSubclassed
@@ -154,14 +155,18 @@
 
 
 
-
-
 !UndefinedObject methodsFor:'converting'!
 
 asBoolean
     ^ false
 !
 
+asNilIfEmpty
+    "I am nil, so answer nil"
+
+    ^ self
+!
+
 literalArrayEncoding
     "encode myself as an array literal, from which a copy of the receiver
      can be reconstructed with #decodeAsLiteralArray."
@@ -696,11 +701,11 @@
 !UndefinedObject class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/UndefinedObject.st,v 1.73 2013-01-22 13:08:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UndefinedObject.st,v 1.74 2013-04-15 08:48:08 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/UndefinedObject.st,v 1.73 2013-01-22 13:08:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UndefinedObject.st,v 1.74 2013-04-15 08:48:08 stefan Exp $'
 ! !