[interchange-cvs] interchange - racke modified code/Widget/uploadhelper.widget
interchange-cvs at icdevgroup.org
interchange-cvs at icdevgroup.org
Thu Jul 17 14:32:54 UTC 2008
User: racke
Date: 2008-07-17 14:32:54 GMT
Modified: code/Widget uploadhelper.widget
Log:
notes added
Revision Changes Path
1.5 interchange/code/Widget/uploadhelper.widget
rev 1.5, prev_rev 1.4
Index: uploadhelper.widget
===================================================================
RCS file: /var/cvs/interchange/code/Widget/uploadhelper.widget,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -r1.4 -r1.5
--- uploadhelper.widget 30 Mar 2007 23:40:58 -0000 1.4
+++ uploadhelper.widget 17 Jul 2008 14:32:54 -0000 1.5
@@ -5,7 +5,7 @@
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version. See the LICENSE file for details.
#
-# $Id: uploadhelper.widget,v 1.4 2007-03-30 23:40:58 pajamian Exp $
+# $Id: uploadhelper.widget,v 1.5 2008-07-17 14:32:54 racke Exp $
CodeDef uploadhelper Widget 1
CodeDef uploadhelper Description File upload
@@ -13,6 +13,8 @@
sub {
# $column, $value, $record->{outboard}, $record->{width}
my ($opt) = @_;
+::logError("Parameters for Image upload widget: " . ::uneval($opt));
+
my $name = $opt->{name};
my $val = $opt->{value};
my $path = $opt->{path} || $opt->{outboard};
More information about the interchange-cvs
mailing list