21 lines
837 B
Text
21 lines
837 B
Text
--- dotty/dotty.lefty.orig
|
|
+++ dotty/dotty.lefty
|
|
@@ -668,7 +668,10 @@
|
|
if (~(otype = ask ('print to', 'choice', 'file|printer')))
|
|
return;
|
|
if (otype == 'printer') {
|
|
- name = '/tmp/dottyout.ps';
|
|
+ if (~getenv ('TMPDIR'))
|
|
+ name = concat (getenv ('HOME'), '/.dottyout.ps');
|
|
+ else
|
|
+ name = concat (getenv ('TMPDIR'), '/.dottyout.ps', random (10000));
|
|
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));
|
|
};
|