diff options
author | lecoanet | 2005-05-25 08:28:38 +0000 |
---|---|---|
committer | lecoanet | 2005-05-25 08:28:38 +0000 |
commit | 45ae28c31f43b439c368042106c09148a2bf5d4d (patch) | |
tree | 0dd923a967b069342639523440aa699fe73f08e2 /generic/PostScript.c | |
parent | 49e26b69317314379935cb005976954d5d380108 (diff) | |
download | tkzinc-45ae28c31f43b439c368042106c09148a2bf5d4d.zip tkzinc-45ae28c31f43b439c368042106c09148a2bf5d4d.tar.gz tkzinc-45ae28c31f43b439c368042106c09148a2bf5d4d.tar.bz2 tkzinc-45ae28c31f43b439c368042106c09148a2bf5d4d.tar.xz |
Commented some postscript code under perl/tk to make the release.
Diffstat (limited to 'generic/PostScript.c')
-rw-r--r-- | generic/PostScript.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/generic/PostScript.c b/generic/PostScript.c index a8e5f0b..3465abe 100644 --- a/generic/PostScript.c +++ b/generic/PostScript.c @@ -273,7 +273,9 @@ ZnPostScriptCmd(ZnWInfo *wi, * then process all the arguments to fill the data structure in. *---------------------------------------------------------------- */ +#ifndef PTK result = Tcl_EvalEx(wi->interp, psenccmd, -1, TCL_EVAL_GLOBAL); +#endif if (result != TCL_OK) { return result; } |