tbetter troff handling - plan9port - [fork] Plan 9 from user space | |
git clone git://src.adamsgaard.dk/plan9port | |
Log | |
Files | |
Refs | |
README | |
LICENSE | |
--- | |
commit 72208f38277ad8aa8f1e9c13d5fc266d64474eb7 | |
parent 829ec0d30c5a298739be7f3f97ff7472b7ee1b27 | |
Author: rsc <devnull@localhost> | |
Date: Mon, 18 Jul 2005 22:50:09 +0000 | |
better troff handling | |
Diffstat: | |
M bin/page | 21 +++++++++++++++++++-- | |
1 file changed, 19 insertions(+), 2 deletions(-) | |
--- | |
diff --git a/bin/page b/bin/page | |
t@@ -22,6 +22,16 @@ preview() | |
end tell' | osascript | |
} | |
+xfile() | |
+{ | |
+ if sed 1q "$1" | 9 grep '^x T ' | |
+ then | |
+ echo 'troff intermediate output' | |
+ else | |
+ file - < "$1" | |
+ fi | |
+} | |
+ | |
main() | |
{ | |
case `uname` in | |
t@@ -29,7 +39,10 @@ main() | |
preview "$@" | |
;; | |
*) | |
- case "`file $1`" in | |
+ case "`xfile $1`" in | |
+ *troff*) | |
+ tr2post "$1" | psfonts | page | |
+ ;; | |
*PDF*) | |
psv $1 | |
;; | |
t@@ -51,7 +64,11 @@ case $# in | |
0) | |
tmp=/var/tmp/page.$$.tmp | |
cat >$tmp | |
- case "`file $tmp`" in | |
+ case "`xfile $tmp`" in | |
+ *troff*) | |
+ mv $tmp $tmp.tr | |
+ tmp=$tmp.tr | |
+ ;; | |
*PDF*) | |
mv $tmp $tmp.pdf | |
tmp=$tmp.pdf |