--- a/Time.st Fri Oct 08 14:46:02 1999 +0200
+++ b/Time.st Fri Oct 08 15:32:36 1999 +0200
@@ -79,11 +79,11 @@
^ self
hours:(s // 3600)
minutes:((s \\ 3600) // 60)
- seconds:(s \\ (3600 * 60))
+ seconds:((s \\ 3600) \\ 60)
"
Time fromSeconds:0
- Time fromSeconds:3600
+ Time fromSeconds:3675
Time fromSeconds:36000
Time fromSeconds:72000
Time fromSeconds:96000
@@ -92,6 +92,7 @@
"Modified: 8.10.1996 / 19:32:11 / cg"
+
!
hour:h minutes:m seconds:s
@@ -576,5 +577,5 @@
!Time class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Time.st,v 1.43 1999-10-04 15:38:00 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Time.st,v 1.44 1999-10-08 13:32:36 ah Exp $'
! !