mirror of
https://github.com/9fans/plan9port.git
synced 2025-01-24 11:41:58 +00:00
plumbing foo.html now sends it to the editor --
this is more in keeping with plan 9 behavior. plumbing file:foo.html adds the appropriate full path and sends it to the web browser.
This commit is contained in:
parent
73bef9b76b
commit
dee84543e1
1 changed files with 24 additions and 5 deletions
29
plumb/basic
29
plumb/basic
|
@ -7,17 +7,29 @@ include fileaddr
|
||||||
plumb to seemail
|
plumb to seemail
|
||||||
plumb to showmail
|
plumb to showmail
|
||||||
|
|
||||||
|
# relative files as file: urls get made into absolute paths
|
||||||
|
type is text
|
||||||
|
data matches 'file:([.a-zA-Z¡-0-9_\-]([.a-zA-Z¡-0-9_/\-]*[a-zA-Z¡-0-9_/\-]))?'
|
||||||
|
arg isfile $1
|
||||||
|
data set file://$file
|
||||||
|
plumb to web
|
||||||
|
plumb start web $data
|
||||||
|
|
||||||
# urls go to web browser
|
# urls go to web browser
|
||||||
type is text
|
type is text
|
||||||
data matches '(https?|ftp|file|gopher|mailto|news|nntp|telnet|wais|prospero)://[a-zA-Z0-9_@\-]+([.:][a-zA-Z0-9_@\-]+)*/?[a-zA-Z0-9_?,%#~&/\-+=]+([:.][a-zA-Z0-9_?,%#~&/\-+=]+)*\.(jpe?g|JPE?G|gif|GIF|ps|PS|pdf|PDF)'
|
data matches '(https?|ftp|file|gopher|mailto|news|nntp|telnet|wais|prospero)://[a-zA-Z0-9_@\-]+([.:][a-zA-Z0-9_@\-]+)*/?[a-zA-Z0-9_?,%#~&/\-+=]+([:.][a-zA-Z0-9_?,%#~&/\-+=]+)*\.(jpe?g|JPE?G|gif|GIF|ps|PS|pdf|PDF)'
|
||||||
|
plumb to web
|
||||||
plumb start web $0
|
plumb start web $0
|
||||||
|
|
||||||
# html goes to web browser
|
# html goes to web browser
|
||||||
type is text
|
# uncomment if you want this behavior
|
||||||
data matches '[a-zA-Z¡-0-9_\-./]+'
|
# commented out is more like plan 9
|
||||||
data matches '([a-zA-Z¡-0-9_\-./]+)\.(html|htm|HTM|HTML)'
|
#
|
||||||
arg isfile $0
|
# type is text
|
||||||
plumb start web $file
|
# data matches '[a-zA-Z¡-0-9_\-./]+'
|
||||||
|
# data matches '([a-zA-Z¡-0-9_\-./]+)\.(html|htm|HTM|HTML)'
|
||||||
|
# arg isfile $0
|
||||||
|
# plumb start web $file
|
||||||
|
|
||||||
# doc and rtf files go to wdoc2txt
|
# doc and rtf files go to wdoc2txt
|
||||||
type is text
|
type is text
|
||||||
|
@ -57,6 +69,13 @@ plumb to postscript
|
||||||
plumb start psv $file
|
plumb start psv $file
|
||||||
# plumb start page -w $file
|
# plumb start page -w $file
|
||||||
|
|
||||||
|
# open office - s[xt][cdigmw], doc, xls, ppt
|
||||||
|
data matches '[a-zA-Z¡-0-9_\-./]+'
|
||||||
|
data matches '([a-zA-Z¡-0-9_\-./]+)\.([Ss][XxTt][CcDdIiGgMmWw]|[Dd][Oo][Cc]|[Xx][Ll][Ss]|[Pp][Pp][Tt])'
|
||||||
|
arg isfile $0
|
||||||
|
plumb to openoffice
|
||||||
|
plumb start openoffice $file
|
||||||
|
|
||||||
# existing files, possibly tagged by line number, go to editor
|
# existing files, possibly tagged by line number, go to editor
|
||||||
type is text
|
type is text
|
||||||
data matches '([.a-zA-Z¡-0-9_/\-]*[a-zA-Z¡-0-9_/\-])('$addr')?'
|
data matches '([.a-zA-Z¡-0-9_/\-]*[a-zA-Z¡-0-9_/\-])('$addr')?'
|
||||||
|
|
Loading…
Reference in a new issue