tinvoke page better - 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 b908772234cea6ca00a13ed0deccc232f8752f5c
 (DIR) parent acb19305872582d8faeb178962ed940f511ca0ae
 (HTM) Author: rsc <devnull@localhost>
       Date:   Tue, 11 Jan 2005 19:44:13 +0000
       
       invoke page better
       
       Diffstat:
         M bin/man                             |      12 +-----------
       
       1 file changed, 1 insertion(+), 11 deletions(-)
       ---
 (DIR) diff --git a/bin/man b/bin/man
       t@@ -38,14 +38,6 @@ fn roff {
                }
        }
        
       -fn page {
       -        if(test -d /mnt/wsys/acme)
       -                /bin/page -w
       -        if not
       -                /bin/page
       -}
       -
       -
        while(~ $d 0) {
                if(~ $#* 0) {
                        echo 'Usage: man [-ntp] [-s sec] [0-9] [0-9] ... name1 name2 ...' >[1=2]
       t@@ -104,9 +96,7 @@ for(i in $fils) {
                                roff t $i | proof
        
                        case P
       -                        roff t $i |tr2post |psfonts >/tmp/man.$pid.ps
       -                        psv /tmp/man.$pid.ps
       -                        rm -f /tmp/man.$pid.ps
       +                        roff t $i |tr2post |psfonts |page
        
                        case n
                                roff n $i | 9sed '