cvs commit: p5ee/App-Widget/lib/App/Widget TabbedSelector.pm
[email protected] (Stephen Adkins)
| Newsgroups | perl.cvs.p5ee |
|---|---|
| Message-ID | <[email protected]> |
cvsuser 06/02/28 19:35:40
Modified: App-Widget/lib/App/Widget TabbedSelector.pm
Log:
minor
Revision Changes Path
1.3 +3 -3 p5ee/App-Widget/lib/App/Widget/TabbedSelector.pm
Index: TabbedSelector.pm
===================================================================
RCS file: /cvs/public/p5ee/App-Widget/lib/App/Widget/TabbedSelector.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- TabbedSelector.pm 27 Feb 2006 17:33:41 -0000 1.2
+++ TabbedSelector.pm 1 Mar 2006 03:35:40 -0000 1.3
@@ -40,7 +40,7 @@
sub _init {
my $self = shift;
$self->SUPER::_init(@_);
- if (! $self->get("selected")) {
+ if (! $self->{selected}) {
$self->select_first();
}
}