Index: openacs-4/packages/xotcl-core/tcl/30-widget-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/30-widget-procs.tcl,v
diff -u -r1.69 -r1.70
--- openacs-4/packages/xotcl-core/tcl/30-widget-procs.tcl	17 Dec 2018 10:39:11 -0000	1.69
+++ openacs-4/packages/xotcl-core/tcl/30-widget-procs.tcl	30 Jan 2019 20:27:48 -0000	1.70
@@ -195,7 +195,7 @@
   namespace eval ::html {}
   proc ::html::CSRFToken {} {
     ::if {[::info exists ::__csrf_token]} {
-      ::html::input -type hidden -name __csrf_token -value [::security::csrf::token] {}
+      ::html::input -type hidden -name __csrf_token -value $::__csrf_token {}
     }
   }