home *** CD-ROM | disk | FTP | other *** search
/ Geek Gadgets 1 / ADE-1.bin / ade-dist / gettext-0.10.24-src.tgz / tar.out / fsf / gettext / checks / msgmerge-3 < prev    next >
Lisp/Scheme  |  1996-09-28  |  2KB  |  93 lines
  1. #! /bin/sh
  2.  
  3. trap 'rm -fr $tmpfiles' 1 2 3 15
  4.  
  5. tmpfiles="mm-test3.in1 mm-test3.in2"
  6. cat <<EOF > mm-test3.in1
  7. #
  8. # def.po
  9. #
  10. #: file:100
  11. msgid ""
  12. "not existing"
  13. msgstr "but with translation"
  14.  
  15. #: file2:101
  16. msgid "not existing without translation"
  17. msgstr ""
  18.  
  19. #: file3:102
  20. msgid "still existing"
  21. msgstr "translation"
  22.  
  23. #: should-not-be-here:10
  24. #~ msgid "former obsolete"
  25. #~ msgstr ""
  26. #~ "but again useful"
  27.  
  28. #~ msgid "this stays obsolete"
  29. #~ msgstr "even after running msgmerge"
  30.  
  31. #
  32. # trailing comments should be removed
  33. EOF
  34.  
  35. cat <<EOF > mm-test3.in2
  36. #
  37. # ref.po
  38. #
  39. #: file3:102
  40. msgid "still existing"
  41. msgstr "here is normally no comment"
  42.  
  43. #: file4:10
  44. msgid ""
  45. "former obsolete"
  46. msgstr ""
  47.  
  48. #
  49. # trailing comments should be removed, even here
  50. EOF
  51.  
  52. tmpfiles="$tmpfiles mm-test3.out"
  53. : ${MSGMERGE=msgmerge}
  54. ${MSGMERGE} -q mm-test3.in1 mm-test3.in2 -o mm-test3.out
  55.  
  56. tmpfiles="$tmpfiles mm-test3.ok"
  57. cat << EOF > mm-test3.ok
  58. #: file3:102
  59. msgid "still existing"
  60. msgstr "translation"
  61.  
  62. #: file4:10
  63. msgid "former obsolete"
  64. msgstr "but again useful"
  65.  
  66. #
  67. # def.po
  68. #
  69. #~ msgid "not existing"
  70. #~ msgstr "but with translation"
  71.  
  72. #~ msgid "this stays obsolete"
  73. #~ msgstr "even after running msgmerge"
  74. EOF
  75.  
  76. : ${DIFF=diff}
  77. ${DIFF} mm-test3.ok mm-test3.out
  78. result=$?
  79.  
  80. rm -fr $tmpfiles
  81.  
  82. exit $result
  83.  
  84. # Preserve executable bits for this shell script.
  85. # Thanks to Noah Friedman for this great trick.
  86. Local Variables:
  87. Eval: (defun frobme () (set-file-modes buffer-file-name file-mode))
  88. Eval: (make-local-variable 'file-mode)
  89. Eval: (setq file-mode (file-modes (buffer-file-name)))
  90. Eval: (make-local-variable 'after-save-hook)
  91. Eval: (add-hook 'after-save-hook 'frobme)
  92. End:
  93.