--- 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
};