Enlightenment CVS committal
Author : leviathan
Project : e17
Module : libs/etk-perl
Dir : e17/libs/etk-perl/lib/Etk
Modified Files:
Constants.pm Simple.pm
Log Message:
TODO--
fix handling on image new from file
===================================================================
RCS file: /cvs/e/e17/libs/etk-perl/lib/Etk/Constants.pm,v
retrieving revision 1.17
retrieving revision 1.18
diff -u -3 -r1.17 -r1.18
--- Constants.pm 29 Jul 2007 07:56:12 -0000 1.17
+++ Constants.pm 6 Aug 2007 06:46:08 -0000 1.18
@@ -25,7 +25,7 @@
box combobox fillpolicy messagedialog progressbar scrolledview
toplevelwidget tree textblock table colorpicker mouse toolbar
- button shadow image entry popupwindow window swallow all
+ button shadow image entry popupwindow window swallow slider all
=cut
===================================================================
RCS file: /cvs/e/e17/libs/etk-perl/lib/Etk/Simple.pm,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -3 -r1.5 -r1.6
--- Simple.pm 29 Jan 2007 13:55:45 -0000 1.5
+++ Simple.pm 6 Aug 2007 06:46:08 -0000 1.6
@@ -43,10 +43,11 @@
return NewFromStock($arg1, $arg2);
} else {
if (defined $arg2) {
- return NewFromEdje($arg1, $arg2);
- } else {
- # XXX oops... from file requires a key now
- return NewFromFile($arg1, "");
+ if ($arg1 =~ /\.edj$/) {
+ return NewFromEdje($arg1, $arg2);
+ } else {
+ return NewFromFile($arg1, $arg2);
+ }
}
}
}
-------------------------------------------------------------------------
This SF.net email is sponsored by: Splunk Inc.
Still grepping through log files to find problems? Stop.
Now Search log events and configuration files using AJAX and a browser.
Download your FREE copy of Splunk now >> http://get.splunk.com/
_______________________________________________
enlightenment-cvs mailing list
enlightenment-cvs@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/enlightenment-cvs
