You are viewing a plain text version of this content. The canonical link for it is here.
Posted to rivet-dev@tcl.apache.org by ka...@apache.org on 2009/12/08 17:19:46 UTC

svn commit: r888462 - /tcl/rivet/trunk/rivet/packages/form/form.tcl

Author: karl
Date: Tue Dec  8 16:19:46 2009
New Revision: 888462

URL: http://svn.apache.org/viewvc?rev=888462&view=rev
Log:
Fix additional errors in prior commit.  All new methods now generate properly.

Modified:
    tcl/rivet/trunk/rivet/packages/form/form.tcl

Modified: tcl/rivet/trunk/rivet/packages/form/form.tcl
URL: http://svn.apache.org/viewvc/tcl/rivet/trunk/rivet/packages/form/form.tcl?rev=888462&r1=888461&r2=888462&view=diff
==============================================================================
--- tcl/rivet/trunk/rivet/packages/form/form.tcl (original)
+++ tcl/rivet/trunk/rivet/packages/form/form.tcl Tue Dec  8 16:19:46 2009
@@ -360,35 +360,35 @@
     # search -- emit an HTML 5 "search" form field
     #
     method search {name args} {
-        eval search range $name $args
+        eval field search $name $args
     }
 
     #
     # tel -- emit an HTML 5 "tel" form field
     #
     method tel {name args} {
-        eval tel range $name $args
+        eval field tel $name $args
     }
 
     #
     # time -- emit an HTML 5 "time" form field
     #
     method time {name args} {
-        eval time range $name $args
+        eval field time $name $args
     }
 
     #
     # url -- emit an HTML 5 "url" form field
     #
     method url {name args} {
-        eval url range $name $args
+        eval field url $name $args
     }
 
     #
     # week -- emit an HTML 5 "week" form field
     #
     method week {name args} {
-        eval week range $name $args
+        eval field week $name $args
     }
 
     #



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