was checking for the wrong kind of object
was checking for the wrong kind of object

svn path=/trunk/; revision=995

cpanxaoc/perl-Gtk2,potyl/perl-Gtk2,cpanxaoc/perl-Gtk2,cpanxaoc/perl-Gtk2,potyl/perl-Gtk2,potyl/perl-Gtk2