- html "<h2> Search in databases </h2>\n"
- html {<form action="http://} $env(SERVER_NAME) $env(SCRIPT_NAME)
+ if {$setNo > 1 && $hist([expr $setNo - 1],host) == $host} {
+ set oSetNo [expr $setNo - 1]
+ set databaseDefault $hist($oSetNo,database)
+ } else {
+ set databaseDefault [lindex $databases 0]
+ set oSetNo 0
+ }
+
+ html {<form action="http:} $env(SCRIPT_NAME)