Blame gettext-tools/tests/xgettext-lisp-1
|
Packit Bot |
06c835 |
#!/bin/sh
|
|
Packit Bot |
06c835 |
. "${srcdir=.}/init.sh"; path_prepend_ . ../src
|
|
Packit Bot |
06c835 |
|
|
Packit Bot |
06c835 |
# Test Lisp support: --add-comments option.
|
|
Packit Bot |
06c835 |
|
|
Packit Bot |
06c835 |
cat <<EOF > xg-ls-1.lisp
|
|
Packit Bot |
06c835 |
; This comment will not be extracted.
|
|
Packit Bot |
06c835 |
(write-line (gettext "help"))
|
|
Packit Bot |
06c835 |
;; TRANSLATORS: This is an extracted comment.
|
|
Packit Bot |
06c835 |
(write-line (gettext "me"))
|
|
Packit Bot |
06c835 |
#| Not extracted either. |#
|
|
Packit Bot |
06c835 |
(write-line (gettext "Hey Jude"))
|
|
Packit Bot |
06c835 |
#| TRANSLATORS:
|
|
Packit Bot |
06c835 |
Nickname of the Beatles
|
|
Packit Bot |
06c835 |
|#
|
|
Packit Bot |
06c835 |
(write-line (gettext "The Fabulous Four"))
|
|
Packit Bot |
06c835 |
EOF
|
|
Packit Bot |
06c835 |
|
|
Packit Bot |
06c835 |
: ${XGETTEXT=xgettext}
|
|
Packit Bot |
06c835 |
${XGETTEXT} --omit-header --no-location --add-comments=TRANSLATORS: \
|
|
Packit Bot |
06c835 |
-d xg-ls-1.tmp xg-ls-1.lisp || exit 1
|
|
Packit Bot |
06c835 |
LC_ALL=C tr -d '\r' < xg-ls-1.tmp.po > xg-ls-1.po || exit 1
|
|
Packit Bot |
06c835 |
|
|
Packit Bot |
06c835 |
cat <<EOF > xg-ls-1.ok
|
|
Packit Bot |
06c835 |
msgid "help"
|
|
Packit Bot |
06c835 |
msgstr ""
|
|
Packit Bot |
06c835 |
|
|
Packit Bot |
06c835 |
#. TRANSLATORS: This is an extracted comment.
|
|
Packit Bot |
06c835 |
msgid "me"
|
|
Packit Bot |
06c835 |
msgstr ""
|
|
Packit Bot |
06c835 |
|
|
Packit Bot |
06c835 |
msgid "Hey Jude"
|
|
Packit Bot |
06c835 |
msgstr ""
|
|
Packit Bot |
06c835 |
|
|
Packit Bot |
06c835 |
#. TRANSLATORS:
|
|
Packit Bot |
06c835 |
#. Nickname of the Beatles
|
|
Packit Bot |
06c835 |
#.
|
|
Packit Bot |
06c835 |
msgid "The Fabulous Four"
|
|
Packit Bot |
06c835 |
msgstr ""
|
|
Packit Bot |
06c835 |
EOF
|
|
Packit Bot |
06c835 |
|
|
Packit Bot |
06c835 |
: ${DIFF=diff}
|
|
Packit Bot |
06c835 |
${DIFF} xg-ls-1.ok xg-ls-1.po
|
|
Packit Bot |
06c835 |
result=$?
|
|
Packit Bot |
06c835 |
|
|
Packit Bot |
06c835 |
exit $result
|