Browse Source

* update.pl: When using `--maintain' only scan ordinary files.

Pavel Roskin 24 years ago
parent
commit
f76fdaf75a
2 changed files with 3 additions and 1 deletions
  1. 2 0
      po/ChangeLog
  2. 1 1
      po/update.pl

+ 2 - 0
po/ChangeLog

@@ -1,5 +1,7 @@
 2001-06-07  Pavel Roskin  <proski@gnu.org>
 2001-06-07  Pavel Roskin  <proski@gnu.org>
 
 
+	* update.pl: When using `--maintain' only scan ordinary	files.
+
 	* ru.po: Update.
 	* ru.po: Update.
 	* POTFILES.in: Add src/charsets.c, src/selcodepage.c and
 	* POTFILES.in: Add src/charsets.c, src/selcodepage.c and
 	src/setup.c.
 	src/setup.c.

+ 1 - 1
po/update.pl

@@ -62,7 +62,7 @@ if ($LANG=~/^-(.)*/){
         
         
     elsif ($LANG eq "--maintain" || "$LANG" eq "-M"){
     elsif ($LANG eq "--maintain" || "$LANG" eq "-M"){
 
 
-        $a="find ../ -print | egrep '.*\\.(c|y|cc|c++|h|gob)' ";
+        $a="find ../ -type f -print | egrep '.*\\.(c|y|cc|c++|h|gob)' ";
 
 
         open(BUF2, "POTFILES.in") || die "update.pl:  there's not POTFILES.in!!!\n";
         open(BUF2, "POTFILES.in") || die "update.pl:  there's not POTFILES.in!!!\n";
         print "Searching for missing _(\" \") entries...\n";
         print "Searching for missing _(\" \") entries...\n";