diff options
| -rw-r--r-- | gurpm/RPMProgressDialog.pm | 6 | ||||
| -rw-r--r-- | gurpmi.pm | 4 |
2 files changed, 5 insertions, 5 deletions
diff --git a/gurpm/RPMProgressDialog.pm b/gurpm/RPMProgressDialog.pm index ae6b4950..84b1767c 100644 --- a/gurpm/RPMProgressDialog.pm +++ b/gurpm/RPMProgressDialog.pm @@ -5,7 +5,7 @@ package gurpm::RPMProgressDialog; #- Copyright (C) 2013 Mageia # Sharing code from gurpmi2 && Rpmdrake::gurpm -# Gtk2 only (no ugtk2/mygtk2) as it's used by gurpmi too... +# Gtk2 only (no ugtk3/mygtk3) as it's used by gurpmi too... # =head1 SYNOPSYS @@ -69,7 +69,7 @@ Arguments are an urpm object and a quit routine reference. sub new { my ($self, $global_urpm, $o_quit, $o_no_modal) = @_; - # my $w = ugtk2->new($title, %options, default_width => 600, width => 600); + # my $w = ugtk3->new($title, %options, default_width => 600, width => 600); my $w = $mainw = bless(Gtk2::Window->new('toplevel'), $self); $old_main_window = $::main_window; @@ -133,7 +133,7 @@ sub label { } -# From ugtk2.pm/mygtk2.pm: +# From ugtk3.pm/mygtk3.pm: sub gtk_new_Label_Left { my ($text) = @_; my $w = Gtk2::Label->new($text); @@ -185,7 +185,7 @@ Creates a scrolled window around the $W widget =cut -# copied from ugtk2: +# copied from ugtk3: sub create_scrolled_window { my ($W, $o_policy, $o_viewport_shadow) = @_; my $w = Gtk2::ScrolledWindow->new(undef, undef); @@ -201,7 +201,7 @@ sub create_scrolled_window { $W->show; if (ref($W) =~ /Gtk2::TextView|Gtk2::TreeView/) { my $f = Gtk2::Frame->new; - $w->show; # unlike ugtk2, we'd to do this explicitely... + $w->show; # unlike ugtk3, we'd to do this explicitely... $f->set_shadow_type('in'); $f->add($w); $f; |