From 21909431521cdcaa28e166a40d51db777745bfcd Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Wed, 10 Sep 2008 15:02:38 +0000
Subject: (create_okcancel) fix position of cancel button in popups

---
 perl-install/ugtk2.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/ugtk2.pm')

diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index f32ca85dd..7e5650860 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -541,7 +541,7 @@ sub create_okcancel {
     # we put space to group buttons in two packs (but if there's only one when not in wizard mode)
     # but in the installer where all windows run in wizard mode because of design even when not in a wizard step
     $bprev = gtknew('Label') if !$cancel && $::Wizard_no_previous && !@left && !@right;
-    if ($::isWizard) {
+    if ($::isWizard || $w->{pop_it}) {
         # wizard mode: order is cancel/left_extras/white/right_extras/prev/next
         unshift @left, $w->{wizcancel} if !$::isInstall;
         push @right, $bprev, $bok;
-- 
cgit v1.2.1