diff options
| author | Olivier Blin <oblin@mandriva.com> | 2008-03-14 16:30:18 +0000 |
|---|---|---|
| committer | Olivier Blin <oblin@mandriva.com> | 2008-03-14 16:30:18 +0000 |
| commit | 0b9d527a83079a9c5c1da7b292de54ea82c3b648 (patch) | |
| tree | 9c921e04f25a7b9ad6597384f1683ab1356f73ed /perl-install/ugtk2.pm | |
| parent | 7383b2be362359d851516d91935a3af8d8ff627b (diff) | |
| download | drakx-0b9d527a83079a9c5c1da7b292de54ea82c3b648.tar drakx-0b9d527a83079a9c5c1da7b292de54ea82c3b648.tar.gz drakx-0b9d527a83079a9c5c1da7b292de54ea82c3b648.tar.bz2 drakx-0b9d527a83079a9c5c1da7b292de54ea82c3b648.tar.xz drakx-0b9d527a83079a9c5c1da7b292de54ea82c3b648.zip | |
add urgency support in Gtk2::Notify::Queue
Diffstat (limited to 'perl-install/ugtk2.pm')
| -rw-r--r-- | perl-install/ugtk2.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm index ab26bda46..ecccc03b6 100644 --- a/perl-install/ugtk2.pm +++ b/perl-install/ugtk2.pm @@ -1578,6 +1578,7 @@ sub show { my $info = $self->{queue}[0]; my $notification = Gtk2::Notify->new_with_status_icon($info->{title}, $info->{message}, undef, $self->{statusicon}); $notification->set_icon_from_pixbuf($info->{pixbuf}); + $notification->set_urgency($info->{urgency}) if $info->{urgency}; foreach my $a (@{$info->{actions} || []}) { $notification->add_action( $a->{action}, $a->{label}, |