diff options
| -rw-r--r-- | perl-install/NEWS | 1 | ||||
| -rwxr-xr-x | perl-install/standalone/display_help | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS index 5a3c11b81..c0f783244 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,5 +1,6 @@ - partitioning wizard: o only display Help button in install +- display_help: handle window.close() events (#55099) Version 12.77 - 30 October 2009 diff --git a/perl-install/standalone/display_help b/perl-install/standalone/display_help index b7e42168d..1d626d24d 100755 --- a/perl-install/standalone/display_help +++ b/perl-install/standalone/display_help @@ -27,6 +27,7 @@ use ugtk2 qw(:wrappers :create); use Gtk2::WebKit; my $view = gtknew('WebKit_View', no_popup_menu => 1); +$view->signal_connect('close-web-view', sub { ugtk2::exit(0) }); $view->open($ARGV[0]); |