This is an automated email from the git hooks/post-receive script. nodens-guest pushed a commit to annotated tag OpenPGP_Applet-0.9 in repository openpgp-applet.
commit db82349f9dd426ff185f95247a090bbcf754b896 Author: Clément Hermann (nodens) <[email protected]> Date: Sat Dec 6 21:26:20 2014 +0100 add a parameter (dialog parent window) to app_exit() --- bin/openpgp-applet | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/bin/openpgp-applet b/bin/openpgp-applet index e3d70bf..3d4e151 100755 --- a/bin/openpgp-applet +++ b/bin/openpgp-applet @@ -156,7 +156,8 @@ sub all_clipboards { } sub app_exit { - my $dialog = Gtk2::MessageDialog->new($main_window, [qw/modal destroy-with-parent/], + my $parent = shift; + my $dialog = Gtk2::MessageDialog->new($parent, [qw/modal destroy-with-parent/], 'warning', 'yes-no', $encoding->decode(__("You are about to exit OpenPGP Applet. Are you sure?"))); @@ -175,7 +176,7 @@ sub build_statusicon { my $menu = Gtk2::Menu->new; my $mexit = Gtk2::MenuItem->new($encoding->decode(__("Exit"))); - $mexit->signal_connect('activate' => sub { app_exit(); }); + $mexit->signal_connect('activate' => sub { app_exit($main_window); }); my $mabout = Gtk2::MenuItem->new($encoding->decode(__("About"))); $mabout->signal_connect('activate' => sub { Gtk2->show_about_dialog( $main_window, -- Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/openpgp-applet.git _______________________________________________ Pkg-perl-cvs-commits mailing list [email protected] http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits
