Hello, We've just hit that same bug in Ubuntu when preparing for Ubuntu 10.04 to 12.04 upgrades without internet connectivity.
I'm attaching the patch we've applied to workaround/fix that problem. It's based on a similar change that was done to doc-base a while ago, basically implementing a local version of dirname. I have uploaded updated patches to precise-proposed and quantal a few minutes ago but don't expect any other issue with that package. -- Stéphane Graber Ubuntu developer http://www.ubuntu.com
Description: Copy DirName function from doc-base and use that instead of dirname() Author: Stéphane Graber <stgra...@ubuntu.com> Forwarded: no Last-Update: 2012-08-10 --- libxml-sax-perl-0.99+dfsg.orig/SAX.pm +++ libxml-sax-perl-0.99+dfsg/SAX.pm @@ -12,7 +12,6 @@ use Exporter (); @EXPORT_OK = qw(Namespaces Validation); -use File::Basename qw(dirname); use File::Spec (); use Symbol qw(gensym); use XML::SAX::ParserFactory (); # loaded for simplicity @@ -44,6 +43,13 @@ http://xml.org/sax/features/validation = =cut +sub _DirName { # {{{ + my @p = split '/', $_[0]; + return (join '/', @p[0..($#p-1)]) if $#p > 1; + return '/' if substr ($_[0], 0, 1) eq '/'; + return '.'; +} # }}} + sub load_parsers { my $class = shift; my $dir = shift; @@ -54,7 +60,7 @@ sub load_parsers { # get directory from wherever XML::SAX is installed if (!$dir) { $dir = $INC{'XML/SAX.pm'}; - $dir = dirname($dir); + $dir = _DirName($dir); } my $fh = gensym(); @@ -190,7 +196,7 @@ sub save_parsers { # get directory from wherever XML::SAX is installed my $dir = $INC{'XML/SAX.pm'}; - $dir = dirname($dir); + $dir = _DirName($dir); my $file = File::Spec->catfile($dir, "SAX", PARSER_DETAILS); chmod 0644, $file;
signature.asc
Description: OpenPGP digital signature
