[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha/misc/translator text-extract2.pl,1.8,1.9
From: |
Ambrose Li |
Subject: |
[Koha-cvs] CVS: koha/misc/translator text-extract2.pl,1.8,1.9 |
Date: |
Thu, 12 Feb 2004 10:25:45 -0800 |
Update of /cvsroot/koha/koha/misc/translator
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv1003
Modified Files:
text-extract2.pl
Log Message:
Minor wording rewrite in warning
Index: text-extract2.pl
===================================================================
RCS file: /cvsroot/koha/koha/misc/translator/text-extract2.pl,v
retrieving revision 1.8
retrieving revision 1.9
diff -C2 -r1.8 -r1.9
*** text-extract2.pl 12 Feb 2004 18:19:17 -0000 1.8
--- text-extract2.pl 12 Feb 2004 18:25:43 -0000 1.9
***************
*** 72,76 ****
$attr{+lc($key)} = [$key, $val, $val_orig, $i];
$s = $rest;
! warn "Warning: Attribute unquoted but needs quoting"
. (defined $lc? " in line $lc": '') . ": $val_orig\n"
if $val =~ /[^-\.A-Za-z0-9]/s && $val_orig !~ /^['"]/;
--- 72,76 ----
$attr{+lc($key)} = [$key, $val, $val_orig, $i];
$s = $rest;
! warn "Warning: Attribute should be quoted"
. (defined $lc? " in line $lc": '') . ": $val_orig\n"
if $val =~ /[^-\.A-Za-z0-9]/s && $val_orig !~ /^['"]/;
***************
*** 79,83 ****
warn "Warning: Strange attribute syntax"
. (defined $lc? " in line $lc": '') . ": $s\n";
- } else {
}
return \%attr;
--- 79,82 ----
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha/misc/translator text-extract2.pl,1.8,1.9,
Ambrose Li <=