Version 1 of locale

Updated 2001-10-26 15:32:31

[...]

---

RS offers a good example of locale-use in Tcl programming: "

      proc monthname {date} {
         lindex $::monthnames($::env(LANG)) [clock format $date -format -m]
      }
      set monthnames(de_AT) {- J�nner Feber M�rz April ...}

Of course, this needs refinements (default to "C" if LANG is not set or is set to an unexpected value, etc.)."

Typical values for $::env(LANG) are {[not set], ...}