Bug fix: egw_source <file> <var> didn't work properly.

[egate.git] / www / wtcl.c

diff --git a/www/wtcl.c b/www/wtcl.c
index 8772adc..69d0ab4 100644 (file)
--- a/www/wtcl.c
+++ b/www/wtcl.c
@@ -41,6 +41,9 @@
  * USE OR PERFORMANCE OF THIS SOFTWARE.
  *
  * $Log: wtcl.c,v $
+ * Revision 1.21  1997/02/10 10:15:40  adam
+ * Bug fix: egw_source <file> <var> didn't work properly.
+ *
  * Revision 1.20  1997/01/31 11:16:01  adam
  * Enhanced the egw_source command. An optional parameter specifies the
  * name of a variable in which the HTML output is stored.
@@ -319,7 +322,7 @@ static int proc_enc (ClientData clientData, Tcl_Interp *interp,
         while (*cp)
         { 
             if (*cp < ' ' || *cp >= 127 || *cp == '&' || *cp == '?'
-                || *cp == '%' || *cp == '+')
+                || *cp == '%' || *cp == '+' || *cp == '"')
             {
                 sprintf (buf1+1, "%02X", *cp & 0xff);
                 Tcl_AppendResult (interp, buf1, NULL);