Index: openacs-4/packages/xowiki/tcl/repeat-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/repeat-procs.tcl,v diff -u -r1.14.2.3 -r1.14.2.4 --- openacs-4/packages/xowiki/tcl/repeat-procs.tcl 7 Apr 2019 15:46:13 -0000 1.14.2.3 +++ openacs-4/packages/xowiki/tcl/repeat-procs.tcl 9 Apr 2019 14:08:12 -0000 1.14.2.4 @@ -1,6 +1,6 @@ ::xo::library doc { - Form-field "repeat" + Form-field "repeat" @author Gustaf Neumann @creation-date 2013-02-27 @@ -11,7 +11,7 @@ namespace eval ::xowiki::formfield { # TODO: - # - improve styling (e.g. remove/deactivate controls for + # - improve styling (e.g. remove/deactivate controls for # addition/deletion, when min/max is reached) # - test for more input types # - maybe deactivate container display for "repeat=1..1" @@ -21,7 +21,7 @@ set oldClass [:info class] :class ::xowiki::formfield::repeatContainer - + if {$oldClass ne [:info class]} { :reset_parameter set :__state reset @@ -74,7 +74,7 @@ repeatContainer instproc initialize {} { ::xo::Page requireJS "/resources/xowiki/repeat.js" ::xo::Page requireJS urn:ad:js:jquery - + if {[info exists :__initialized_repeat]} {return} next @@ -150,7 +150,7 @@ #ns_log notice "dynamic repeat field: add component on the fly: $componentItemSpec" :add_component $componentItemSpec } - + repeatContainer instproc set_compound_value {value} { # # Before setting compound values, check if we have the repeat @@ -275,7 +275,7 @@ } } } - + repeatContainer instproc validate {obj} { foreach c [lrange [:components] 1 [:count_values [:value]]] { set result [$c validate $obj]