1*946379e7Schristos#!/bin/sh 2*946379e7Schristos 3*946379e7Schristos# Test Lisp support: --add-comments option. 4*946379e7Schristos 5*946379e7Schristostmpfiles="" 6*946379e7Schristostrap 'rm -fr $tmpfiles' 1 2 3 15 7*946379e7Schristos 8*946379e7Schristostmpfiles="$tmpfiles xg-ls-1.lisp" 9*946379e7Schristoscat <<EOF > xg-ls-1.lisp 10*946379e7Schristos; This comment will not be extracted. 11*946379e7Schristos(write-line (gettext "help")) 12*946379e7Schristos;; TRANSLATORS: This is an extracted comment. 13*946379e7Schristos(write-line (gettext "me")) 14*946379e7Schristos#| Not extracted either. |# 15*946379e7Schristos(write-line (gettext "Hey Jude")) 16*946379e7Schristos#| TRANSLATORS: 17*946379e7Schristos Nickname of the Beatles 18*946379e7Schristos|# 19*946379e7Schristos(write-line (gettext "The Fabulous Four")) 20*946379e7SchristosEOF 21*946379e7Schristos 22*946379e7Schristostmpfiles="$tmpfiles xg-ls-1.po" 23*946379e7Schristos: ${XGETTEXT=xgettext} 24*946379e7Schristos${XGETTEXT} --omit-header --no-location --add-comments=TRANSLATORS: \ 25*946379e7Schristos -d xg-ls-1 xg-ls-1.lisp 26*946379e7Schristostest $? = 0 || { rm -fr $tmpfiles; exit 1; } 27*946379e7Schristos 28*946379e7Schristostmpfiles="$tmpfiles xg-ls-1.ok" 29*946379e7Schristoscat <<EOF > xg-ls-1.ok 30*946379e7Schristosmsgid "help" 31*946379e7Schristosmsgstr "" 32*946379e7Schristos 33*946379e7Schristos#. TRANSLATORS: This is an extracted comment. 34*946379e7Schristosmsgid "me" 35*946379e7Schristosmsgstr "" 36*946379e7Schristos 37*946379e7Schristosmsgid "Hey Jude" 38*946379e7Schristosmsgstr "" 39*946379e7Schristos 40*946379e7Schristos#. TRANSLATORS: 41*946379e7Schristos#. Nickname of the Beatles 42*946379e7Schristos#. 43*946379e7Schristosmsgid "The Fabulous Four" 44*946379e7Schristosmsgstr "" 45*946379e7SchristosEOF 46*946379e7Schristos 47*946379e7Schristos: ${DIFF=diff} 48*946379e7Schristos${DIFF} xg-ls-1.ok xg-ls-1.po 49*946379e7Schristosresult=$? 50*946379e7Schristos 51*946379e7Schristosrm -fr $tmpfiles 52*946379e7Schristos 53*946379e7Schristosexit $result 54