You are viewing a plain text version of this content. The canonical link for it is here.
Posted to site-cvs@tcl.apache.org by mx...@apache.org on 2016/11/22 13:56:12 UTC

svn commit: r1770840 - in /tcl/rivet/trunk: ChangeLog rivet/packages/form/form.tcl rivet/packages/session/session-class.tcl

Author: mxmanghi
Date: Tue Nov 22 13:56:12 2016
New Revision: 1770840

URL: http://svn.apache.org/viewvc?rev=1770840&view=rev
Log:
    * rivet/packages/form/form.tcl: fully qualifying mod_rivet commands, fixed 'file' method that emits an 'email' HTML input element


Modified:
    tcl/rivet/trunk/ChangeLog
    tcl/rivet/trunk/rivet/packages/form/form.tcl
    tcl/rivet/trunk/rivet/packages/session/session-class.tcl

Modified: tcl/rivet/trunk/ChangeLog
URL: http://svn.apache.org/viewvc/tcl/rivet/trunk/ChangeLog?rev=1770840&r1=1770839&r2=1770840&view=diff
==============================================================================
--- tcl/rivet/trunk/ChangeLog (original)
+++ tcl/rivet/trunk/ChangeLog Tue Nov 22 13:56:12 2016
@@ -1,7 +1,8 @@
 2016-11-22 Massimo Manghi <mx...@apache.org>
     * rivet/packages/session/session-class.tcl:
     * rivet/packages/form/form.tcl,form2.tcl: now
-    fully qualifying mod_rivet commands
+    fully qualifying mod_rivet commands, fixed
+    'file' method that emits an 'email' HTML input element
     * doc/xml/formbroker.xml: correct coding example
 
 2016-11-19 Massimo Manghi <mx...@apache.org>

Modified: tcl/rivet/trunk/rivet/packages/form/form.tcl
URL: http://svn.apache.org/viewvc/tcl/rivet/trunk/rivet/packages/form/form.tcl?rev=1770840&r1=1770839&r2=1770840&view=diff
==============================================================================
--- tcl/rivet/trunk/rivet/packages/form/form.tcl (original)
+++ tcl/rivet/trunk/rivet/packages/form/form.tcl Tue Nov 22 13:56:12 2016
@@ -353,7 +353,7 @@ package provide form 1.0
     # file -- emit an HTML 5 "file" form field
     #
     method file {name args} {
-        eval field email $name $args
+        eval field file $name $args
     }
 
     #

Modified: tcl/rivet/trunk/rivet/packages/session/session-class.tcl
URL: http://svn.apache.org/viewvc/tcl/rivet/trunk/rivet/packages/session/session-class.tcl?rev=1770840&r1=1770839&r2=1770840&view=diff
==============================================================================
--- tcl/rivet/trunk/rivet/packages/session/session-class.tcl (original)
+++ tcl/rivet/trunk/rivet/packages/session/session-class.tcl Tue Nov 22 13:56:12 2016
@@ -106,7 +106,7 @@ package require Itcl
     constructor {args} {
 	eval configure $args
     	$dioObject registerSpecialField $sessionTable session_update_time NOW
-	    $dioObject registerSpecialField $sessionTable session_start_time NOW
+	$dioObject registerSpecialField $sessionTable session_start_time NOW
     }
 
     method status {args} {



---------------------------------------------------------------------
To unsubscribe, e-mail: site-cvs-unsubscribe@tcl.apache.org
For additional commands, e-mail: site-cvs-help@tcl.apache.org