--- a/MiniDebugger.st Fri Dec 06 16:49:22 2013 +0100
+++ b/MiniDebugger.st Fri Dec 06 19:31:26 2013 +0100
@@ -624,7 +624,9 @@
|changesFilename|
changesFilename := Timestamp now
- printStringFormat:'changes_%(year)-%(month)-%(day)__%h-%m-%s.chg'.
+ printStringFormat:'changes_%(year)-%(month)-%(day)__%h:%m:%s.chg'.
+ OperatingSystem isMSWINDOWSlike ifTrue:[ changesFilename replaceAll:$: with:$_ ].
+
ChangeSet current fileOutAs: changesFilename.
('saved session changes to "',changesFilename,'".') printCR.
^ false
@@ -1032,10 +1034,10 @@
!MiniDebugger class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/MiniDebugger.st,v 1.91 2013-12-06 15:49:22 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/MiniDebugger.st,v 1.92 2013-12-06 18:31:26 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/MiniDebugger.st,v 1.91 2013-12-06 15:49:22 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/MiniDebugger.st,v 1.92 2013-12-06 18:31:26 cg Exp $'
! !