undo change that broke webdot

diff --git a/tclpkg/tcldot/tcldot.c b/tclpkg/tcldot/tcldot.c
index 6c1e77f010b7194081204739e5a12ac9d231e1df..b6a3ea9369fff89a6a05cf232511daa8b0e0bdaf 100644 (file)
--- a/tclpkg/tcldot/tcldot.c
+++ b/tclpkg/tcldot/tcldot.c
@@ -1090,7 +1090,7 @@ static int graphcmd(ClientData clientData, Tcl_Interp * interp,
                                      (char *) 0);
            return TCL_ERROR;
        }
-       gvc->active_jobs = job;
+        job = gvc->active_jobs = gvc->job;
 
        job->surface = (void *)(&tkgendata);
        job->external_surface = TRUE;
@@ -1122,7 +1122,7 @@ static int graphcmd(ClientData clientData, Tcl_Interp * interp,
                                      (char *) 0);
            return TCL_ERROR;
        }
-       gvc->active_jobs = job;
+        job = gvc->active_jobs = gvc->job;
 
        if (!  (hdl = tclhandleXlate(GDHandleTable, argv[2]))) {
            Tcl_AppendResult(interp, "GD Image not found.", (char *) NULL);
@@ -1261,7 +1261,7 @@ static int graphcmd(ClientData clientData, Tcl_Interp * interp,
                "\". Use one of:", s, (char *)NULL);
            return TCL_ERROR;
        }
-       gvc->active_jobs = job;
+       job = gvc->active_jobs = gvc->job;
 
        /* populate new job struct with output language and output file data */
        job->output_lang = gvrender_select(job, job->output_langname);