--- web.distrib/index.jim +++ web/index.jim @@ -29,6 +29,7 @@ lcn {} name {} force {} + extra {} } foreach line [string trim [split $cfgtext "\n"]] { set x [lassign [split $line |] k v] @@ -55,6 +56,11 @@ lappend cfg(force) $kv [join $x |] } } + default { + if {![string match {#*} $line]} { + lappend cfg(extra) $line + } + } } } @@ -293,6 +299,21 @@ } puts { + + +
+Extra configuration + +
+ Help here... +
+
+
--- web.distrib/save.jim +++ web/save.jim @@ -12,10 +12,20 @@ set lcn [cgi_get lcn ""] set name [cgi_get name ""] set force [cgi_get force ""] +set extra [cgi_get extra ""] set errs {} set fd [open $cf w] + +if {[string length $extra]} { + foreach line [split $extra "\n"] { + # Strip all whitespace + regsub -all -- {[[:space:]]+} $line "" line + if {![string length $line]} continue + puts $fd $line + } +} if {[string length $region]} { puts $fd "REGION|$region" --- web.distrib/script.js +++ web/script.js @@ -87,6 +87,7 @@ region: $('#region').val(), lcn: $('#lcnlist').val(), name: $('#dellist').val(), + extra: $('#extralist').val(), force: force };