Index: openacs-4/packages/xowiki/tcl/form-field-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/form-field-procs.tcl,v diff -u -r1.80 -r1.81 --- openacs-4/packages/xowiki/tcl/form-field-procs.tcl 19 Jun 2008 13:57:39 -0000 1.80 +++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl 24 Jun 2008 09:48:41 -0000 1.81 @@ -1112,7 +1112,7 @@ set values [lang::message::lookup [my locale] acs-lang.localization-abmon] if {[lang::util::translator_mode_p]} {set values [::xo::localize $values]} set last 0 - foreach m {1 2 3 4 6 7 8 9 10 11 12} { + foreach m {1 2 3 4 5 6 7 8 9 10 11 12} { lappend options [list [lindex $values $last] $m] set last $m } @@ -1130,7 +1130,7 @@ set values [lang::message::lookup [my locale] acs-lang.localization-mon] if {[lang::util::translator_mode_p]} {set values [::xo::localize $values]} set last 0 - foreach m {1 2 3 4 6 7 8 9 10 11 12} { + foreach m {1 2 3 4 5 6 7 8 9 10 11 12} { lappend options [list [lindex $values $last] $m] set last $m }