--- a/ChangeSet.st	Tue Aug 22 23:02:22 2000 +0200
+++ b/ChangeSet.st	Wed Aug 23 16:03:20 2000 +0200
@@ -524,8 +524,9 @@
     |p|
 
     (Project notNil and:[(p := Project current) notNil]) ifTrue:[
-	^ p changeSet
-    ]
+        ^ p changeSet
+    ].
+    ^ #()
 
     "
      ChangeSet current 
@@ -878,5 +879,5 @@
 !ChangeSet class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/ChangeSet.st,v 1.52 2000-08-22 11:10:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ChangeSet.st,v 1.53 2000-08-23 14:03:20 cg Exp $'
 ! !