Index: calendar.tcl
===================================================================
RCS file: /cvsroot/tcllib/tklib/modules/widget/calendar.tcl,v
retrieving revision 1.14
diff -w -u -r1.14 calendar.tcl
--- calendar.tcl	5 Dec 2011 20:34:24 -0000	1.14
+++ calendar.tcl	13 Aug 2012 18:29:10 -0000
@@ -521,6 +521,7 @@
     method formatMY {month year} {
 	set lang $options(-language)
 	if {[info exists LANGS(mn,$lang)]} {
+	    scan $month %d month;# fix for the not-quite octal month numbers (08,09).
 	    set month [lindex $LANGS(mn,$lang) $month]
 	} else {
 	    set _date [clock scan $month/1/$year]
