tbetter troff handling - plan9port - [fork] Plan 9 from user space
 (HTM) git clone git://src.adamsgaard.dk/plan9port
 (DIR) Log
 (DIR) Files
 (DIR) Refs
 (DIR) README
 (DIR) LICENSE
       ---
 (DIR) commit 72208f38277ad8aa8f1e9c13d5fc266d64474eb7
 (DIR) parent 829ec0d30c5a298739be7f3f97ff7472b7ee1b27
 (HTM) 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(-)
       ---
 (DIR) 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