gav451/emacs.d
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Fix regular expression

Browse Source
This commit is contained in:
Gerard Vermeulen 2022-12-21 17:48:28 +01:00
parent 68092c597d
commit ee82dfa487
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
README.org
View File

@ -4968,11 +4968,11 @@ Listing [[lst:configure-browse-url]] configures =browse-url=.
(start-process "mpv" nil "mpv" url)) (start-process "mpv" nil "mpv" url))
(defconst browse-url-mpv-regexp (defconst browse-url-mpv-regexp
(rx bos (rx bos "http" (opt "s") "://"
(or "http://" "https://") (or (seq "youtu.be/")
(or (or "www.youtube.com/" "youtu.be/" "soundcloud.com/") (seq "www.youtube.com/" (or "embed/" "watch?"))
(seq (+? nonl) (or ".mp4" ".webm") eos))) (seq (+? nonl) (or ".mp4" ".webm") eos)))
"Match hyperlinks to browse with mpv.") "Match hyperlinks to open with mpv.")
(custom-set-variables (custom-set-variables
`(browse-url-generic-program ,(or (when (eq system-type 'darwin) "open") `(browse-url-generic-program ,(or (when (eq system-type 'darwin) "open")