mirrors/mc
1
0
Fork 0
mirror of https://github.com/MidnightCommander/mc synced 2024-12-22 20:36:50 +03:00
Code Issues Packages Projects Releases Wiki Activity

Allow spaces between "_" and "(".

Browse Source 
Require exact extensions to avoid addiing backups.
Add some extensions (cpp, cxx) in case if some C++ project takes this
script - they are no longer covered by *.c
This commit is contained in:
Pavel Roskin 2002-07-15 17:03:13 +00:00
parent 0ab222eed4
commit 566339a1cc
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
po/update.pl
View File

@ -62,9 +62,9 @@ if ($LANG=~/^-(.)*/){
elsif ($LANG eq "--maintain" || "$LANG" eq "-M"){ elsif ($LANG eq "--maintain" || "$LANG" eq "-M"){
$a="find ../ -type f -print | egrep '.*\\.(c|y|cc|c++|h|gob)' "; $a="find ../ -type f -print | egrep '.*\\.(c|y|cc|c++|cxx|cpp|h|gob)\$' ";
open(BUF2, "POTFILES.in") || die "update.pl: there is no POTFILES.in!!!\n"; open(BUF2, "POTFILES.in") || die "update.pl: there is no POTFILES.in !!!\n";
print "Searching for missing _(\" \") entries...\n"; print "Searching for missing _(\" \") entries...\n";
open(BUF1, "$a|"); open(BUF1, "$a|");
@ -86,7 +86,7 @@ if ($LANG=~/^-(.)*/){
foreach my $file (@buf1){ foreach my $file (@buf1){
open FILE, "<$file"; open FILE, "<$file";
while (<FILE>) { while (<FILE>) {
if ($_=~/_\(\"/o){ if ($_=~/_\s*\(\"/o){
$file = unpack("x3 A*",$file) . "\n"; $file = unpack("x3 A*",$file) . "\n";
push @buff1, $file; push @buff1, $file;
last; last;