From 4d476c3dc673142bf7a56eceeb3cbc5500a63846 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 18 Nov 2013 15:50:11 +0100 Subject: fix creating a SpinButton ->{lower} was deleted in the previous line (bug introduced with the first code drop by pixel in commit f6f78109c on Dec 2 2004) --- perl-install/mygtk3.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-install/mygtk3.pm b/perl-install/mygtk3.pm index 921c76b49..aa17b71b0 100644 --- a/perl-install/mygtk3.pm +++ b/perl-install/mygtk3.pm @@ -239,7 +239,7 @@ sub _gtk__SpinButton { if (!$w) { $opts->{adjustment} ||= do { add2hash_($opts, { step_increment => 1, page_increment => 5, page_size => 1, value => delete $opts->{lower} }); - Gtk3::Adjustment->new(delete $opts->{value}, delete $opts->{lower}, delete $opts->{upper}, delete $opts->{step_increment}, delete $opts->{page_increment}, delete $opts->{page_size}); + Gtk3::Adjustment->new(delete $opts->{value}, 0, delete $opts->{upper}, delete $opts->{step_increment}, delete $opts->{page_increment}, delete $opts->{page_size}); }; $w = Gtk3::SpinButton->new(delete $opts->{adjustment}, delete $opts->{climb_rate} || 0, delete $opts->{digits} || 0); } -- cgit v1.2.1