From b776847a1aaf534642e441959938a62864d6173f Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Tue, 12 Feb 2008 09:36:44 +0000 Subject: (_gtk__Sexy_IconEntry) handle 'icon-pressed' signal too --- perl-install/mygtk2.pm | 1 + 1 file changed, 1 insertion(+) (limited to 'perl-install/mygtk2.pm') diff --git a/perl-install/mygtk2.pm b/perl-install/mygtk2.pm index f3c1d44aa..4ba7650bf 100644 --- a/perl-install/mygtk2.pm +++ b/perl-install/mygtk2.pm @@ -408,6 +408,7 @@ sub _gtk__Sexy_IconEntry { } $w->signal_connect('icon-released' => delete $opts->{'icon-released'}) if exists $opts->{'icon-released'}; + $w->signal_connect('icon-pressed' => delete $opts->{'icon-pressed'}) if exists $opts->{'icon-pressed'}; _gtk__Entry($w, $opts); } -- cgit v1.2.1