Fix1 to X11R6 patch

Rich Neitzel (thor@ymir.atd.ucar.edu)
2 Jun 1994 18:07:22 GMT

Well, I goofed! It seems that I tested things, made another change &
forget to retest. My patches to the X11 stuff have a mistake in
Xtmodule.c. Seems I was over eager in looking for troubles with
XtGetValues() & corrected something that wasn't wrong! Anyway, the patch
to back out the mistake out is appended below.

I've tested things throughly this time - even the vpApp test suite runs
correctly. 

-- 
Richard Neitzel thor@thor.atd.ucar.edu          Torren med sitt skjegg
National Center For Atmospheric Research        lokkar borni under sole-vegg
Box 3000 Boulder, CO 80307-3000	                Gjx'i med sitt shinn
303-497-2057                                    jagar borni inn.
---------------------------------------------------------------------
--- Xtmodule.c~ Fri May 27 14:39:08 1994
+++ Xtmodule.c  Thu Jun  2 10:03:37 1994
@@ -138,16 +138,14 @@
        int pos, n;
        object *key, *value;
        ArgList a;
-        XtArgVal *i;
        if (args == NULL || !is_dictobject(args)) {
                err_setstr(TypeError, "args must be a dictionary");
                return 0;
        }
        a = NEW(Arg, 1000); /* Hope that's enough */
-        i = NEW(XtArgVal, 1000);
        pos = 0;
        n = 0;
-       while (mappinggetnext(args, &pos, &key, &value)) {
+        while (mappinggetnext(args, &pos, &key, &value)) {
                if (!is_stringobject(key)) {
                        err_setstr(TypeError,
                                   "args dictionary keys must be strings");
@@ -155,7 +153,7 @@
                }
                a[n].name = getstringvalue(key);
                 a[n].value = (XtArgVal)&i[n];
-               if (!python_to_res(wC, w, key, value, &i[n]))
+                if (!python_to_res(wC, w, key, value, &a[n].value))
                        return 0;
                n++;
        }