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 / xgettext-1 < prev    next >
Lisp/Scheme  |  1996-09-28  |  792b  |  29 lines
  1. #! /bin/sh
  2. # One argument is required which is the path to the toplevel directory
  3. # of the distribution.
  4.  
  5. trap 'rm -fr $tmpfiles' 1 2 3 15
  6.  
  7. tmpfiles="xg-test1.po"
  8. : ${XGETTEXT=xgettext}
  9. ${XGETTEXT} -d xg-test1 -k_ --omit-header \
  10.  $top_srcdir/src/xgettext.c $top_srcdir/src/msgfmt.c $top_srcdir/src/gettextp.c
  11.  
  12. : ${DIFF=diff}
  13. ${DIFF} $top_srcdir/checks/xg-test1.ok.po xg-test1.po
  14. result=$?
  15.  
  16. rm -fr $tmpfiles
  17.  
  18. exit $result
  19.  
  20. # Preserve executable bits for this shell script.
  21. # Thanks to Noah Friedman for this great trick.
  22. Local Variables:
  23. Eval: (defun frobme () (set-file-modes buffer-file-name file-mode))
  24. Eval: (make-local-variable 'file-mode)
  25. Eval: (setq file-mode (file-modes (buffer-file-name)))
  26. Eval: (make-local-variable 'after-save-hook)
  27. Eval: (add-hook 'after-save-hook 'frobme)
  28. End:
  29.