Tcl command wform extented; options -raw and -exists added.

[egate.git] / www / wproto.c

diff --git a/www/wproto.c b/www/wproto.c
index f649de6..668a5a7 100644 (file)
--- a/www/wproto.c
+++ b/www/wproto.c
@@ -41,7 +41,10 @@
  * USE OR PERFORMANCE OF THIS SOFTWARE.
  *
  * $Log: wproto.c,v $
- * Revision 1.19  1996/03/14 11:48:39  adam
+ * Revision 1.20  1996/05/21 14:53:04  adam
+ * Tcl command wform extented; options -raw and -exists added.
+ *
+ * Revision 1.19  1996/03/14  11:48:39  adam
  * New function egw_prog that returns name of shell.
  *
  * Revision 1.18  1996/02/12  10:09:23  adam
@@ -394,6 +397,7 @@ int wproto_process(WCLIENT wc, int timeout)
        for (t = wc->wf_parms; (*t = *p); t++, p++);
        p++;
        p++;         /* we don't deal with envvars yet */
+        wc->raw_data = p;
        decode_form(wc->wf_data, p);
        if (wc->lineout < 0)
         {