AbstractTime.st
changeset 8111 67347b7e3e69
parent 7672 46f206594db3
child 8200 d443d3c8ce40
equal deleted inserted replaced
8110:2f1c3bb4902d 8111:67347b7e3e69
   734 ! !
   734 ! !
   735 
   735 
   736 !AbstractTime methodsFor:'printing & storing'!
   736 !AbstractTime methodsFor:'printing & storing'!
   737 
   737 
   738 addPrintBindingsTo:aDictionary
   738 addPrintBindingsTo:aDictionary
   739     "add bindings for printing to aDictionary."
   739     "private print support: add bindings for printing to aDictionary."
       
   740 
       
   741     self addPrintBindingsTo:aDictionary language:nil
       
   742 !
       
   743 
       
   744 addPrintBindingsTo:aDictionary language:languageOrNil
       
   745     "private print support: add bindings for printing to aDictionary.
       
   746      languageOrNil can only be #en or nil for the current language."
   740 
   747 
   741     |hours minutes seconds millis usHours ampm s zone tzDelta|
   748     |hours minutes seconds millis usHours ampm s zone tzDelta|
   742 
   749 
   743     hours := self hours.
   750     hours := self hours.
   744     minutes := self minutes.
   751     minutes := self minutes.
   979 ! !
   986 ! !
   980 
   987 
   981 !AbstractTime class methodsFor:'documentation'!
   988 !AbstractTime class methodsFor:'documentation'!
   982 
   989 
   983 version
   990 version
   984     ^ '$Header: /cvs/stx/stx/libbasic/AbstractTime.st,v 1.44 2003-10-17 09:22:30 stefan Exp $'
   991     ^ '$Header: /cvs/stx/stx/libbasic/AbstractTime.st,v 1.45 2004-03-08 15:44:20 cg Exp $'
   985 ! !
   992 ! !