Added CHANGELOG files.

diff --git a/CHANGELOG.email b/CHANGELOG.email
new file mode 100644 (file)
index 0000000..a21a5d1
--- /dev/null
+++ b/CHANGELOG.email
@@ -0,0 +1,4 @@
+$Id: CHANGELOG.email,v 1.1 1996/09/03 14:06:37 adam Exp $
+
+09/03/96 Release: 1.0.
+---------------------------------------------------------------------

diff --git a/CHANGELOG.web b/CHANGELOG.web
new file mode 100644 (file)
index 0000000..3897b76
--- /dev/null
+++ b/CHANGELOG.web
@@ -0,0 +1,7 @@
+$Id: CHANGELOG.web,v 1.1 1996/09/03 14:06:38 adam Exp $
+
+09/03/96 Release: 1.0.
+---------------------------------------------------------------------
+
+09/03/96 Bug fix: Extra "<li>" sometimes inserted in when displaying
+         records after piggy-back searches.

diff --git a/Makefile.email b/Makefile.email
index bb41f7b..4acddf0 100644 (file)
--- a/Makefile.email
+++ b/Makefile.email
@@ -1,7 +1,7 @@
 # Top level Makefile for the Email - Z39.50 gateway
 # Europagate, 1995-1996.
 #
-# $Id: Makefile.email,v 1.5 1996/08/28 08:33:45 adam Exp $
+# $Id: Makefile.email,v 1.6 1996/09/03 14:06:38 adam Exp $
 #
 SHELL=/bin/sh
 MAKE=make
@@ -94,6 +94,7 @@ distribution:
        mkdir tmp; cd tmp; cvs export -f -D now egate
        cd tmp/egate; mv README.email README
        cd tmp/egate; mv Makefile.email Makefile
+       cd tmp/egate; mv CHANGELOG.email CHANGELOG
        cd tmp/egate; rm -fr www 
        cd tmp/egate; rm *.web
        cd tmp; mv egate email-z39-$(VERSION)

diff --git a/Makefile.web b/Makefile.web
index e8f4fda..150c4f3 100644 (file)
--- a/Makefile.web
+++ b/Makefile.web
@@ -1,7 +1,7 @@
 # Top level Makefile for the Web - Z39.50 gateway
 # Europagate, 1995-1996.
 #
-# $Id: Makefile.web,v 1.3 1996/08/28 08:34:23 adam Exp $
+# $Id: Makefile.web,v 1.4 1996/09/03 14:06:38 adam Exp $
 #
 SHELL=/bin/sh
 MAKE=make
@@ -86,6 +86,7 @@ distribution:
        cd tmp/egate; rm zdist.patch
        cd tmp/egate/www; rm *wais*.[ch]
        cd tmp/egate; mv Makefile.web Makefile
+       cd tmp/egate; mv CHANGELOG.web CHANGELOG
        cd tmp/egate; mv README.web README
        cd tmp; mv egate web-z39-$(VERSION)
        cd tmp/web-z39-$(VERSION); make taildepend

diff --git a/www/z39util.tcl b/www/z39util.tcl
index 19c75f3..ec5631f 100644 (file)
--- a/www/z39util.tcl
+++ b/www/z39util.tcl
@@ -1,5 +1,5 @@
 #
-# $Id: z39util.tcl,v 1.46 1996/08/28 09:36:03 adam Exp $
+# $Id: z39util.tcl,v 1.47 1996/09/03 14:06:43 adam Exp $
 #
 proc saveState {} {
     uplevel #0 {
@@ -69,9 +69,9 @@ proc display-medium {zset no setNo targetNo} {
     global env
     global sessionId
 
-    html {<li>}
     set type [$zset type $no]
     if {$type == "SD"} {
+        html {<li>}
         set err [lindex [$zset diag $no] 1]
         set add [lindex [$zset diag $no] 2]
         if {$add != {}} {
@@ -83,6 +83,7 @@ proc display-medium {zset no setNo targetNo} {
     if {$type != "DB"} {
         return
     }
+    html {<li>}
     set rtype [$zset recordType $no]
     switch $rtype {
         SUTRS {
@@ -165,9 +166,9 @@ proc display-brief {zset no setNo targetNo} {
     global env
     global sessionId
 
-    html {<li>}
     set type [$zset type $no]
     if {$type == "SD"} {
+        html {<li>}
         set err [lindex [$zset diag $no] 1]
         set add [lindex [$zset diag $no] 2]
         if {$add != {}} {
@@ -179,6 +180,7 @@ proc display-brief {zset no setNo targetNo} {
     if {$type != "DB"} {
         return
     }
+    html {<li>}
     set rtype [$zset recordType $no]
     switch $rtype {
         SUTRS {
@@ -1536,6 +1538,7 @@ proc button-feedback {} {
         html {<img src="/egwgif/button-user-feedback.gif" alt="User Feedback"
         border=0></a>}
     } else {
+        html "\n | "
         html {User Feedback</a>}
     }    
 }

diff --git a/www/ztargets.conf b/www/ztargets.conf
index 15fed1b..cf85636 100644 (file)
--- a/www/ztargets.conf
+++ b/www/ztargets.conf
@@ -1,4 +1,4 @@
-# $Id: ztargets.conf,v 1.36 1996/08/28 09:36:04 adam Exp $
+# $Id: ztargets.conf,v 1.37 1996/09/03 14:06:44 adam Exp $
 #
 # This file contains the predefined targets in the WWW-Z39.50 gateway
 # Each target is an entry in the associative array "targets". The
@@ -189,27 +189,6 @@ set targets(Tikal.dev.oclc.org/AGRICOLA) [list \
     union \
 ]
 
-set targets(netsrv.casi.sti.nasa.gov:10210/GILS) {
-    NASA
-    WAIS
-    { { Free-text {@attr 1=4} } }
-    {}
-    {NASA database}
-    1
-    gils
-}
-
-set targets(localhost:9999/test) {
-    localwais
-    WAIS
-    { { Free-text {@attr 1=4} } }
-    {}
-    {WAIS test server on localhost:9999}
-    1
-    test
-}
-
-
 set targets(z3950.research.att.com/z39dbs) {
     Z39DB 
     SUTRS