/[libconf]/libconf/perl-Libconf/GUI/Gtk2.pm
ViewVC logotype

Diff of /libconf/perl-Libconf/GUI/Gtk2.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.13 by dams, Tue Oct 21 20:14:41 2003 UTC revision 1.14 by dams, Sat Oct 25 14:30:14 2003 UTC
# Line 90  sub buildWidget { Line 90  sub buildWidget {
90      if ($type eq 'BOOLEAN') {      if ($type eq 'BOOLEAN') {
91          $ret = Libconf::GUI::Gtk2::CheckButton->new($default, $ref_value, $data_mapping->{BOOLEAN}, @widget_options);          $ret = Libconf::GUI::Gtk2::CheckButton->new($default, $ref_value, $data_mapping->{BOOLEAN}, @widget_options);
92      } elsif ($type eq 'INTEGER') {      } elsif ($type eq 'INTEGER') {
93          $ret = Libconf::GUI::Gtk2::SpinButton->new($default, $ref_value, $data_mapping->{BOOLEAN}, @widget_options);          $ret = Libconf::GUI::Gtk2::SpinButton->new($default, $ref_value, $data_mapping->{INTEGER}, @widget_options);
94      } elsif ($type eq 'HOSTNAME') {      } elsif ($type eq 'HOSTNAME') {
95          $ret = Libconf::GUI::Gtk2::Hostname->new($default, $ref_value, $data_mapping->{HOSTNAME}, @widget_options);          $ret = Libconf::GUI::Gtk2::Hostname->new($default, $ref_value, $data_mapping->{HOSTNAME}, @widget_options);
96      } elsif ($type eq 'STRING') {      } elsif ($type eq 'STRING') {

Legend:
Removed from v.1.13  
changed lines
  Added in v.1.14

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26