State reestablised when shell restarts. History of previous
[egate.git] / www / targets.egw
1 <html>
2 {
3 # $Id: targets.egw,v 1.5 1995/11/06 17:44:21 adam Exp $
4     source /usr/local/etc/httpd/conf/ztargets.conf
5     if {[info commands saveState] == ""} {
6         source z39util.tcl
7     }
8 }
9 <head>
10 <title> Europagate, WWW/Z39.50 Gateway </title>
11 </head>
12 <body>
13 <center>
14 <img src="/gif/webgate.gif" Alt="Welcome to EUROPAGATE">
15 </center>
16 Part of Europagate is a World Wide Web to Z39.50 gateway. The gateway provides search and 
17 retrieve facilities in the databases of various libraries. <p>
18 <a href="http://www.dtu.dk/dtv/egate/egate.html"> Europagate </a> is a 
19 project in the <a href="http://www.echo.lu/programmes/en/LIBRARIES.html"> 
20 EU libraries Programme </a> carried out by: <br>
21 <a href="http://www.ucd.ie/"> University College Dublin </a> <br>
22 <a href="http://www.dtv.dk/dtv/">Technical University & Library of Denmark </a> <br>
23 Library Council <br>
24 Consejo Superior de Investigaciones Cient&iacute;ficas <br>
25 <hr>
26 <h3> Choose a Z39.50 target: </h3>
27 <dl>
28 {
29     foreach t [array names targets] {
30         html {<dt> <a href="http://} $env(SERVER_NAME) $env(SCRIPT_NAME) /
31         html "$sessionId/query.egw/$t" {"> } $t "</a>\n"
32         html "<dd> " [lindex $targets($t) 0] \n
33     }
34 }
35 </dl>
36 {
37     z39history
38 }
39 <hr>
40 This page is maintained by <a href="mailto:pwh@dtv.dk"> Peter Wad Hansen </a>.
41 Last modified 25. september 1995. <br>
42 <em> This and the following pages are under construction and will continue to be so
43 until the end of December 1995.</em>
44 {
45     html "<hr>\n"
46     html "<h3>Debug information</h3>\n"
47     html "sessionId: $sessionId <br>\n"
48     html "sessionParms: $sessionParms <br>\n"
49     foreach e {SERVER_NAME PATH_INFO SCRIPT_NAME} {
50         html $e {: } $env($e) {<br>} \n
51     }
52 }
53 </body>
54 </html>