Plumber should not care about Perl anymore

This commit is contained in:
Ev Bogdanov 2017-08-16 13:58:50 +03:00
parent f2cdfeba2b
commit a56f7ba603

View file

@ -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