Gtk2::SpinButton For Hex

["Williams, James P2" <james p2 williams lmco com>]

How can I use a Gtk2::SpinButton to prompt for an integer expressed in hex?  I’ve tried the following, but it fails.

 

   use strict;

   use warnings;

 

   use Glib qw(TRUE FALSE);

   use Gtk2 qw(-init);

 

   my($spin)=Gtk2::SpinButton->new_with_range(0,1000,1);

   $spin->set_numeric(FALSE);

   $spin->signal_connect(output => \&outputCB);

 

   my($win)=new Gtk2::Window();

   $win->add($spin);

   $win->show_all();

 

   Gtk2->main();

 

   sub outputCB

   {

      my($spin)= _;

      my($value)=$spin->get_adjustment()->get_value();

 

      $spin->set_text(sprint ‘%X’,$value);

   }

 

The text appears to be correct while I hold either arrow button down; I see hex values incrementing.  However, single clicks of an arrow button fail if the displayed text contains A-F.  Hitting the Enter key also fails on the same values.  In both cases, the text changes to a decimal integer.

 

Thanks.

 

Jim