summaryrefslogtreecommitdiff
path: root/Master/tlpkg/bin/tl-update-messages
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/bin/tl-update-messages')
-rwxr-xr-xMaster/tlpkg/bin/tl-update-messages18
1 files changed, 16 insertions, 2 deletions
diff --git a/Master/tlpkg/bin/tl-update-messages b/Master/tlpkg/bin/tl-update-messages
index b243dd4c74c..879059eb0de 100755
--- a/Master/tlpkg/bin/tl-update-messages
+++ b/Master/tlpkg/bin/tl-update-messages
@@ -5,6 +5,17 @@
# update the master messages.pot catalog and merge the result into the
# respective .po files.
+# notes on transition to tcl/tk frontend
+
+# Until the 2019 pretest stage we use a combined message catalog.
+
+
+# Afterwards, we drop the perl input files and use tcl- rather than
+# perl syntax for the temporary file with short descriptions.
+
+# For tcl, all .po files are converted to tcl-compatible .msg
+# files, using the msgfmt utility.
+
mydir=`cd \`dirname $0\` && /bin/pwd`
Master=`cd $mydir/../.. && /bin/pwd`
transdir=$Master/tlpkg/translations
@@ -14,18 +25,20 @@ cd $Master || exit 1
cp $transdir/messages.pot $transdir/messages.prev
sed -n 's/^shortdesc \(.*\)/__("\1");/p' \
tlpkg/tlpsrc/scheme-*.tlpsrc tlpkg/tlpsrc/collection-*.tlpsrc >$tmpfile
+cat install-tl >>$tmpfile
+# rely on file extensions for source language identification
xgettext -o tlpkg/translations/messages.pot \
- -L Perl \
--copyright-holder="TeX Live Team" \
--msgid-bugs-address=tex-live@tug.org \
--package-version=2010 \
--package-name="TeX Live" \
-k__ -k\$__ -k%__ -k__x -k__n:1,2 -k__nx:1,2 -k__xn:1,2 -kN__ -k \
- install-tl \
tlpkg/installer/tracked-install.pl \
tlpkg/installer/install-menu-wizard.pl \
tlpkg/installer/install-menu-perltk.pl \
texmf-dist/scripts/texlive/tlmgrgui.pl \
+ tlpkg/installer/install-tl-gui.tcl \
+ texmf-dist/scripts/tlshell/tlshell.tcl \
$tmpfile
rm $tmpfile
@@ -47,6 +60,7 @@ rm -f $tmpa $tmpb messages.prev
for i in *.po ; do
printf "$i "
msgmerge --backup=none --no-fuzzy-matching --update $i messages.pot
+ msgfmt --tcl -d . -l ${i%.po} $i
done
exit $?