Index: openacs-4/packages/xowiki/tcl/xowiki-mode-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-mode-procs.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/xowiki/tcl/xowiki-mode-procs.tcl 7 Aug 2017 23:48:30 -0000 1.2 +++ openacs-4/packages/xowiki/tcl/xowiki-mode-procs.tcl 7 Jul 2018 10:58:20 -0000 1.3 @@ -41,7 +41,10 @@ return [ad_get_client_property -cache_only t xowiki $mode_name] } - :public method toggle {} { + :public method toggle {} { + # + # Switch state of the toggle + # set oldState [:get] :set [expr {!$oldState}] }