Updated for YAZ 1.7. HTML output tidy up. Added LOC target.
[egate.git] / www / query.egw
index 74ad296..cd40d69 100644 (file)
@@ -1,6 +1,6 @@
 <html>
 {
-# $Id: query.egw,v 1.39 1996/03/14 11:50:47 adam Exp $
+# $Id: query.egw,v 1.41 2001/02/26 14:32:36 adam Exp $
 
     if {[info commands saveState] == ""} {
         source z39util.tcl
@@ -98,6 +98,7 @@ proc ok-response {} {
 
     set useIcons 1
     button-main
+    button-feedback
     button-new-target
     if {[lsearch [z390 options] scan] >= 0} {
         button-scan-window $setNo
@@ -117,7 +118,7 @@ proc ok-response {} {
         set databaseDefault $hist($oSetNo,0,database)
     }
     
-    html {<form action="http:} $env(SCRIPT_NAME)
+    html {<form action="} $env(SCRIPT_NAME)
     html / $sessionId {/search.egw/} $setNo + 0 {" method=get>} \n
     set nodb [llength $databases]
     if {$nodb > 1} {
@@ -208,6 +209,7 @@ proc ok-response {} {
 
     set useIcons 0
     button-main
+    button-feedback
     button-new-target
     if {[lsearch [z390 options] scan] >= 0} {
         button-scan-window $setNo