| files >> /opt/lampp/share/doc/gettext/examples/hello-tcl/ |
| files >> //opt/lampp/share/doc/gettext/examples/hello-tcl/hello.tcl |
#!@TCLSH@
# Example for use of GNU gettext.
# This file is in the public domain.
#
# Source code of the Tcl program.
package require msgcat
::msgcat::mcload [file join "@pkgdatadir@" "msgs"]
proc _ {s} {return [::msgcat::mc $s]}
puts [_ "Hello, world!"]
puts [format [_ "This program is running as process number %d."] [pid]]
y~or5J ={Eeu磝Qk ᯘG{?+]ן?wM3X^歌>{7پK>on\jy R g/=fOroNVv~Y+ NGuÝHWyw[eQʨSb> >}Gmx[o[<{Ϯ_qF vM IENDB`