#!/bin/sh
. "${srcdir=.}/init.sh"; path_prepend_ . ../src

# Test Lua support

cat <<\EOF > xg-lu-2.lua
-- This comment won't be extracted.
print(_"Hmm.")
-- Neither this one.
print(_"Test.")
--   TRANSLATORS: Hello translators, how are you today?
print(_"We're fine, thanks.")
--[[ Do not extract this, please ]]

--[[  TRANSLATORS:
Attention!
]]
print(--[=[	TRANSLATORS: This is a comment for you!]=] _(--[[TRANSLATORS: Nobody else is supposed to read this!]]
"flowers" --[===[ TRANSLATORS: Nobody will see this.]===] .. --[[ TRANSLATORS: How sad.]] " and " .. --[[Secret text!]]
"biscuits" --[=[TRANSLATORS: Hey you!]=]))

--[==[TRANSLATORS: :-]]==]
print(_"A string.")
EOF

: ${XGETTEXT=xgettext}
${XGETTEXT} --omit-header --no-location --add-comments=TRANSLATORS: \
  -d xg-lu-2.tmp xg-lu-2.lua || Exit 1
LC_ALL=C tr -d '\r' < xg-lu-2.tmp.po > xg-lu-2.po || Exit 1

cat <<EOF > xg-lu-2.ok
msgid "Hmm."
msgstr ""

msgid "Test."
msgstr ""

#. TRANSLATORS: Hello translators, how are you today?
msgid "We're fine, thanks."
msgstr ""

#. TRANSLATORS:
#. Attention!
#.
#. TRANSLATORS: This is a comment for you!
#. TRANSLATORS: Nobody else is supposed to read this!
msgid "flowers and biscuits"
msgstr ""

#. TRANSLATORS: :-]
msgid "A string."
msgstr ""
EOF

: ${DIFF=diff}
${DIFF} xg-lu-2.ok xg-lu-2.po
result=$?

exit $result
