2 . "${srcdir=.}/init.sh"; path_prepend_ . ../src
4 # Test Tcl support: --add-comments option.
6 cat <<\EOF > xg-t-3.tcl
8 set string [_ "hello world" # b
12 : ${XGETTEXT=xgettext}
13 ${XGETTEXT} --add-comments --omit-header --no-location --keyword=_ \
14 -d xg-t-3.tmp xg-t-3.tcl || exit 1
15 LC_ALL=C tr -d '\r' < xg-t-3.tmp.po > xg-t-3.po || exit 1
24 ${DIFF} xg-t-3.ok xg-t-3.po