X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=www%2Fmtargets.egw;h=5d0bacd6d5662018644003f0fcb541025a57c159;hb=ebbedbe0d49ac7cae8d511bf051eed59d9e14e50;hp=6c91b0310c6a816a3ed3c455fb89997c78101902;hpb=6e37e8e91bf35cb14c930e8988085cf78f11029a;p=egate.git diff --git a/www/mtargets.egw b/www/mtargets.egw index 6c91b03..5d0bacd 100644 --- a/www/mtargets.egw +++ b/www/mtargets.egw @@ -1,6 +1,6 @@ { -# $Id: mtargets.egw,v 1.2 1995/11/07 14:56:58 adam Exp $ +# $Id: mtargets.egw,v 1.8 1996/01/03 15:19:38 adam Exp $ set setNo 1 source /usr/local/etc/httpd/conf/ztargets.conf if {[info commands saveState] == ""} { @@ -11,26 +11,53 @@ Europagate, WWW/Z39.50 Gateway -

Search in multiple targets

-
-

Choose one or more Z39.50 targets:

{ - html {
+EUROPAGATE + +

Choose one or more Z39.50 targets

+{ + html {
} \n + html "
\n" foreach t [array names targets] { - html { } $t \n + html {
} [ lindex $targets($t) 0] + html {
} + set databases [lindex $targets($t) 1] + + set desc [lindex $targets($t) 4] + if {$desc != ""} { + html "$desc
\n" + } + foreach d $databases { + html { } $d + } html "
\n" } + html "
\n" }
-
-This page is maintained by Peter Wad Hansen . -Last modified 25. september 1995.
- This and the following pages are under construction and will continue -to be so until the end of December 1995. { + catch maintenance + if {!$debug} return html "
\n" html "

Debug information

\n" html "sessionId: $sessionId
\n"