7 lines
149 B
Tcl
7 lines
149 B
Tcl
# gettext.tcl - some stubs
|
|
# Copyright (C) 1997 Cygnus Solutions.
|
|
# Written by Tom Tromey <tromey@cygnus.com>.
|
|
|
|
proc gettext {str} {
|
|
return $str
|
|
}
|