Dear stable release managers, Please approve the upload of libjavascript-perl/1.08-1+lenny1 to stable.
libjavascript-perl (1.08-1+lenny1) stable; urgency=low
* Steal fix_context_destruction.patch from upstream SVN. Fixes a segfault
after calling non-present function. Closes: 564772
* add myself to Uploaders
-- Damyan Ivanov <[email protected]> Wed, 10 Feb 2010 08:02:09 +0200
The Uploaders addition is so that the upload doesn't look as an NMU (I
am member of the Perl group) and that I claim responsibility.
fix_context_destruction.patch, interdiff and debfiff to 1.08-1
(currently in lenny) attached.
Thanks,
dam
# Description: fix segmentation fault when evaluated JavaScript code calls an
# undefined external function
# Bug-Debian: 564772
# Origin: upstream, svn://svn.versed.se/public/Perl/modules/JavaScript/trunk (revision 931)
--- a/lib/JavaScript/Context.pm
+++ b/lib/JavaScript/Context.pm
@@ -19,10 +19,8 @@ sub new {
my $self = bless { _impl => $cx_ptr }, $pkg;
- $Context{${$cx_ptr}} = $self;
-
- weaken($Context{$cx_ptr});
-
+ $Context{$$cx_ptr} = $self;
+ weaken($Context{$$cx_ptr});
$self->{runtime} = $runtime;
return $self;
--- a/t/30-refcount.t
+++ b/t/30-refcount.t
@@ -31,5 +31,5 @@ my $rt = JavaScript::Runtime->new();
is($sv->REFCNT, 2);
}
- is($sv->REFCNT, 1);
+ is($sv->REFCNT, 0);
}
diff -u libjavascript-perl-1.08/debian/control libjavascript-perl-1.08/debian/control --- libjavascript-perl-1.08/debian/control +++ libjavascript-perl-1.08/debian/control @@ -7,7 +7,7 @@ Maintainer: Debian Perl Group <[email protected]> Uploaders: Daniel Ruoso <[email protected]>, Krzysztof Krzyzaniak (eloy) <[email protected]>, Niko Tyni <[email protected]>, - gregor herrmann <[email protected]> + gregor herrmann <[email protected]>, Damyan Ivanov <[email protected]> Standards-Version: 3.7.3 Homepage: http://search.cpan.org/dist/JavaScript/ Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libjavascript-perl/ diff -u libjavascript-perl-1.08/debian/changelog libjavascript-perl-1.08/debian/changelog --- libjavascript-perl-1.08/debian/changelog +++ libjavascript-perl-1.08/debian/changelog @@ -1,3 +1,11 @@ +libjavascript-perl (1.08-1+lenny1) stable; urgency=low + + * Steal fix_context_destruction.patch from upstream SVN. Fixes a segfault + after calling non-present function. Closes: 564772 + * add myself to Uploaders + + -- Damyan Ivanov <[email protected]> Wed, 10 Feb 2010 08:02:09 +0200 + libjavascript-perl (1.08-1) unstable; urgency=low * New upstream release. diff -u libjavascript-perl-1.08/debian/patches/series libjavascript-perl-1.08/debian/patches/series --- libjavascript-perl-1.08/debian/patches/series +++ libjavascript-perl-1.08/debian/patches/series @@ -2,0 +3 @@ +fix_context_destruction.patch only in patch2: unchanged: --- libjavascript-perl-1.08.orig/debian/patches/fix_context_destruction.patch +++ libjavascript-perl-1.08/debian/patches/fix_context_destruction.patch @@ -0,0 +1,28 @@ +# Description: fix segmentation fault when evaluated JavaScript code calls an +# undefined external function +# Bug-Debian: 564772 +# Origin: upstream, svn://svn.versed.se/public/Perl/modules/JavaScript/trunk (revision 931) +--- a/lib/JavaScript/Context.pm ++++ b/lib/JavaScript/Context.pm +@@ -19,10 +19,8 @@ sub new { + + my $self = bless { _impl => $cx_ptr }, $pkg; + +- $Context{${$cx_ptr}} = $self; +- +- weaken($Context{$cx_ptr}); +- ++ $Context{$$cx_ptr} = $self; ++ weaken($Context{$$cx_ptr}); + $self->{runtime} = $runtime; + + return $self; +--- a/t/30-refcount.t ++++ b/t/30-refcount.t +@@ -31,5 +31,5 @@ my $rt = JavaScript::Runtime->new(); + is($sv->REFCNT, 2); + } + +- is($sv->REFCNT, 1); ++ is($sv->REFCNT, 0); + }
File lists identical (after any substitutions)
Control files: lines which differ (wdiff format)
------------------------------------------------
Depends: perl (>= [-5.10.0-10),-] {+5.10.0-19lenny2),+} perlapi-5.10.0, libc6
(>= 2.7-1), libmozjs1d (>= 1.9~b4)
Installed-Size: [-308-] {+304+}
[-Source: libjavascript-perl (1.08-1)-]
Version: [-1.08-1+b1-] {+1.08-1+lenny1+}
signature.asc
Description: Digital signature
