HistoryManager.st
changeset 1981 cc94d4dc1c50
parent 1958 25e29a626264
child 2062 b2cfe78be5e1
--- a/HistoryManager.st	Thu Jan 10 18:48:45 2008 +0100
+++ b/HistoryManager.st	Thu Jan 17 11:02:32 2008 +0100
@@ -877,7 +877,7 @@
 !
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.66 2007-03-06 17:30:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.67 2008-01-17 10:02:32 cg Exp $'
 ! !
 
 !HistoryManager::HistoryLine class methodsFor:'filtering'!
@@ -907,7 +907,7 @@
                         ifTrue: [
                             ((Timestamp
                                 fromDate: histLine date
-                                andTime: histLine time) -
+                                andTime: histLine time) secondDeltaFrom:
                                     (Timestamp
                                         fromDate: anotherHistLine date
                                         andTime: anotherHistLine time)) < self modificationLimit
@@ -931,10 +931,10 @@
     ].
     ^ newCollection.
 
-    "Modified: / 8.9.1995 / 17:20:40 / claus"
-    "Modified: / 20.4.1996 / 20:23:07 / cg"
-    "Modified: / 20.6.2004 / 16:36:00 / masca"
-    "Modified: / 1.9.2004 / 20:20:42 / janfrog"
+    "Modified: / 08-09-1995 / 17:20:40 / claus"
+    "Modified: / 20-06-2004 / 16:36:00 / masca"
+    "Modified: / 01-09-2004 / 20:20:42 / janfrog"
+    "Modified: / 12-01-2008 / 10:37:25 / cg"
 !
 
 modificationLimit
@@ -1503,7 +1503,7 @@
 !HistoryManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.66 2007-03-06 17:30:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.67 2008-01-17 10:02:32 cg Exp $'
 ! !
 
 HistoryManager initialize!