--- rat/client/Attic/code.html	2001/03/15 14:43:12	1.22
+++ rat/client/Attic/code.html	2001/04/20 15:13:06	1.28
@@ -11,6 +11,8 @@ Resource Assembly Tool
 5/2,5/3,5/4,5/5,5/6,5/8,5/9,5/13,5/18,5/20,5/22,5/24,5/25,
 6/7,6/8,6/9,6/10,6/12,6/15,7/4,7/26,7/28,7/31,8/5,8/19,8/24,
 01/17/01,03/03,03/05 Gerd Kortemeyer with Scott Harrison
+March/April 01 Scott Harrison
+04/20 Gerd Kortemeyer
 -->
 
 
@@ -1472,7 +1474,7 @@ function srchclear() {
 // ------------------------------------------------------- Closes search window
 
 function srchclose() {
-  if (srch) {
+  if (srch && !srch.closed) {
     srch.close();
   }
 }
@@ -2413,8 +2415,12 @@ function wheelswitch() {
 // --------------------------------------------- Checks if server frame defined
 
 function checkdef() {
-   if (parent.server.document.forms.storage.output.value!=undefined) {
-      srvloaded();
+   if (parent.server!=undefined) {
+    if (parent.server.document!=undefined) {
+     if (parent.server.document.forms.storage.output.value!=undefined) {
+        srvloaded();
+     }
+    }
    }
    if ((finishdone==0) && (tim==0)) { setTimeout('checkdef()',100); }
 }
@@ -2490,6 +2496,8 @@ function togglemode() {
 function main() {
 
    if (mainrun==0) {
+      srchopen();
+//      srchclose();
       infopen();
       infoclear();
       load();
@@ -2505,7 +2513,7 @@ function leave() {
    if (!inf.closed) {
       inf.close();
    }
-   if (!srch.closed) {
+   if (srch && !srch.closed) {
       srchclose();
    }
 }