From 63b96a79bf9ea443f056df91035d92ae8d720078 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Mon, 20 Jan 2014 01:38:26 +0100
Subject: fix inverted dimensions

bug introduced in commit fadc8b97ed98977bf264d87d62c33e779f299716
important to fix before next commit
---
 perl-install/mygtk3.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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

diff --git a/perl-install/mygtk3.pm b/perl-install/mygtk3.pm
index 3f75d4cc6..ff27ecbe1 100644
--- a/perl-install/mygtk3.pm
+++ b/perl-install/mygtk3.pm
@@ -1333,7 +1333,7 @@ sub _create_Window {
 	my ($wi, $he);
 	$w->signal_connect(size_allocate => sub {
 	    my (undef, $event) = @_;
-	    my @w_size = @$event{qw(height width)};
+	    my @w_size = @$event{qw(width height)};
 
 	    # ignore bogus sizing events:
 	    return if $w_size[2] < 5;
-- 
cgit v1.2.1