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-3 < prev    next >
Lisp/Scheme  |  1996-09-28  |  740b  |  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="zero-domain.po"
  8. rm -f zero-domain.po
  9. : ${XGETTEXT=xgettext}
  10. ${XGETTEXT} -k_ -d zero-domain -x $top_srcdir/po/gettext.pot \
  11.   $top_srcdir/src/xgettext.c
  12.  
  13. test ! -f zero-domain.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.