summaryrefslogtreecommitdiffstats
path: root/gettext-tools/tests/lang-perl-1
diff options
context:
space:
mode:
authorDaiki Ueno <ueno@gnu.org>2016-06-08 15:27:59 +0900
committerDaiki Ueno <ueno@gnu.org>2016-06-08 15:28:49 +0900
commit59d9b55bb203ec78be4ace221123e0d1b5827b35 (patch)
tree4bbc2d778869beac6c86475523d366b7e8700966 /gettext-tools/tests/lang-perl-1
parenta2a048cfe39504db09cfbbfdfc6cb9f417b3789f (diff)
downloadexternal_gettext-59d9b55bb203ec78be4ace221123e0d1b5827b35.zip
external_gettext-59d9b55bb203ec78be4ace221123e0d1b5827b35.tar.gz
external_gettext-59d9b55bb203ec78be4ace221123e0d1b5827b35.tar.bz2
tests: Use Exit instead of exit if init.sh is used
* gettext-tools/tests/*: Use Exit instead of exit, as suggested by init.sh.
Diffstat (limited to 'gettext-tools/tests/lang-perl-1')
-rwxr-xr-xgettext-tools/tests/lang-perl-126
1 files changed, 13 insertions, 13 deletions
diff --git a/gettext-tools/tests/lang-perl-1 b/gettext-tools/tests/lang-perl-1
index acf6c97..40b1424 100755
--- a/gettext-tools/tests/lang-perl-1
+++ b/gettext-tools/tests/lang-perl-1
@@ -24,8 +24,8 @@ EOF
: ${XGETTEXT=xgettext}
${XGETTEXT} \
-k__ --flag=__:1:pass-perl-format --flag=__:1:pass-perl-brace-format \
- -o prog.tmp --omit-header --no-location program1.pl || exit 1
-LC_ALL=C tr -d '\r' < prog.tmp > prog.pot || exit 1
+ -o prog.tmp --omit-header --no-location program1.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."
@@ -43,7 +43,7 @@ msgstr ""
EOF
: ${DIFF=diff}
-${DIFF} prog.ok prog.pot || exit 1
+${DIFF} prog.ok prog.pot || Exit 1
cat <<\EOF > fr.po
msgid ""
@@ -68,11 +68,11 @@ msgstr "%2$s remplace %1$s."
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 fr || mkdir fr
test -d fr/LC_MESSAGES || mkdir fr/LC_MESSAGES
@@ -95,20 +95,20 @@ EOF
# Test for perl with Locale::Messages package.
perl -e 'use Locale::Messages;' 2>/dev/null \
|| { echo "Skipping test: perl package Locale::Messages 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 program1.pl > prog.out || exit 1
- ${DIFF} prog.ok prog.out || exit 1
+ LANGUAGE= LANG=$LOCALE_FR LC_MESSAGES= LC_CTYPE= LC_ALL= perl program1.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 program1.pl > prog.out || exit 1
- ${DIFF} prog.oku prog.out || exit 1
+ LANGUAGE= LANG=$LOCALE_FR_UTF8 LC_MESSAGES= LC_CTYPE= LC_ALL= perl program1.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