diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2006-04-07 15:15:59 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2006-04-07 15:15:59 +0000 |
commit | e7daabab3bbaa5b0c0c2a403b4c817e963be32e8 (patch) | |
tree | 01f6dea9f1b70c8f57abd59ab88f9edd9c9603e7 /mdkapplet | |
parent | e33aea3225f78a79a680884c806065b361829b73 (diff) | |
download | mgaonline-e7daabab3bbaa5b0c0c2a403b4c817e963be32e8.tar mgaonline-e7daabab3bbaa5b0c0c2a403b4c817e963be32e8.tar.gz mgaonline-e7daabab3bbaa5b0c0c2a403b4c817e963be32e8.tar.bz2 mgaonline-e7daabab3bbaa5b0c0c2a403b4c817e963be32e8.tar.xz mgaonline-e7daabab3bbaa5b0c0c2a403b4c817e963be32e8.zip |
fork a browser on Mandriva Online website when clicking on the URL
Diffstat (limited to 'mdkapplet')
-rwxr-xr-x | mdkapplet | 6 |
1 files changed, 6 insertions, 0 deletions
@@ -27,6 +27,7 @@ use lib qw(/usr/lib/libDrakX); use standalone; # for explanations use interactive; use common; +use run_program; use Gtk2::Pango; @@ -473,6 +474,11 @@ sub setState { my $w = gtkset_name(Gtk2::AboutDialog->new, N("Mandriva Online %s"), $ver); $w->set_version($ver); $w->set_copyright(N("Copyright (C) %s by Mandriva", '2001-2006')); + $w->set_url_hook(sub { + my (undef, $url) = @_; + run_program::raw({ detach => 1 }, 'www-browser', $url); + }); + my $url = $online_site; $url =~ s/^https:/http:/; $w->set_website($url); |