class: Date
authorClaus Gittinger <cg@exept.de>
Thu, 13 Nov 2014 21:39:20 +0100
changeset 17053 c654249389f9
parent 17052 e3e0c36a3f2c
child 17054 7f87d6bf05a7
class: Date comment/format in: #isLeapYear
Date.st
--- a/Date.st	Thu Nov 13 16:55:53 2014 +0100
+++ b/Date.st	Thu Nov 13 21:39:20 2014 +0100
@@ -870,6 +870,7 @@
     ^ self newDay:day month:mon year:yr
 ! !
 
+
 !Date class methodsFor:'change & update'!
 
 update:something with:aParameter from:changedObject
@@ -1683,6 +1684,7 @@
     ^ self leapYear:yearInteger
 ! !
 
+
 !Date class methodsFor:'private'!
 
 dayAbbrevsForLanguage:languageOrNilForDefault
@@ -1856,6 +1858,7 @@
     "
 ! !
 
+
 !Date methodsFor:'Compatibility-ANSI'!
 
 dayOfWeek
@@ -2539,7 +2542,7 @@
 !
 
 isLeapYear
-    "return true, if the receivers year is a leap year"
+    "return true, if the receiver's year is a leap year"
 
     ^ Date leapYear:(self year)
 
@@ -3011,6 +3014,7 @@
 ! !
 
 
+
 !Date methodsFor:'obsolete'!
 
 asAbsoluteTime
@@ -3081,6 +3085,7 @@
     ^ self addDays:days
 ! !
 
+
 !Date methodsFor:'printing & storing'!
 
 addPrintBindingsTo:aDictionary
@@ -3445,11 +3450,11 @@
 !Date class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Date.st,v 1.158 2014-11-07 21:23:18 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Date.st,v 1.159 2014-11-13 20:39:20 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Date.st,v 1.158 2014-11-07 21:23:18 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Date.st,v 1.159 2014-11-13 20:39:20 cg Exp $'
 ! !