emacs.d/lisp/functions.el: Fix typos and broken binding
parent
02abc0ce94
commit
78b3791f9c
|
@ -86,7 +86,7 @@ selectively."
|
|||
(when flyspell-mode
|
||||
(flyspell-buffer)))
|
||||
(whitespace-mode 'toggle))
|
||||
(global-set-key (kbd "<f9>") 'flyspell-and-whitespace-mode)
|
||||
(global-set-key (kbd "<f9>") #'ambrevar/flyspell-and-whitespace-mode)
|
||||
|
||||
;;; From https://www.reddit.com/r/emacs/comments/70bn7v/what_do_you_have_emacs_show_when_it_starts_up/.
|
||||
;;; Supply a random fortune cookie as the *scratch* message.
|
||||
|
@ -122,7 +122,7 @@ selectively."
|
|||
(newline-and-indent)))
|
||||
|
||||
(defun ambrevar/current-minor-modes ()
|
||||
"Return which minor modes are enabled in the current buffer."
|
||||
"Return the list of minor modes enabled in the current buffer."
|
||||
(interactive)
|
||||
(delq nil
|
||||
(mapcar (lambda (mode)
|
||||
|
@ -442,8 +442,8 @@ Each paragraph stand on its line."
|
|||
(fill-region (region-beginning) (region-end) nil)))
|
||||
|
||||
(defun ambrevar/youtube-dl-at-point (&optional url)
|
||||
"Run 'youtube-dl' over thr URL at point.
|
||||
If URL is non nil, use that instead."
|
||||
"Run 'youtube-dl' over the URL at point.
|
||||
If URL is non-nil, use that instead."
|
||||
(interactive)
|
||||
(setq url (or url (thing-at-point-url-at-point)))
|
||||
(let ((eshell-buffer-name "*youtube-dl*"))
|
||||
|
|
Loading…
Reference in New Issue