From 9bbe4594efec95643a61272e718da8d7dcd16a25 Mon Sep 17 00:00:00 2001 From: rsc Date: Fri, 14 Jan 2005 05:55:09 +0000 Subject: paranoia --- bin/Getdir | 3 ++- bin/adict | 1 + bin/doctype | 4 +++- bin/lookman | 3 +++ bin/sig | 10 +++++----- bin/spell | 1 + bin/src | 1 + 7 files changed, 16 insertions(+), 7 deletions(-) diff --git a/bin/Getdir b/bin/Getdir index 5b839179..178d8dc9 100755 --- a/bin/Getdir +++ b/bin/Getdir @@ -2,6 +2,7 @@ # Click on an acme directory window and then execute Getdir +. 9.rc dir=acme/acme/$winid fn rd { @@ -20,7 +21,7 @@ if(! ~ $tag(1) */){ echo -n , | wr addr ls -pF $tag(1) | sed 's/\*$//' | - 9grep -v '^''?\.|\.o$|^''?o\.' | + grep -v '^''?\.|\.o$|^''?o\.' | mc | wr data echo -n '#0' | wr addr echo -n 'dot=addr' | wr ctl diff --git a/bin/adict b/bin/adict index 32272844..c744c560 100755 --- a/bin/adict +++ b/bin/adict @@ -1,5 +1,6 @@ #!/usr/local/plan9/bin/rc +. 9.rc . $PLAN9/lib/acme.rc fn event { diff --git a/bin/doctype b/bin/doctype index e36c3caf..05e3cba4 100755 --- a/bin/doctype +++ b/bin/doctype @@ -2,6 +2,8 @@ # doctype: synthesize proper command line for troff +. 9.rc + troff=troff eqn=eqn prefer=prefer @@ -24,7 +26,7 @@ ifs=' '{ files=`{echo $*} } -9 grep -h '\$LIST|\|reference|^\.(EQ|TS|\[|PS|IS|GS|G1|GD|PP|BM|LP|BP|PI|cstart|begin|TH...)|^\.P$' $* | +grep -h '\$LIST|\|reference|^\.(EQ|TS|\[|PS|IS|GS|G1|GD|PP|BM|LP|BP|PI|cstart|begin|TH...)|^\.P$' $* | sort -u | awk ' BEGIN { files = "'$files'" } diff --git a/bin/lookman b/bin/lookman index 35c74e0e..8a29bb94 100755 --- a/bin/lookman +++ b/bin/lookman @@ -1,4 +1,7 @@ #!/usr/local/plan9/bin/rc + +. 9.rc + # Usage: lookman key ... # prints out the names of all manual pages containing all the given keywords index=$PLAN9/man/lookman.index diff --git a/bin/sig b/bin/sig index b2f797f3..0db15f30 100755 --- a/bin/sig +++ b/bin/sig @@ -2,7 +2,7 @@ # Usage: sig key ... # prints out function signatures by grepping the manual - +. 9.rc *=`{echo $*|tr A-Z a-z|tr -dc 'a-z0-9_ \012'} # fold case, delete funny chars if(~ $#* 0){ echo Usage: sig function ... >[1=2] @@ -10,11 +10,11 @@ if(~ $#* 0){ } for (i) { - files=`{9 grep -il '[ ]\*?'$i'\(' $PLAN9/man/man3/*.3*} + files=`{grep -il '[ ]\*?'$i'\(' $PLAN9/man/man3/*.3*} for(j in $files) { {echo .nr LL 20i; 9 sed -n '/^.SH SYNOPSIS/,/^.SH.*DESCR/p' $j } | - 9 nroff -man | - 9 sed ' + nroff -man | + sed ' :a /,$/ { N @@ -22,7 +22,7 @@ for (i) { } ta s/[ ]+/ /g' | - 9 grep -i -e '[ ]\*?'$i'\(' | sed 's/^[ +]/ /' + grep -i -e '[ ]\*?'$i'\(' | sed 's/^[ +]/ /' } } diff --git a/bin/spell b/bin/spell index 3a6b4a3e..eea05ca4 100755 --- a/bin/spell +++ b/bin/spell @@ -1,5 +1,6 @@ #!/usr/local/plan9/bin/rc +. 9.rc spellflags=() deroffargs=() fflag='' diff --git a/bin/src b/bin/src index c9dcdec4..3fb749a7 100755 --- a/bin/src +++ b/bin/src @@ -1,5 +1,6 @@ #!/usr/local/plan9/bin/rc +. 9.rc sym = 'threadmain?z p9main?z main?z' -- cgit v1.2.3