in reply to Re^3: Help with JComboBox
in thread Help with JComboBox

Hello, I am using the JCombobox module. All of the time, when I select an option from the combobox, I receive the message: 'Use of uninitialized value in pattern match (m//) at ../JComboBox.pm line 567' I have tried thousands of things, but nothing seem to work. Is there anyone who has an idea? Thanks in advance, Ton

Replies are listed 'Best First'.
Re^5: Help with JComboBox
by JamesNC (Chaplain) on Feb 14, 2005 at 14:49 UTC
    Lines 566-569 of my version of JComboBox.pm is 
      my $mode = $cw->cget('-validate');
  if ($mode =~ /match/) {
    $cw->configure(-validate => 'none');
  }

    [download]
    $mode must be undefined and as a result, issues that warning.

    The code can be re-written to check before it tries to regex. You can change the code in the module to something like: 
      my $mode = $cw->cget('-validate');
  if (defined $mode && $mode =~ /match/) {  # <== change
    $cw->configure(-validate => 'none');
  }

    [download]
    And that will fix the warning. If you are using -validate make sure you aren't pointing to an undef value. All the code does is set -validate to 'none' if it is set to 'match'. It is in the SetSelectedIndex subroutine.

    JamesNC
[reply]
[d/l]
[select]

      Yes, this is one way of going about fixing it - I have also suggested doing something like:

        my $mode = $cw->cget('-validate') || "none";

      [download]

      To ensure that there was a value. The thing is it should never have been left to default to undef like it had. I think my preferred fix would be to set a default from the very start ... say at line 207:

         -validate => [qw/METHOD validate Validate none/],

      [download]

      It's worth mentioning that the newer versions of JComboBox don't have this problem. The newer version also has features that look like they would have helped folks who have posted here before.

      This is probably the first time I've ever checked perlmonks for problems encountered with JComboBox -- I find it a little odd that the questions weren't posted to comp.lang.perl.tk, but I'm glad that folks were able to get help with it, or find better solutions.

      Rob
[reply]
[d/l]
[select]
        Hi Rob,

        I am using "0.02" version of JCombobox.pm. Which is the latest version - right?

        Ton
[reply]
      Thanks JamesNC - that works! The message is not being generated anymore...!
[reply]

In Section Seekers of Perl Wisdom