diff options
| author | Thierry Vignaud <tv@mandriva.org> | 2007-09-27 14:41:11 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mandriva.org> | 2007-09-27 14:41:11 +0000 |
| commit | da2fa96bb276cce53f475abc5a30852260c9e0e6 (patch) | |
| tree | e3076036d0f8a9771607435d672606c2eb5fd3a3 /perl-install/interactive | |
| parent | df3f1b0422b476f0a1c32dcd10d14ad951aa0a29 (diff) | |
| download | drakx-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/interactive')
| -rw-r--r-- | perl-install/interactive/gtk.pm | 1 |
1 files changed, 1 insertions, 0 deletions
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); |