| #!/bin/sh |
| . "${srcdir=.}/init.sh"; path_prepend_ . ../src |
| |
| # Test Lua support |
| |
| cat <<\EOF > xg-lu-1.lua |
| print(_("This is a test string.")) |
| print(_('And another one.')) |
| print(_("Don't be afraid to extract this one.")) |
| print(_('I don\'t bite!')) |
| print(_("I said: \"This is a test.\"")) |
| print(_('He said: "You\'re right!"')) |
| print(_([[I like brackets.]])) |
| print(_([===[Brackets are awesome!]===])) |
| print(_([===[==[Even nested brackets]==]===])) |
| print(_([===[Or even unmached number of '=' signs]==]===])) |
| print(_([=[ |
| First newline in long bracket is ignored.]=])) |
| print(_([=[ |
| |
| Second newline in long bracket is extracted.]=])) |
| print(_([=[ |
| Newlines inside a long bracket string |
| and at the end are not special. |
| ]=])) |
| print(_(hmm["nope"])) |
| print({_"yep"}) |
| print(_["nope"]) |
| print(_("\097")) |
| print(_("\x3F\z |
| \x2a")) |
| print(_("abc" .. "def")) |
| print(speed / 1000 .. 'Mbps') |
| EOF |
| |
| : ${XGETTEXT=xgettext} |
| ${XGETTEXT} --omit-header --no-location --add-comments=TRANSLATORS: \ |
| -d xg-lu-1.tmp xg-lu-1.lua || Exit 1 |
| LC_ALL=C tr -d '\r' < xg-lu-1.tmp.po > xg-lu-1.po || Exit 1 |
| |
| cat <<EOF > xg-lu-1.ok |
| msgid "This is a test string." |
| msgstr "" |
| |
| msgid "And another one." |
| msgstr "" |
| |
| msgid "Don't be afraid to extract this one." |
| msgstr "" |
| |
| msgid "I don't bite!" |
| msgstr "" |
| |
| msgid "I said: \"This is a test.\"" |
| msgstr "" |
| |
| msgid "He said: \"You're right!\"" |
| msgstr "" |
| |
| msgid "I like brackets." |
| msgstr "" |
| |
| msgid "Brackets are awesome!" |
| msgstr "" |
| |
| msgid "==[Even nested brackets]==" |
| msgstr "" |
| |
| msgid "Or even unmached number of '=' signs]==" |
| msgstr "" |
| |
| msgid "First newline in long bracket is ignored." |
| msgstr "" |
| |
| msgid "" |
| "\n" |
| "Second newline in long bracket is extracted." |
| msgstr "" |
| |
| msgid "" |
| "Newlines inside a long bracket string\n" |
| "and at the end are not special.\n" |
| msgstr "" |
| |
| msgid "yep" |
| msgstr "" |
| |
| msgid "a" |
| msgstr "" |
| |
| msgid "?*" |
| msgstr "" |
| |
| msgid "abcdef" |
| msgstr "" |
| EOF |
| |
| : ${DIFF=diff} |
| ${DIFF} xg-lu-1.ok xg-lu-1.po |
| result=$? |
| |
| exit $result |
