chiark
/
gitweb
/
~ianmdlvl
/
reprap-play.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
wine-vacuum-adapter: echo the wall thickness
[reprap-play.git]
/
filamentspool-number.eps.pl
diff --git
a/filamentspool-number.eps.pl
b/filamentspool-number.eps.pl
index c9cce78058e07c9137df99b098fdfb1817ca90e4..c05903a33a41d9dd510e46a1e995ff0d250d4c20 100755
(executable)
--- a/
filamentspool-number.eps.pl
+++ b/
filamentspool-number.eps.pl
@@
-4,7
+4,7
@@
die unless @ARGV==1 && $ARGV[0] =~ m/^\d+/;
my $num = $ARGV[0];
$num /= 1000;
printf <<END, $num or die $!;
-%!
+%
%
!
/Helvetica-Bold findfont
15 scalefont
setfont