mirror of
https://github.com/9fans/plan9port.git
synced 2025-01-12 11:10:07 +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 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
|
||||
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)'
|
||||
plumb to web
|
||||
plumb start web $0
|
||||
|
||||
# html goes to web browser
|
||||
type is text
|
||||
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
|
||||
# uncomment if you want this behavior
|
||||
# commented out is more like plan 9
|
||||
#
|
||||
# type is text
|
||||
# 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
|
||||
type is text
|
||||
|
@ -57,6 +69,13 @@ plumb to postscript
|
|||
plumb start psv $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
|
||||
type is text
|
||||
data matches '([.a-zA-Z¡-0-9_/\-]*[a-zA-Z¡-0-9_/\-])('$addr')?'
|
||||
|
|
Loading…
Reference in a new issue