Functions: Rename ambrevar/youtube-dl-at-point to ambrevar/youtube-dl-url
parent
286922a3bf
commit
1d6b357912
|
@ -444,9 +444,9 @@ Each paragraph stand on its line."
|
||||||
(let ((fill-column (point-max)))
|
(let ((fill-column (point-max)))
|
||||||
(fill-region (region-beginning) (region-end) nil)))
|
(fill-region (region-beginning) (region-end) nil)))
|
||||||
|
|
||||||
(defun ambrevar/youtube-dl-at-point (&optional url)
|
(defun ambrevar/youtube-dl-url (&optional url)
|
||||||
"Run 'youtube-dl' over the URL at point.
|
"Run 'youtube-dl' over the URL.
|
||||||
If URL is non-nil, use that instead."
|
If URL is nil, use URL at point."
|
||||||
(interactive)
|
(interactive)
|
||||||
(setq url (or url (thing-at-point-url-at-point)))
|
(setq url (or url (thing-at-point-url-at-point)))
|
||||||
(let ((eshell-buffer-name "*youtube-dl*"))
|
(let ((eshell-buffer-name "*youtube-dl*"))
|
||||||
|
|
Loading…
Reference in New Issue