[Koha-cvs] CVS: koha/misc/translator text-extract2.pl,1.10,1.11

[Ambrose Li]

Update of /cvsroot/koha/koha/misc/translator
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24197

Modified Files:
	text-extract2.pl 
Log Message:
Don't extract purely-numeric strings like "1" either


Index: text-extract2.pl
===================================================================
RCS file: /cvsroot/koha/koha/misc/translator/text-extract2.pl,v
retrieving revision 1.10
retrieving revision 1.11
diff -C2 -r1.10 -r1.11
*** text-extract2.pl	13 Feb 2004 00:42:52 -0000	1.10
--- text-extract2.pl	13 Feb 2004 00:48:52 -0000	1.11
***************
*** 233,238 ****
  	}
      }
      for my $t (keys %text) {
! 	printf "%s\n", $t unless $t =~ /^(?:\s|\ )*$/s;
      }
  }
--- 233,239 ----
  	}
      }
+     # Emit all extracted strings. Don't emit pure whitespace or pure numbers.
      for my $t (keys %text) {
! 	printf "%s\n", $t unless $t =~ /^(?:\s|\ )*$/s || $t =~ /^\d+$/;
      }
  }