Mercurial Mercurial > hg > stx-libbasic / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
class: Date
authorClaus Gittinger <cg@exept.de>
Mon, 08 Dec 2014 17:37:06 +0100
changeset 17194 73fb6e2decad
parent 17193 d8f5450b6c5a
child 17195 8c13747ba36d
class: Date comment/format in: #printOn:format:
Date.st file | annotate | diff | comparison | revisions 
--- a/Date.st	Mon Dec 08 17:35:35 2014 +0100
+++ b/Date.st	Mon Dec 08 17:37:06 2014 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -653,10 +655,10 @@
      Date readFrom:'30.01' printFormat:'%d %m' onError:'fail'     
 
      Date readFrom:'3-3-1995' printFormat:'%d %m %y' language: #de onError:'fail'          
-     Date readFrom:'3-März-1995' printFormat:'%d %monthName %y' language: #de onError:'fail'          
-     Date readFrom:'3-mär-1995' printFormat:'%d %shortMonthName %y' language: #de onError:'fail'   
-     Date readFrom:'3/mär/1995' printFormat:'%d %shortMonthName %y' language: #de onError:'fail'  
-     Date readFrom:'3/mär/1995' printFormat:'%d-%shortMonthName-%y' language: #de onError:'fail'          
+     Date readFrom:'3-März-1995' printFormat:'%d %monthName %y' language: #de onError:'fail'          
+     Date readFrom:'3-mär-1995' printFormat:'%d %shortMonthName %y' language: #de onError:'fail'   
+     Date readFrom:'3/mär/1995' printFormat:'%d %shortMonthName %y' language: #de onError:'fail'  
+     Date readFrom:'3/mär/1995' printFormat:'%d-%shortMonthName-%y' language: #de onError:'fail'          
      Date readFrom:'3-dez-1995' printFormat:'%d %shortMonthName %y' language: #de onError:'fail'          
      Date readFrom:'3-Dez-1995' printFormat:'%d %shortMonthName %y' language: #de onError:'fail'          
      Date readFrom:'3-Dezember-1995' printFormat:'%d %monthName %y' language: #de onError:'fail'          
@@ -3255,7 +3257,8 @@
      Date today printOn:Transcript format:'%d%m%Y'                                      (millenium bug format - danger)
      Date today printOn:Transcript format:'Today is the %(weekDay) day of the week'     
      Date today printOn:Transcript format:'Today is %(day)-%(monthRoman)-%(year)'       
-     Date today printOn:Transcript format:'Anno domini %(yearRoman)'       
+     Date today printOn:Transcript format:'Anno domini %(yearRoman)'
+     Date today printOn:Transcript format:'%y年%(mon)月%d日'                               (select a font, which can display those chars)
     "
     "short form (as in blogs like www.stackoverflow, www.superuser etc.)
      Date today printOn:Transcript format:'%(MonthName) %D ''%Y'     
@@ -3458,11 +3461,11 @@
 !Date class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Date.st,v 1.162 2014-12-08 16:35:35 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Date.st,v 1.163 2014-12-08 16:37:06 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Date.st,v 1.162 2014-12-08 16:35:35 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Date.st,v 1.163 2014-12-08 16:37:06 cg Exp $'
 ! !
hg/stx-libbasic