tparanoia - 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 9bbe4594efec95643a61272e718da8d7dcd16a25
(DIR) parent 3a9ee6351914b85db336d51b0e450f954d37d7a6
(HTM) Author: rsc <devnull@localhost>
Date: Fri, 14 Jan 2005 05:55:09 +0000
paranoia
Diffstat:
M bin/Getdir | 3 ++-
M bin/adict | 1 +
M bin/doctype | 4 +++-
M bin/lookman | 3 +++
M bin/sig | 10 +++++-----
M bin/spell | 1 +
M bin/src | 1 +
7 files changed, 16 insertions(+), 7 deletions(-)
---
(DIR) diff --git a/bin/Getdir b/bin/Getdir
t@@ -2,6 +2,7 @@
# Click on an acme directory window and then execute Getdir
+. 9.rc
dir=acme/acme/$winid
fn rd {
t@@ -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
(DIR) diff --git a/bin/adict b/bin/adict
t@@ -1,5 +1,6 @@
#!/usr/local/plan9/bin/rc
+. 9.rc
. $PLAN9/lib/acme.rc
fn event {
(DIR) diff --git a/bin/doctype b/bin/doctype
t@@ -2,6 +2,8 @@
# doctype: synthesize proper command line for troff
+. 9.rc
+
troff=troff
eqn=eqn
prefer=prefer
t@@ -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'" }
(DIR) diff --git a/bin/lookman b/bin/lookman
t@@ -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
(DIR) diff --git a/bin/sig b/bin/sig
t@@ -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]
t@@ -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
t@@ -22,7 +22,7 @@ for (i) {
}
ta
s/[ ]+/ /g' |
- 9 grep -i -e '[ ]\*?'$i'\(' | sed 's/^[ +]/ /'
+ grep -i -e '[ ]\*?'$i'\(' | sed 's/^[ +]/ /'
}
}
(DIR) diff --git a/bin/spell b/bin/spell
t@@ -1,5 +1,6 @@
#!/usr/local/plan9/bin/rc
+. 9.rc
spellflags=()
deroffargs=()
fflag=''
(DIR) diff --git a/bin/src b/bin/src
t@@ -1,5 +1,6 @@
#!/usr/local/plan9/bin/rc
+. 9.rc
sym = 'threadmain?z
p9main?z
main?z'