Major revision. Single-target result set can be reached from the
[egate.git] / www / nwi.egw
index ef66aec..a42ac74 100644 (file)
@@ -1,6 +1,6 @@
 <html>
 {
-# $Id: nwi.egw,v 1.2 1996/03/12 16:30:27 adam Exp $
+# $Id: nwi.egw,v 1.3 1996/03/13 14:07:30 adam Exp $
     source ztargets.conf
 
     set scriptQuery nwi.egw
@@ -10,8 +10,6 @@
     if {[info commands saveState] == ""} {
         source z39util.tcl
     }
-    set mMode 1
-
     if {![info exists debug]} {
         if {[lindex $sessionParms 1] == "1"} {
             set debug 1
     set useIcons 1
     button-main
 
-    set initSet [lindex $sessionParms 0]
     set curSort score
     set curFormat brief
     set curEntry {}
+
+    set initSet 0
     catch {
-        if {$initSet > 0} {
+        set initSet [lindex $sessionParms 0]
+        if {$initSet < 0} {
+            set initSet 0
+        }
+        if {$initSet} {
             for {set i 1} {$i <= $hist($initSet,0,host)} {incr i} {
                 lappend curTargets $hist($initSet,$i,host)
             }