diff options
Diffstat (limited to 'gettext-tools/tests/lang-perl-2')
| -rwxr-xr-x | gettext-tools/tests/lang-perl-2 | 26 |
1 files changed, 13 insertions, 13 deletions
diff --git a/gettext-tools/tests/lang-perl-2 b/gettext-tools/tests/lang-perl-2 index 40b814b..5bc2fa8 100755 --- a/gettext-tools/tests/lang-perl-2 +++ b/gettext-tools/tests/lang-perl-2 @@ -23,8 +23,8 @@ ${XGETTEXT} \ -k__n:1,2 --flag=__n:1:pass-perl-format --flag=__n:1:pass-perl-brace-format \ --flag=__n:2:pass-perl-format --flag=__n:2:pass-perl-brace-format \ -k__x --flag=__x:1:perl-brace-format \ - -o prog.tmp --omit-header --no-location program2.pl || exit 1 -LC_ALL=C tr -d '\r' < prog.tmp > prog.pot || exit 1 + -o prog.tmp --omit-header --no-location program2.pl || Exit 1 +LC_ALL=C tr -d '\r' < prog.tmp > prog.pot || Exit 1 cat <<EOF > prog.ok msgid "'Your command, please?', asked the waiter." @@ -42,7 +42,7 @@ msgstr "" EOF : ${DIFF=diff} -${DIFF} prog.ok prog.pot || exit 1 +${DIFF} prog.ok prog.pot || Exit 1 cat <<\EOF > fr.po msgid "" @@ -67,11 +67,11 @@ msgstr "{new} remplace {old}." EOF : ${MSGMERGE=msgmerge} -${MSGMERGE} -q -o fr.po.tmp fr.po prog.pot || exit 1 -LC_ALL=C tr -d '\r' < fr.po.tmp > fr.po.new || exit 1 +${MSGMERGE} -q -o fr.po.tmp fr.po prog.pot || Exit 1 +LC_ALL=C tr -d '\r' < fr.po.tmp > fr.po.new || Exit 1 : ${DIFF=diff} -${DIFF} fr.po fr.po.new || exit 1 +${DIFF} fr.po fr.po.new || Exit 1 test -d l-perl-2 || mkdir l-perl-2 test -d fr || mkdir fr @@ -95,20 +95,20 @@ EOF # Test for perl with libintl-perl package. perl -M'Locale::TextDomain' -e '' 2>/dev/null \ || { echo "Skipping test: perl package libintl-perl is not installed" - exit 77 + Exit 77 } : ${LOCALE_FR=fr_FR} : ${LOCALE_FR_UTF8=fr_FR.UTF-8} if test $LOCALE_FR != none; then prepare_locale_ fr $LOCALE_FR - LANGUAGE= LANG=$LOCALE_FR LC_MESSAGES= LC_CTYPE= LC_ALL= perl program2.pl > prog.out || exit 1 - ${DIFF} prog.ok prog.out || exit 1 + LANGUAGE= LANG=$LOCALE_FR LC_MESSAGES= LC_CTYPE= LC_ALL= perl program2.pl > prog.out || Exit 1 + ${DIFF} prog.ok prog.out || Exit 1 fi if test $LOCALE_FR_UTF8 != none; then prepare_locale_ fr $LOCALE_FR_UTF8 - LANGUAGE= LANG=$LOCALE_FR_UTF8 LC_MESSAGES= LC_CTYPE= LC_ALL= perl program2.pl > prog.out || exit 1 - ${DIFF} prog.oku prog.out || exit 1 + LANGUAGE= LANG=$LOCALE_FR_UTF8 LC_MESSAGES= LC_CTYPE= LC_ALL= perl program2.pl > prog.out || Exit 1 + ${DIFF} prog.oku prog.out || Exit 1 fi if test $LOCALE_FR = none && test $LOCALE_FR_UTF8 = none; then if test -f /usr/bin/localedef; then @@ -116,7 +116,7 @@ if test $LOCALE_FR = none && test $LOCALE_FR_UTF8 = none; then else echo "Skipping test: no french locale is supported" fi - exit 77 + Exit 77 fi -exit 0 +Exit 0 |