.gear/rules | 2 ++ .../tags/4de29769daef0afbeda517a9f1f0f53cd61dd81d | 6 ++++ .gear/tags/list | 1 + perl-Eval-Context.spec | 40 ++++++++++++++++++++++ t/009_persistent_variables.t | 4 +-- 5 files changed, 51 insertions(+), 2 deletions(-) diff --git a/.gear/rules b/.gear/rules new file mode 100644 index 0000000..4fcfd99 --- /dev/null +++ b/.gear/rules @@ -0,0 +1,2 @@ +tar: @version@:. +diff: @version@:. . diff --git a/.gear/tags/4de29769daef0afbeda517a9f1f0f53cd61dd81d b/.gear/tags/4de29769daef0afbeda517a9f1f0f53cd61dd81d new file mode 100644 index 0000000..4d9a1ae --- /dev/null +++ b/.gear/tags/4de29769daef0afbeda517a9f1f0f53cd61dd81d @@ -0,0 +1,6 @@ +object 3e3add3d27a1398bac7ffb29095d879265895f6e +type commit +tag 0.09.11 +tagger Vladimir Lettiev 1379501720 +0400 + +0.09.11 diff --git a/.gear/tags/list b/.gear/tags/list new file mode 100644 index 0000000..15f108a --- /dev/null +++ b/.gear/tags/list @@ -0,0 +1 @@ +4de29769daef0afbeda517a9f1f0f53cd61dd81d 0.09.11 diff --git a/perl-Eval-Context.spec b/perl-Eval-Context.spec new file mode 100644 index 0000000..5f22634 --- /dev/null +++ b/perl-Eval-Context.spec @@ -0,0 +1,40 @@ +Name: perl-Eval-Context +Version: 0.09.11 +Release: alt2 + +Summary: Evalute perl code in context wrapper + +Group: Development/Perl +License: perl + +Url: %CPAN Eval-Context +Source: %name-%version.tar +Patch: %name-%version-%release.patch + +BuildArch: noarch +BuildRequires: perl(Term/Size.pm) perl(Test/Block.pm) perl(Sub/Exporter.pm) perl(Test/NoWarnings.pm) perl(Data/TreeDumper.pm) perl(Package/Generator.pm) perl(Module/Build.pm) perl(Test/Output.pm) perl(File/Slurp.pm) perl(Test/Exception.pm) perl(Readonly.pm) perl(Text/Diff.pm) perl(Directory/Scratch/Structured.pm) perl(Test/Warn.pm) perl(Data/Compare.pm) perl(Sub/Install.pm) + +%description +%summary + +%prep +%setup -q +%patch -p1 + +%build +%perl_vendor_build + +%install +%perl_vendor_install + +%files +%perl_vendor_privlib/Eval/Context* +%doc Changes README + +%changelog +* Wed Sep 18 2013 Vladimir Lettiev 0.09.11-alt2 +- fixed failed test with perl 5.18 + +* Tue Aug 24 2010 Vladimir Lettiev 0.09.11-alt1 +- initial build + diff --git a/t/009_persistent_variables.t b/t/009_persistent_variables.t index ff0a6e7..a96bc54 100644 --- a/t/009_persistent_variables.t +++ b/t/009_persistent_variables.t @@ -125,8 +125,8 @@ for my $test die $@ if $@ ; } -my @persistent_variable_names = $context->GetPersistentVariableNames() ; -is_deeply(\@persistent_variable_names , [qw($object $array $variable %hash $hash $scalar @array)], 'persistent variable names') or diag DumpTree(\@persistent_variable_names ) ; +my @persistent_variable_names = sort $context->GetPersistentVariableNames() ; +is_deeply(\@persistent_variable_names , [sort qw($object $array $variable %hash $hash $scalar @array)], 'persistent variable names') or diag DumpTree(\@persistent_variable_names ) ; throws_ok {