mirror of
https://github.com/9fans/plan9port.git
synced 2025-01-24 11:41:58 +00:00
add $plan9 variable
This commit is contained in:
parent
f6bc914915
commit
4de03b544c
3 changed files with 16 additions and 7 deletions
|
@ -337,6 +337,11 @@ field of the message.
|
||||||
The contents of the
|
The contents of the
|
||||||
.B wdir
|
.B wdir
|
||||||
field of the message.
|
field of the message.
|
||||||
|
.TP
|
||||||
|
.B $plan9
|
||||||
|
The root directory of the Plan 9 tree
|
||||||
|
(see
|
||||||
|
.IR get9root (3)).
|
||||||
.RE
|
.RE
|
||||||
.SH EXAMPLE
|
.SH EXAMPLE
|
||||||
The following is a modest, representative file of plumbing rules.
|
The following is a modest, representative file of plumbing rules.
|
||||||
|
|
13
plumb/basic
13
plumb/basic
|
@ -58,7 +58,7 @@ data matches '[a-zA-Z¡-
|
||||||
data matches '([a-zA-Z¡-0-9_\-./]+)\.(jpe?g|JPE?G|gif|GIF|tiff?|TIFF?|ppm|bit|png|PNG)'
|
data matches '([a-zA-Z¡-0-9_\-./]+)\.(jpe?g|JPE?G|gif|GIF|tiff?|TIFF?|ppm|bit|png|PNG)'
|
||||||
arg isfile $0
|
arg isfile $0
|
||||||
plumb to image
|
plumb to image
|
||||||
plumb start qiv -t $file
|
plumb start page $file
|
||||||
|
|
||||||
# postscript/pdf/dvi go to page but not over the a plumb port
|
# postscript/pdf/dvi go to page but not over the a plumb port
|
||||||
# the port is here for reference but is unused
|
# the port is here for reference but is unused
|
||||||
|
@ -67,8 +67,7 @@ data matches '[a-zA-Z¡-
|
||||||
data matches '([a-zA-Z¡-0-9_\-./]+)\.(ps|PS|eps|EPS|pdf|PDF|dvi|DVI)'
|
data matches '([a-zA-Z¡-0-9_\-./]+)\.(ps|PS|eps|EPS|pdf|PDF|dvi|DVI)'
|
||||||
arg isfile $0
|
arg isfile $0
|
||||||
plumb to postscript
|
plumb to postscript
|
||||||
plumb start psv $file
|
plumb start page $file
|
||||||
# plumb start page -w $file
|
|
||||||
|
|
||||||
# open office - s[xt][cdigmw], doc, xls, ppt
|
# open office - s[xt][cdigmw], doc, xls, ppt
|
||||||
data matches '[a-zA-Z¡-0-9_\-./]+'
|
data matches '[a-zA-Z¡-0-9_\-./]+'
|
||||||
|
@ -104,10 +103,10 @@ attr add addr=$3
|
||||||
plumb to edit
|
plumb to edit
|
||||||
plumb client $editor
|
plumb client $editor
|
||||||
|
|
||||||
# .h files are looked up in /usr/local/plan9/include and passed to edit
|
# .h files are looked up in $plan9/include and passed to edit
|
||||||
type is text
|
type is text
|
||||||
data matches '([a-zA-Z¡-0-9]+\.h)('$addr')?'
|
data matches '([a-zA-Z¡-0-9]+\.h)('$addr')?'
|
||||||
arg isfile /usr/local/plan9/include/$1
|
arg isfile $plan9/include/$1
|
||||||
data set $file
|
data set $file
|
||||||
attr add addr=$3
|
attr add addr=$3
|
||||||
plumb to edit
|
plumb to edit
|
||||||
|
@ -138,9 +137,9 @@ plumb start rc -c 'man '$2' '$1' >[2=1] | nobs | plumb -i -d edit -a ''action=sh
|
||||||
dst is image
|
dst is image
|
||||||
arg isfile $data
|
arg isfile $data
|
||||||
plumb to image
|
plumb to image
|
||||||
plumb start qiv -t $data
|
plumb start page $data
|
||||||
|
|
||||||
# start rule for postscript without known suffixes
|
# start rule for postscript without known suffixes
|
||||||
dst is postscript
|
dst is postscript
|
||||||
arg isfile $data
|
arg isfile $data
|
||||||
plumb start gv $data
|
plumb start page $data
|
||||||
|
|
|
@ -531,6 +531,11 @@ readruleset(void)
|
||||||
Ruleset *rs;
|
Ruleset *rs;
|
||||||
Rule *r;
|
Rule *r;
|
||||||
int eof, inrule, i, ncmd;
|
int eof, inrule, i, ncmd;
|
||||||
|
char *plan9root;
|
||||||
|
|
||||||
|
plan9root = get9root();
|
||||||
|
if(plan9root)
|
||||||
|
setvariable("plan9", 5, plan9root, plan9root);
|
||||||
|
|
||||||
Again:
|
Again:
|
||||||
eof = 0;
|
eof = 0;
|
||||||
|
|
Loading…
Reference in a new issue