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

[Ambrose Li]

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

Modified Files:
	text-extract2.pl 
Log Message:
The fixed search.marc/search.tmpl (nothing between <textarea></textarea>)
caused an eof token to be incorrectly generated by next_token(). This 
is now fixed.


Index: text-extract2.pl
===================================================================
RCS file: /cvsroot/koha/koha/misc/translator/text-extract2.pl,v
retrieving revision 1.16
retrieving revision 1.17
diff -C2 -r1.16 -r1.17
*** text-extract2.pl	13 Feb 2004 01:48:58 -0000	1.16
--- text-extract2.pl	13 Feb 2004 02:42:06 -0000	1.17
***************
*** 181,185 ****
  	}
      } else {
! 	for (;;) {
  	    my $lc_prev = $lc;
  	    my $next = next_token_internal($h);
--- 181,185 ----
  	}
      } else {
! 	for ($it = '';;) {
  	    my $lc_prev = $lc;
  	    my $next = next_token_internal($h);
***************
*** 192,196 ****
  	    $it .= $next->[1]; #FIXME
  	}
! 	$it = [KIND_CDATA, $it] if defined $it; #FIXME
  	$cdata_close = undef;
      }
--- 192,196 ----
  	    $it .= $next->[1]; #FIXME
  	}
! 	$it = [KIND_CDATA, $it]; #FIXME
  	$cdata_close = undef;
      }