Handles method GET.

[egate.git] / www / msearch.egw
diff --git a/www/msearch.egw b/www/msearch.egw

index dfc71e9..01fa9ab 100644 (file)
--- a/www/msearch.egw
+++ b/www/msearch.egw
@@ -1,6 +1,6 @@
  <html>
  {
-# $Id: msearch.egw,v 1.7 1995/12/22 14:21:15 adam Exp $
+# $Id: msearch.egw,v 1.10 1996/01/08 08:42:13 adam Exp $
  
      if {[info commands saveState] == ""} {
          source z39util.tcl
@@ -50,9 +50,10 @@
              html "Error</h3>\n<dd>NSD$code: $msg: $addinfo"
          } else {
              set r [z39$i.$setNo resultCount]
-            html "$r hits</h3>\n<dd>\n"
+            html "$r hits</h3>\n<dd>\n<ul>\n"
  
              display-rec 1 $hist($setNo,$i,offset) display-brief $i
+            html "</ul>"
          }
          html "\n"
      }
@@ -73,7 +74,7 @@
         html {"> New target </a>} " | \n"
      }
      html {<a href="http:} $env(SCRIPT_NAME)
-    html / $sessionId {/mquery.egw/} $host + $setNo
+    html / $sessionId {/mquery.egw/} $setNo
      if {$useIcons} {
          html {"><img src="/gif/button-new-query.gif" border=0></a>}
      } else {
@@ -82,6 +83,7 @@
  }
  
  {
+    if {!$debug} return
      html "<hr>\n"
      html "<h3>Debug information</h3>\n"
      html "sessionId: $sessionId <br>\n"