Your message dated Fri, 4 Jul 2008 02:32:49 -0500
with message-id <[EMAIL PROTECTED]>
and subject line Re: Bug#401340: libsvn-perl: Bug still present
has caused the Debian Bug report #401340,
regarding libsvn-perl: [PATCH] segmention fault. Use of uninitialized value in
string eq at /usr/lib/perl5/SVN/Core.pm line 410 during global destruction.
to be marked as done.
This means that you claim that the problem has been dealt with.
If this is not the case it is now your responsibility to reopen the
Bug report if necessary, and/or fix the problem forthwith.
(NB: If you are a system administrator and have no idea what this
message is talking about, this may indicate a serious mail system
misconfiguration somewhere. Please contact [EMAIL PROTECTED]
immediately.)
--
401340: http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=401340
Debian Bug Tracking System
Contact [EMAIL PROTECTED] with problems
--- Begin Message ---
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
--- End Message ---
--- Begin Message ---
Version: 1.5.0dfsg1-2
This bug appears to have been fixed sometime in the Subversion 1.5
timeframe. At least, I can no longer reproduce it.
--
Peter Samuelson | org-tld!p12n!peter | http://p12n.org/
--- End Message ---
