Enlightenment CVS committal
Author : codewarrior
Project : e17
Module : proto
Dir : e17/proto/etk-perl/lib/Etk
Modified Files:
ProgressBar.pm
Log Message:
- decrement perl version
- work on progress bar test
- fixes in ProgressBar.pm
===================================================================
RCS file: /cvs/e/e17/proto/etk-perl/lib/Etk/ProgressBar.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -3 -r1.1 -r1.2
--- ProgressBar.pm 7 Jun 2006 11:58:34 -0000 1.1
+++ ProgressBar.pm 7 Jun 2006 17:37:21 -0000 1.2
@@ -68,7 +68,7 @@
sub PulseStepGet
{
my $self = shift;
- return Etk::etk_progress_bar_pulse_step_get($self-{WIDGET});
+ return Etk::etk_progress_bar_pulse_step_get($self->{WIDGET});
}
sub DirectionSet
@@ -81,7 +81,7 @@
sub DirectionGet
{
my $self = shift;
- return Etk::etk_progress_bar_direction_get($self-{WIDGET});
+ return Etk::etk_progress_bar_direction_get($self->{WIDGET});
}
1;
_______________________________________________
enlightenment-cvs mailing list
enlightenment-cvs@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/enlightenment-cvs
