Better presentation of records. Query/set number persistent.

[egate.git] / www / wsh.c

diff --git a/www/wsh.c b/www/wsh.c
index a67590a..2927715 100644 (file)
--- a/www/wsh.c
+++ b/www/wsh.c
@@ -41,7 +41,10 @@
  * USE OR PERFORMANCE OF THIS SOFTWARE.
  *
  * $Log: wsh.c,v $
- * Revision 1.4  1995/10/27 15:12:12  adam
+ * Revision 1.5  1995/11/01 16:15:48  adam
+ * Better presentation of records. Query/set number persistent.
+ *
+ * Revision 1.4  1995/10/27  15:12:12  adam
  * IrTcl incorporated in the gateway.
  * Better separation of script types.
  * Z39.50 gateway scripts entered.
@@ -68,7 +71,7 @@
 #include "wtcl.h"
 #include "wirtcl.h"
 
-#define TIMEOUT_SHORT 60
+#define TIMEOUT_SHORT 180
 #define TIMEOUT_MEDIUM 1800
 #define TIMEOUT_LONG 7200
 
@@ -107,6 +110,8 @@ int main (int argc, char **argv)
     }
     while (wproto_process(wcl, timeout) > 0)
     {
+        char *p;
+
        wo_clear (wcl, "text/html");
        strcpy (parms_buf, wcl->wf_parms);
        script = parms = parms_buf;
@@ -116,7 +121,7 @@ int main (int argc, char **argv)
            *parms++ = '\0';
         if (*script)
         {
-            char *p = script + strlen(script) - 1;
+            p = script + strlen(script) - 1;
             while (*p && p != script)
                 switch (*p)
                 {
@@ -140,6 +145,9 @@ int main (int argc, char **argv)
                     --p;
                 }
         }
+        for (p = parms; *p; p++)
+            if (*p == '+')
+                *p = ' ';
        gw_log (GW_LOG_DEBUG, mod, "script: %s", script);
        gw_log (GW_LOG_DEBUG, mod, "parms: %s", parms);
         if (w_interp_exec (w_interp, script, parms))