1#!/bin/sh 2. "${srcdir=.}/init.sh"; path_prepend_ . ../src 3 4# Test EmacsLisp support: --add-comments option. 5 6cat <<EOF > xg-el-1.el 7; This comment will not be extracted. 8(princ (_ "help")) 9;; TRANSLATORS: This is an extracted comment. 10(princ (_ "me")) 11; Not extracted either. 12(princ (_ "Hey Jude")) 13; TRANSLATORS: 14; Nickname of the Beatles 15(princ (_ "The Fabulous Four")) 16EOF 17 18: ${XGETTEXT=xgettext} 19${XGETTEXT} --omit-header --no-location --add-comments=TRANSLATORS: \ 20 -d xg-el-1.tmp xg-el-1.el || Exit 1 21LC_ALL=C tr -d '\r' < xg-el-1.tmp.po > xg-el-1.po || Exit 1 22 23cat <<EOF > xg-el-1.ok 24msgid "help" 25msgstr "" 26 27#. TRANSLATORS: This is an extracted comment. 28msgid "me" 29msgstr "" 30 31msgid "Hey Jude" 32msgstr "" 33 34#. TRANSLATORS: 35#. Nickname of the Beatles 36msgid "The Fabulous Four" 37msgstr "" 38EOF 39 40: ${DIFF=diff} 41${DIFF} xg-el-1.ok xg-el-1.po 42result=$? 43 44exit $result 45