Mercurial Mercurial > hg > stx-libbasic / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
oops filename handling
authorClaus Gittinger <cg@exept.de>
Thu, 03 Jul 2014 20:15:49 +0200
changeset 16680 0d13e1173228
parent 16679 6538e17626c9
child 16681 1cdbdec88e4c
oops filename handling
ObjectMemory.st file | annotate | diff | comparison | revisions 
--- a/ObjectMemory.st	Thu Jul 03 16:36:38 2014 +0200
+++ b/ObjectMemory.st	Thu Jul 03 20:15:49 2014 +0200
@@ -5391,7 +5391,7 @@
     snapshotFilename := aFileName asFilename.
     snapshotFilename isAbsolute ifFalse:[
         snapshotFilename := self directoryForImageAndChangeFile
-                            / aFileName name.
+                            / snapshotFilename name.
     ].
 
     tempFilename := (FileStream newTemporaryIn:snapshotFilename directory)
@@ -5604,11 +5604,11 @@
 !ObjectMemory class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ObjectMemory.st,v 1.281 2014-06-29 12:46:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ObjectMemory.st,v 1.282 2014-07-03 18:15:49 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/ObjectMemory.st,v 1.281 2014-06-29 12:46:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ObjectMemory.st,v 1.282 2014-07-03 18:15:49 cg Exp $'
 !
 
 version_SVN
hg/stx-libbasic