X-Git-Url: http://jsfdemo.indexdata.com/?a=blobdiff_plain;f=www%2Fmtargets.egw;h=9254cad20dbebb480c3d282125cdd0ccd09416eb;hb=71ad5b6272d0bc6320bea6c1ec10f5e10bbfe8ef;hp=e8e495eec9f2f5b9cf762604d15d8fd4d1849af6;hpb=09f416a26c1c7e35ead317106f985774ec0c97bd;p=egate.git
diff --git a/www/mtargets.egw b/www/mtargets.egw
index e8e495e..9254cad 100644
--- a/www/mtargets.egw
+++ b/www/mtargets.egw
@@ -1,6 +1,6 @@
{
-# $Id: mtargets.egw,v 1.7 1995/12/21 15:49:51 adam Exp $
+# $Id: mtargets.egw,v 1.9 1996/01/08 08:42:14 adam Exp $
set setNo 1
source /usr/local/etc/httpd/conf/ztargets.conf
if {[info commands saveState] == ""} {
@@ -11,14 +11,30 @@
Europagate, WWW/Z39.50 Gateway
+{
+ if {![info exists debug]} {
+ if {[lindex $sessionParms 0] == "1"} {
+ set debug 1
+ } else {
+ set debug 0
+ }
+ }
+ if {![info exists useIcons]} {
+ if {[lindex $sessionParms 1] == "1"} {
+ set useIcons 0
+ } else {
+ set useIcons 1
+ }
+ }
+}
Choose one or more Z39.50 targets
{
html {
-
-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"