Plumber should not care about Perl anymore
This commit is contained in:
parent
f2cdfeba2b
commit
a56f7ba603
1 changed files with 1 additions and 13 deletions
14
plumbing
14
plumbing
|
|
@ -1,22 +1,10 @@
|
|||
## MUSIC GO TO AFPLAY
|
||||
## -----------------------------------------------------------------------------
|
||||
|
||||
## mac only
|
||||
## todo: rewrite for freebsd / linux
|
||||
## macOS only
|
||||
|
||||
kind is text
|
||||
data matches '[a-zA-Z¡-0-9_\-./]+'
|
||||
data matches '([a-zA-Z¡-0-9_\-./]+)\.(mp3|mp4|mpeg)'
|
||||
data isfile $0
|
||||
plumb start afplay $file
|
||||
|
||||
## PERL ERROR MESSAGES GO TO ACME
|
||||
## -----------------------------------------------------------------------------
|
||||
|
||||
type is text
|
||||
data matches '([a-zA-Z¡-0-9_\-.]+\.p[l|m])( line )([0-9]+)?'
|
||||
arg isfile $1
|
||||
data set $file
|
||||
attr add addr=$3
|
||||
plumb to edit
|
||||
plumb client window $editor
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue