--- ray/src/util/objline.csh	1995/10/26 19:23:11	2.1
+++ ray/src/util/objline.csh	2008/11/30 19:56:02	2.6
@@ -1,29 +1,28 @@
 #!/bin/csh -f
-# SCCSid "$SunId$ LBL"
+# RCSid: $Id: objline.csh,v 2.6 2008/11/30 19:56:02 greg Exp $
 # Create four standard views of scene and present as line drawings
 #
 set oblqxf="-rz 45 -ry 45"
-set d=/usr/tmp/ol$$
 onintr quit
-mkdir $d
+set d=`mktemp -d /tmp/ol.XXXXXX`
 if ($#argv) then
 	set origf=""
 	set oblqf=""
 	foreach f ($argv)
-		xform -e $f > $d/$f.orig
-		rad2mgf $d/$f.orig > $d/$f:r.orig.mgf
-		set origf=($origf $f:r.orig.mgf)
-		(echo xf $oblqxf; cat $d/$f:r.orig.mgf; echo xf) \
-				> $d/$f:r.oblq.mgf
-		set oblqf=($oblqf $f:r.oblq.mgf)
+		set fn="$f:t"
+		set fn="$fn:r"
+		xform $f:q > $d/$fn:q.orig
+		rad2mgf $d/$fn:q.orig > $d/$fn:q.orig.mgf
+		set origf=($origf:q $fn:q.orig.mgf)
+		echo i $fn:q.orig.mgf $oblqxf > $d/$fn:q.oblq.mgf
+		set oblqf=($oblqf:q $fn:q.oblq.mgf)
 	end
 else
 	set origf=stdin.orig.mgf
 	set oblqf=stdin.oblq.mgf
-	xform -e > $d/stdin.orig
+	xform > $d/stdin.orig
 	rad2mgf $d/stdin.orig > $d/stdin.orig.mgf
-	(echo xf $oblqxf; cat $d/stdin.orig.mgf; echo xf) \
-			> $d/stdin.oblq.mgf
+	echo i stdin.orig.mgf $oblqxf > $d/stdin.oblq.mgf
 endif
 cd $d
 set rce='xm=($1+$2)/2;ym=($3+$4)/2;zm=($5+$6)/2;\