Functions: Rename ambrevar/youtube-dl-at-point to ambrevar/youtube-dl-url

master
Pierre Neidhardt 2018-12-16 10:47:03 +01:00
parent 286922a3bf
commit 1d6b357912
1 changed files with 3 additions and 3 deletions

View File

@ -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*"))