From 79071d4f69624e551dfac70c8c89c659767ed86e Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 11 Jan 2005 08:44:34 +0000 Subject: cleanup --- perl-install/install_gtk.pm | 1 - 1 file changed, 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/install_gtk.pm b/perl-install/install_gtk.pm index 3a61df412..543edf386 100644 --- a/perl-install/install_gtk.pm +++ b/perl-install/install_gtk.pm @@ -209,7 +209,6 @@ q( #------------------------------------------------------------------------------ sub init_sizes() { ($::rootwidth, $::rootheight) = (Gtk2::Gdk->screen_width, Gtk2::Gdk->screen_height); - #- ($::rootheight, $::rootwidth) = (min(768, $::rootheight), min(1024, $::rootwidth)); $::stepswidth = $::rootwidth <= 640 ? 0 : 200 if !$::move; ($::logowidth, $::logoheight) = $::rootwidth <= 640 ? (0, 0) : (500, 40); ($::windowwidth, $::windowheight) = ($::rootwidth - $::stepswidth, $::rootheight - $::helpheight - $::logoheight); -- cgit v1.2.1