summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2007-09-27 14:41:11 +0000
committerThierry Vignaud <tv@mandriva.org>2007-09-27 14:41:11 +0000
commitda2fa96bb276cce53f475abc5a30852260c9e0e6 (patch)
treee3076036d0f8a9771607435d672606c2eb5fd3a3 /perl-install
parentdf3f1b0422b476f0a1c32dcd10d14ad951aa0a29 (diff)
downloaddrakx-da2fa96bb276cce53f475abc5a30852260c9e0e6.tar
drakx-da2fa96bb276cce53f475abc5a30852260c9e0e6.tar.gz
drakx-da2fa96bb276cce53f475abc5a30852260c9e0e6.tar.bz2
drakx-da2fa96bb276cce53f475abc5a30852260c9e0e6.tar.xz
drakx-da2fa96bb276cce53f475abc5a30852260c9e0e6.zip
(load_from_uri) we don't handle #foobar like anchors, so strip them
out of links in order to prevent segfaulting
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install/NEWS1
-rw-r--r--perl-install/interactive/gtk.pm1
2 files changed, 2 insertions, 0 deletions
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index 761b03f59..e6e5e8693 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -1,4 +1,5 @@
- help:
+ o do not segfault on #foobar like anchors
o try translated links first (#33679)
Version 10.4.216 - 27 September 2007, by Pascal "Pixel" Rigaux
diff --git a/perl-install/interactive/gtk.pm b/perl-install/interactive/gtk.pm
index 4b2bc2a56..5b078b0af 100644
--- a/perl-install/interactive/gtk.pm
+++ b/perl-install/interactive/gtk.pm
@@ -702,6 +702,7 @@ my $help_path = "/usr/share/doc/installer-help";
sub load_from_uri {
my ($document, $url) = @_;
+ $url =~ s/#.*$//; # prevent segfaults on anchors
$url = get_html_file($::o, $url);
my $str = scalar(cat_($url));
c::set_tagged_utf8($str);