Репозитории ALT
S: | 2.21-alt1 |
5.1: | 2.15-alt2 |
4.1: | 2.15-alt2 |
4.0: | 2.15-alt2 |
3.0: | |
+backports: | 2.15-alt1.M30.1 |
Группа :: Разработка/Perl
Пакет: perl-ParseLex
Главная Изменения Спек Патчи Sources Загрузить Gear Bugs and FR Repocop
Патч: ParseLex-2.15-alt-test_fix.patch
Скачать
Скачать
--- ParseLex-2.15/lib/Parse/LexEvent.pm~ 1999-09-27 15:14:25 +0400
+++ ParseLex-2.15/lib/Parse/LexEvent.pm 2004-10-02 11:18:27 +0400
@@ -1,3 +1,4 @@
+#!/usr/bin/perl -w
# Copyright (c) Philippe Verdret, 1999
require 5.005;
--- ParseLex-2.15/lib/Parse/Template.pm~ 1999-09-23 12:16:28 +0400
+++ ParseLex-2.15/lib/Parse/Template.pm 2004-10-03 00:07:18 +0400
@@ -1,4 +1,5 @@
-use strict
+#!/usr/bin/perl
+use strict;
require 5.004;
package Parse::Template;
$Parse::Template::VERSION = '0.32';
@@ -132,7 +133,7 @@
}
# evaluated expressions are not always available in (caller(1))[6];
if (defined($1) and $1 ne '') {
- $expr = $1; # what is the template expression?
+ my $expr = $1; # what is the template expression?
{ package DB; # what is the part name?
@DB::caller = caller(2); # why is this needed? /ee?
@DB::caller = caller(1);
--- ParseLex-2.15/t/test4.t~ 1999-09-23 12:16:26 +0400
+++ ParseLex-2.15/t/test4.t 2004-10-04 00:50:00 +0400
@@ -55,4 +55,4 @@
[main::lexer|Parse::CLex] Token read (NEWLINE, \n):
[main::lexer|Parse::CLex] Token read (ERROR, .*): this is an invalid string with a "" in it"
-can't analyze: "this is an invalid string with a "" in it"" at examples/ctokenizer.pl line 17, <DATA> chunk 4.
+can't analyze: "this is an invalid string with a "" in it"" at examples/ctokenizer.pl line 17, <DATA> line 4.