diff options
| -rwxr-xr-x | bin/" | 8 | ||||
| -rwxr-xr-x | bin/"" | 4 | ||||
| -rwxr-xr-x | bin/9 | 2 | ||||
| -rwxr-xr-x | bin/9man | 43 | ||||
| -rwxr-xr-x | bin/Getdir | 2 | ||||
| -rwxr-xr-x | bin/adict | 4 | ||||
| -rwxr-xr-x | bin/doctype | 3 | ||||
| -rwxr-xr-x | bin/lookman | 2 | ||||
| -rwxr-xr-x | bin/man | 2 | ||||
| -rwxr-xr-x | bin/spell | 2 | ||||
| -rwxr-xr-x | bin/src | 4 |
11 files changed, 17 insertions, 59 deletions
@@ -1,4 +1,4 @@ -#!/usr/bin/env $PLAN9/bin/rc +#!/usr/local/plan9/bin/rc fn text { if(~ $winid [0-9]*) @@ -12,16 +12,16 @@ fn text { PROMPT='[^ ]*[%;$#][ ]+' fn cmds { - text | 9grep '^'$PROMPT'[^"]' | sed 's/^/ /' + text | 9 grep '^'$PROMPT'[^"]' | sed 's/^/ /' } switch($#*) { case 0 cmds | tail -1 case * - cmds | 9grep '^ '$PROMPT^$"* | {echo; cat} | + cmds | 9 grep '^ '$PROMPT^$"* | {echo; cat} | pr -t -n | sort -nr | sort -u +1 | sort -n | - 9sed 's/^ *[0-9]+ //' | grep . + 9 sed 's/^ *[0-9]+ //' | grep . } # the silly {echo; cat} gets around pr printing "empty file" when @@ -1,4 +1,4 @@ -#!/usr/bin/env $PLAN9/bin/rc +#!/usr/local/plan9/bin/rc PROMPT='[^ ]*[%;$#][ ]+' @@ -7,7 +7,7 @@ PROMPT='[^ ]*[%;$#][ ]+' tail -1 | tee >{wc -l >/tmp/qq.$pid} | tee /dev/stderr | - 9sed 's/^ '$PROMPT'//' | + 9 sed 's/^ '$PROMPT'//' | rc if(~ `{cat /tmp/qq.$pid} 0){ @@ -1,6 +1,6 @@ #!/bin/sh -export PLAN9=/Users/rsc/plan9 +export PLAN9=/usr/local/plan9 export PATH=$PLAN9/bin:$PATH case $# in diff --git a/bin/9man b/bin/9man deleted file mode 100755 index cbbbd6e4..00000000 --- a/bin/9man +++ /dev/null @@ -1,43 +0,0 @@ -#! /bin/sh -root=$PLAN9/man - -while [ $# -gt 0 ] ; do - case $1 in - [0-9]) sec="$sec $1" ;; - *) break ;; - esac - shift -done - -if [ "X$sec" = "X" ] ; then - sec=`ls -d $root/man[0-9]* | sed -e 's;/$;;' -e 's;^.*/man;;'` -fi - -pat='^('`echo $* | sed -e 's; ;|;g'`')' ; -for s in $sec ; do - if [ -f $root/$s/INDEX ] ; then - try=`grep -E $pat $root/man$s/INDEX | sed -e 's;^[^ ]* ;;'` ; - fi - if [ "X$try" != "X" ] ; then - for f in $try ; do - files="$files $root/man$s/$f.$s"; - done - try=""; - fi - for f in $* ; do - if [ -f $root/man$s/$f.$s ] ; then - files="$files $root/man$s/$f.$s" ; - fi - done -done - -files=`echo $files | tr ' ' '\n' | sort -u`; - -if [ "X$files" = "X" ] ; then - echo "No manual entry for $*"; - exit 1; -fi - -exmac=".de EX\n.ift .ft 5\n.nf\n..\n.de EE\n.ft1\n.fi\n.." -( echo -e $exmac ; cat $files ) | nroff -man - @@ -1,4 +1,4 @@ -#!/usr/bin/env $PLAN9/bin/rc +#!/usr/local/plan9/bin/rc # Click on an acme directory window and then execute Getdir @@ -1,4 +1,4 @@ -#!/usr/bin/env $PLAN9/bin/rc +#!/usr/local/plan9/bin/rc . $PLAN9/lib/acme.rc @@ -76,7 +76,7 @@ case 0 dictwin /adict/$dict/ $dict case * if(~ $dict NONE){ - dict=`{dict -d'?' | 9sed -n 's/^ ([^\[ ]+).*/\1/p' | sed 1q} + dict=`{dict -d'?' | 9 sed -n 's/^ ([^\[ ]+).*/\1/p' | sed 1q} if(~ $#dict 0){ echo 'no dictionaries present on this system' >[1=2] exit nodict diff --git a/bin/doctype b/bin/doctype index aaad8850..c55244cb 100755 --- a/bin/doctype +++ b/bin/doctype @@ -1,4 +1,5 @@ -#!/usr/bin/env rc +#!/usr/local/plan9/bin/rc + # doctype: synthesize proper command line for troff troff=troff diff --git a/bin/lookman b/bin/lookman index 12223be8..35c74e0e 100755 --- a/bin/lookman +++ b/bin/lookman @@ -1,4 +1,4 @@ -#!/usr/bin/env $PLAN9/bin/rc +#!/usr/local/plan9/bin/rc # Usage: lookman key ... # prints out the names of all manual pages containing all the given keywords index=$PLAN9/man/lookman.index @@ -1,4 +1,4 @@ -#!/usr/bin/env rc +#!/usr/local/plan9/bin/rc . $PLAN9/man/fonts @@ -1,4 +1,4 @@ -#!/usr/bin/env $PLAN9/bin/rc +#!/usr/local/plan9/bin/rc spellflags=() deroffargs=() @@ -1,11 +1,11 @@ -#!/usr/bin/env $PLAN9/bin/rc +#!/usr/local/plan9/bin/rc sym = 'threadmain?z p9main?z main?z' fn dbsrc{ - echo $sym | db $1 | 9sed '1d;/symbol not found/d;s/.*\(\) //' + echo $sym | db $1 | 9 sed '1d;/symbol not found/d;s/.*\(\) //' } fn go{ |