fix spinbutton warning

diff --git a/ChangeLog b/ChangeLog
index 0790bb49f8cf552f8cb8993d5e0d190260b18a5a..f9a12f2b83c6372d70af5b1619ce499eab42bfa8 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2009-07-17 12:03  mones   0.7.0svn271
+
+       * clawsker
+               Made code simpler and fix warning
+               initialising Gtk2::SpinButton
+
 2009-07-06 18:45  mones   0.7.0
 
        * VERSION

diff --git a/VERSION b/VERSION
index faef31a4357c48d6e4c55e84c8be8e3bc9055e20..684b103a1757887252b952e7cd86615e4deb2931 100644 (file)
--- a/VERSION
+++ b/VERSION
@@ -1 +1 @@
-0.7.0
+0.7.0svn271

diff --git a/clawsker b/clawsker
index 886ddd181d08b4c3f537e2e1eb0a1c59cf536293..53b70af32ff9598ad124ce0d46acdcc7c381623c 100755 (executable)
--- a/clawsker
+++ b/clawsker
@@ -473,10 +473,7 @@ sub new_text_box_for_int {
     my $hbox = Gtk2::HBox->new (FALSE, 5);
     my $glabel = Gtk2::Label->new ($label);
     my $pagei = int (($type[2] - $type[1]) / 10);
-    my $adjust = Gtk2::Adjustment->new (
-            $HPVALUE{$name}, $type[1], $type[2], 1, $pagei, 10
-       );
-    my $gentry = Gtk2::SpinButton->new ($adjust, 1, 0);
+    my $gentry = Gtk2::SpinButton->new_with_range ($type[1], $type[2], $pagei);
     $gentry->set_numeric (TRUE);
     $$hash{$key}[GUI] = $gentry;
     $gentry->signal_connect('value-changed' => sub {