diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-11-19 21:37:26 +0100 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-12-05 14:16:06 +0100 |
commit | 1a277c56674f3c6d60951c1f2a1312f1cd9235fe (patch) | |
tree | 927bfa97152c780879ab9ae4d9e4999e24c9d5a4 /Rpmdrake/gurpm.pm | |
parent | 0eb2e246db5367e5149bec12197e41707aeb7daf (diff) | |
download | rpmdrake-1a277c56674f3c6d60951c1f2a1312f1cd9235fe.tar rpmdrake-1a277c56674f3c6d60951c1f2a1312f1cd9235fe.tar.gz rpmdrake-1a277c56674f3c6d60951c1f2a1312f1cd9235fe.tar.bz2 rpmdrake-1a277c56674f3c6d60951c1f2a1312f1cd9235fe.tar.xz rpmdrake-1a277c56674f3c6d60951c1f2a1312f1cd9235fe.zip |
use (my|u)gtk3 instead of *tk2
Diffstat (limited to 'Rpmdrake/gurpm.pm')
-rw-r--r-- | Rpmdrake/gurpm.pm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/Rpmdrake/gurpm.pm b/Rpmdrake/gurpm.pm index ea77d419..c7444c52 100644 --- a/Rpmdrake/gurpm.pm +++ b/Rpmdrake/gurpm.pm @@ -25,16 +25,16 @@ package Rpmdrake::gurpm; use strict; use lib qw(/usr/lib/libDrakX); -use mygtk2 qw(gtknew); #- do not import anything else, especially gtkadd() which conflicts with ugtk2 one -use ugtk2 qw(:all); -use base qw(ugtk2); +use mygtk3 qw(gtknew); #- do not import anything else, especially gtkadd() which conflicts with ugtk3 one +use ugtk3 qw(:all); +use base qw(ugtk3); use Time::HiRes; use feature 'state'; sub new { my ($self, $title, $initializing, %options) = @_; - my $mainw = bless(ugtk2->new($title, %options, default_width => 600, width => 600), $self); + my $mainw = bless(ugtk3->new($title, %options, default_width => 600, width => 600), $self); $::main_window = $mainw->{real_window}; $mainw->{label} = gtknew('Label', text => $initializing, alignment => [ 0.5, 0 ]); # size label's heigh to 2 lines in order to prevent dummy vertical resizing: @@ -74,7 +74,7 @@ sub progress { sub DESTROY { my ($self) = @_; - mygtk2::may_destroy($self); + mygtk3::may_destroy($self); $self and $self->destroy; $self = undef; $self->{cancel} = undef; #- in case we'll do another one later |