diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2013-11-18 02:45:58 +0100 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2015-12-20 10:25:03 +0100 |
commit | 122658abc05374cbdbac4eef563265a1673da984 (patch) | |
tree | 7d94e790f7e2a77c8cccb6f7c76c5a3bcda2343e /mdkwebadmin.pl | |
parent | d3c03b5b1992e028d1239e5f04a19edd04f85830 (diff) | |
download | control-center-122658abc05374cbdbac4eef563265a1673da984.tar control-center-122658abc05374cbdbac4eef563265a1673da984.tar.gz control-center-122658abc05374cbdbac4eef563265a1673da984.tar.bz2 control-center-122658abc05374cbdbac4eef563265a1673da984.tar.xz control-center-122658abc05374cbdbac4eef563265a1673da984.zip |
use Gtk3 namespace instead of Gtk2
Diffstat (limited to 'mdkwebadmin.pl')
-rwxr-xr-x | mdkwebadmin.pl | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/mdkwebadmin.pl b/mdkwebadmin.pl index 85959189..60de0c06 100755 --- a/mdkwebadmin.pl +++ b/mdkwebadmin.pl @@ -39,16 +39,16 @@ unless ($::isEmbedded) { } gtkadd($w->{window}, - gtkpack_(Gtk2::VBox->new(0,5), - 1, Gtk2::Label->new(N("Enter the webmin address server below \n")), - 1, $ent = Gtk2::Entry->new(), - 0, Gtk2::HSeparator->new, + gtkpack_(Gtk3::VBox->new(0,5), + 1, Gtk3::Label->new(N("Enter the webmin address server below \n")), + 1, $ent = Gtk3::Entry->new(), + 0, Gtk3::HSeparator->new, 0, gtkpack(create_hbox(), - gtksignal_connect(Gtk2::Button->new(N("Connect")), clicked => sub { + gtksignal_connect(Gtk3::Button->new(N("Connect")), clicked => sub { $link = 'https://' . $ent->get_text() . ':10000/'; exec "$execbin $link"; }), - gtksignal_connect(Gtk2::Button->new(N("Abort")), clicked => \&quit)))); + gtksignal_connect(Gtk3::Button->new(N("Abort")), clicked => \&quit)))); $w->{window}->show_all; $w->main; |