{
# $Id: mquery.egw,v 1.3 1995/11/08 18:07:22 adam Exp $
if {[info commands saveState] == ""} {
source z39util.tcl
}
global setNo
global nextSetNo
global hist
html {
This page is maintained by Peter Wad Hansen .
Last modified 29. september 1995.
This and the following pages are under construction
and will continue to be so until the end of December 1995.
{
html { New target }
}
{
html "
\n"
html "Debug information
\n"
html "sessionId: $sessionId
\n"
html "sessionParms: $sessionParms
\n"
foreach e {SERVER_NAME PATH_INFO SCRIPT_NAME} {
html $e {: } $env($e) {
} \n
}
html "form: " [wform] "
\n"
html "target: " $host "
\n"
html "setNo: " $setNo "
\n"
html "nextSetNo: " $nextSetNo "
\n"
}