[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha/misc/translator TmplTokenType.pm,1.1,1.2 text-extra
From: |
Ambrose Li |
Subject: |
[Koha-cvs] CVS: koha/misc/translator TmplTokenType.pm,1.1,1.2 text-extract2.pl,1.37,1.38 |
Date: |
Mon, 16 Feb 2004 19:02:41 -0800 |
Update of /cvsroot/koha/koha/misc/translator
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv11024
Modified Files:
TmplTokenType.pm text-extract2.pl
Log Message:
Fixed more bugs during the modularization
Index: TmplTokenType.pm
===================================================================
RCS file: /cvsroot/koha/koha/misc/translator/TmplTokenType.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -r1.1 -r1.2
*** TmplTokenType.pm 17 Feb 2004 02:45:27 -0000 1.1
--- TmplTokenType.pm 17 Feb 2004 03:02:39 -0000 1.2
***************
*** 40,44 ****
BEGIN {
my $new = sub {
! my $this = shift;
my $class = ref($this) || $this;
my $self = {};
--- 40,44 ----
BEGIN {
my $new = sub {
! my $this = 'TmplTokenType';#shift;
my $class = ref($this) || $this;
my $self = {};
Index: text-extract2.pl
===================================================================
RCS file: /cvsroot/koha/koha/misc/translator/text-extract2.pl,v
retrieving revision 1.37
retrieving revision 1.38
diff -C2 -r1.37 -r1.38
*** text-extract2.pl 17 Feb 2004 02:45:27 -0000 1.37
--- text-extract2.pl 17 Feb 2004 03:02:39 -0000 1.38
***************
*** 34,38 ****
printf "%s\n", ('-' x 79);
my($kind, $t, $attr) = ($s->type, $s->string, $s->attributes);
! printf "%s:\n", $kind;
printf "%4dH%s\n", length($t),
join('', map {/[\0-\37]/? $_: "$_\b$_"} split(//, $t));
--- 34,38 ----
printf "%s\n", ('-' x 79);
my($kind, $t, $attr) = ($s->type, $s->string, $s->attributes);
! printf "%s [line %d]:\n", $kind->to_string, $s->line_number;
printf "%4dH%s\n", length($t),
join('', map {/[\0-\37]/? $_: "$_\b$_"} split(//, $t));
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha/misc/translator TmplTokenType.pm,1.1,1.2 text-extract2.pl,1.37,1.38,
Ambrose Li <=
- Prev by Date:
[Koha-cvs] CVS: koha/misc/translator TmplToken.pm,NONE,1.1 TmplTokenType.pm,NONE,1.1 TmplTokenizer.pm,1.3,1.4 VerboseWarnings.pm,1.1,1.2 text-extract2.pl,1.36,1.37
- Next by Date:
[Koha-cvs] CVS: koha/misc/translator TmplTokenizer.pm,1.4,1.5
- Previous by thread:
[Koha-cvs] CVS: koha/misc/translator TmplToken.pm,NONE,1.1 TmplTokenType.pm,NONE,1.1 TmplTokenizer.pm,1.3,1.4 VerboseWarnings.pm,1.1,1.2 text-extract2.pl,1.36,1.37
- Next by thread:
[Koha-cvs] CVS: koha/misc/translator TmplTokenizer.pm,1.4,1.5
- Index(es):