diff options
| -rw-r--r-- | perl-install/install/NEWS | 1 | ||||
| -rw-r--r-- | perl-install/interactive/gtk.pm | 1 |
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); |