Package: libsvn-perl
Version: 1.4.2dfsg1-2
Severity: normal
Tags: patch
Running following command
perl -cw perl-program.pl
Which uses the SVN:: package produces error:
Use of uninitialized value in string eq at /usr/lib/perl5/SVN/Core.pm line
410 during global destruction.
Segmentation fault
The line 410 is at -!-:
sub DESTROY {
return if $globaldestroy;
my $self = shift;
-!- if ($$self eq $SVN::_Core::current_pool) {
$SVN::_Core::current_pool = pop @POOLSTACK;
}
if (exists $WRAPPOOL{$self}) {
delete $WRAPPOOL{$self};
}
else {
apr_pool_destroy ($$self)
}
}
Following patch fixes it.
--- Core.pm 2006-12-02 20:29:37+02 1.1
+++ Core.pm 2006-12-02 20:32:27+02 1.2
@@ -407,6 +407,10 @@
sub DESTROY {
return if $globaldestroy;
my $self = shift;
+
+ defined $$self or return;
+ defined $SVN::_Core::current_pool or return;
+
if ($$self eq $SVN::_Core::current_pool) {
$SVN::_Core::current_pool = pop @POOLSTACK;
}
-- System Information:
Debian Release: 4.0
APT prefers unstable
APT policy: (500, 'unstable'), (500, 'stable')
Architecture: i386 (i686)
Shell: /bin/sh linked to /bin/dash
Kernel: Linux 2.6.18-1-686
Locale: LANG=C, LC_CTYPE=C (charmap=ISO-8859-1) (ignored: LC_ALL set to en_US)
Versions of packages libsvn-perl depends on:
ii libapr1 1.2.7-8 The Apache Portable Runtime Librar
ii libc6 2.3.6.ds1-8 GNU C Library: Shared libraries
ii libsvn1 1.4.2dfsg1-2 Shared libraries used by Subversio
ii perl 5.8.8-6.1 Larry Wall's Practical Extraction
ii perl-base [perlapi-5.8.8] 5.8.8-6.1 The Pathologically Eclectic Rubbis
libsvn-perl recommends no packages.
-- no debconf information
--
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]
