media-gfx/graphviz/files/graphviz-1.16-tempdir.patch


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

--- graphviz-2.2.1.orig/dotty/dotty.lefty
+++ graphviz-2.2.1/dotty/dotty.lefty
@@ -668,7 +668,10 @@
         if (~(otype = ask ('print to', 'choice', 'file|printer')))
             return;
     if (otype == 'printer') {
-        name = '/tmp/dottyout.ps';
+        name = concat (getenv ('HOME'), '/.dottyout.ps');
         if (getenv ('LEFTYWINSYS') ~= 'mswin' & ~pr)
             if (~(pr = ask ('printer command', 'string', 'lpr')))
                 return;
@@ -768,5 +771,5 @@
     vt.canvas = canvas;
     destroywidget (pscanvas);
     if (otype == 'printer' & getenv ('LEFTYWINSYS') ~= 'mswin')
-        system (concat (pr, ' /tmp/dottyout.ps; rm /tmp/dottyout.ps'));
+        system (concat (pr, ' ', name, '; rm ',name));
 };