Fix quoting

This commit is contained in:
James Nguyen 2022-06-04 13:51:23 -04:00
parent 71e4edc84b
commit 98d28bc679
8 changed files with 31 additions and 19 deletions

View File

@ -84,9 +84,11 @@ state."
;; -> `lispyville-insert-at-beginning-of-list'
(evil-define-command evil-collection-lispy-insert-at-beginning-of-list (count)
"Enter `evil-collection-lispy-preferred-lispy-state' at the beginning of the current list.
With COUNT, move backward/out COUNT lists first. This is the lispyville
equivalent of `evil-cp-insert-at-beginning-of-form' except for lists only."
"Enter `evil-collection-lispy-preferred-lispy-state' at the start of the list.
With COUNT, move backward/out COUNT lists first. This is the
lispyville equivalent of `evil-cp-insert-at-beginning-of-form' except for lists
only."
(interactive "<c>")
(when (lispy--out-backward (or count 1))
(forward-char)
@ -94,7 +96,7 @@ equivalent of `evil-cp-insert-at-beginning-of-form' except for lists only."
;; -> `lispyville-insert-at-end-of-list'
(evil-define-command evil-collection-lispy-insert-at-end-of-list (count)
"Enter `lispyville-preferred-state' at the end of the current list.
"Enter `lispyville-preferred-state' at the end of the list.
With COUNT, move forward/out COUNT lists first. This is the lispyville
equivalent of `evil-cp-insert-at-end-of-form' except for lists only."
(interactive "<c>")
@ -578,7 +580,7 @@ Copy of `noc:lispy-delete'."
(defun evil-collection-lispy-set-key-theme (theme)
"Set `lispy-mode-map' for according to THEME.
THEME is a list of choices: 'special, 'lispy, 'paredit, 'evilcp,
THEME is a list of choices: \='special', \='lispy', \='paredit', \='evilcp',
\='c-digits', \='special-evil', \='evil'.
This is an exact copy of `lispy-set-key-theme' except with the additions of

View File

@ -41,7 +41,7 @@
This function is meant to be hooked in the minibuffer:
(add-hook 'minibuffer-setup-hook 'evil-collection-minibuffer-insert)
(add-hook \='minibuffer-setup-hook \='evil-collection-minibuffer-insert)
`evil-set-initial-state' can not be used for the minibuffer since
it does not have a mode."

View File

@ -45,7 +45,7 @@
;;;###autoload
(defun evil-collection-mpc-setup ()
"Setup up 'evil' bindings for 'mpc-mode'."
"Setup up `evil' bindings for `mpc-mode'."
(evil-collection-define-key 'normal 'mpc-mode-map
"C-j" 'evil-collection-mpc-move-down
"C-k" 'evil-collection-mpc-move-up

View File

@ -48,7 +48,7 @@ For example, \"zB\" is bound to `outline-hide-body' in Outline
mode. To turn off this specific binding in Outline minor mode,
you can do:
(evil-define-minor-mode-key 'normal 'outline-minor-mode \"zB\" nil)"
(evil-define-minor-mode-key \='normal \='outline-minor-mode \"zB\" nil)"
:group 'evil-collection-outline
:type 'boolean)

View File

@ -56,7 +56,9 @@
;; See https://github.com/emacs-evil/evil-collection/pull/137 for
;; details.
(defun evil-collection-pdf-view-next-line-or-next-page (&optional count)
"'evil' wrapper include a count argument to `pdf-view-next-line-or-next-page'"
"Wrap `pdf-view-next-line-or-next-page' with `evil'.
Consider COUNT."
(interactive "P")
(if count
(dotimes (_ count nil)
@ -64,7 +66,9 @@
(pdf-view-next-line-or-next-page 1)))
(defun evil-collection-pdf-view-previous-line-or-previous-page (&optional count)
"'evil' wrapper include a count argument to `pdf-view-previous-line-or-previous-page'"
"Wrap `pdf-view-previous-line-or-previous-page' with `evil'.
Consider COUNT."
(interactive "P")
(if count
(dotimes (_ count nil)

View File

@ -33,7 +33,12 @@
simple-mpc-current-playlist-mode-map))
(defun evil-collection-simple-mpc-set-bindings ()
"Set up 'evil' bindings for 'simple-mpc-mode', 'simple-mpc-query-mode', and 'simple-mpc-current-playlist-mode'."
"Set up `evil' bindings for `simple-mpc'.
Other modes that are configured:
`simple-mpc-mode'
`simple-mpc-query-mode'
`simple-mpc-current-playlist-mode'"
(evil-collection-define-key 'normal 'simple-mpc-mode-map
"p" 'simple-mpc-toggle
">" 'simple-mpc-next

View File

@ -33,7 +33,7 @@
;;;###autoload
(defun evil-collection-smerge-mode-setup ()
"Setup up 'evil' bindings for 'smerge-mode'."
"Setup up `evil' bindings for `smerge-mode'."
(evil-collection-define-key 'normal 'smerge-mode-map
"gj" 'smerge-next
"]]" 'smerge-next

View File

@ -38,7 +38,8 @@
;; HACK: elisp byte-opt can't optimize 'format' out, so it's checked at runtime.
(defun evil-collection-xwidget-webkit--scroll-trampoline (f n)
"Compatible wrapper for 'xwidget-webkit-scroll-up' and so on.
"Compatible wrapper for `xwidget-webkit-scroll-up' and so on.
F is the name of function, N is the pixel height."
(let ((realf (intern (format "%s" f))))
(if (>= emacs-major-version 28)
@ -46,14 +47,14 @@ F is the name of function, N is the pixel height."
(funcall realf))))
(defun evil-collection-xwidget-webkit-scroll-half-page-up ()
"Compatible wrapper for 'xwidget-webkit-scroll-up'."
"Compatible wrapper for `xwidget-webkit-scroll-up'."
(interactive)
(evil-collection-xwidget-webkit--scroll-trampoline
"xwidget-webkit-scroll-up"
(/ (xwidget-window-inside-pixel-height (selected-window)) 2)))
(defun evil-collection-xwidget-webkit-scroll-half-page-down ()
"Compatible wrapper for 'xwidget-webkit-scroll-down'."
"Compatible wrapper for `xwidget-webkit-scroll-down'."
(interactive)
(evil-collection-xwidget-webkit--scroll-trampoline
"xwidget-webkit-scroll-down"
@ -85,7 +86,7 @@ F is the name of function, N is the pixel height."
(setq evil-collection-xwidget-webkit-last-closed-tab-url nil)))
(defun evil-collection-xwidget-webkit-search-tabs ()
"Search tabs (buffers) with 'buffer-name'."
"Search tabs (buffers) with `buffer-name'."
(interactive)
(cl-flet ((is-xwidget-webkit-buffer?
(b) (with-current-buffer b
@ -106,7 +107,7 @@ F is the name of function, N is the pixel height."
(evil-collection-define-key 'normal 'xwidget-webkit-mode-map
;; Mimic vimium (a browser extension)
;;
;; Since xwidget has no tab concept, 'open-url-new-tab' etc are not
;; Since xwidget has no tab concept, `open-url-new-tab' etc are not
;; supported.
;;
;; TODO: edit-mode, visual-mode
@ -122,7 +123,7 @@ F is the name of function, N is the pixel height."
"l" 'xwidget-webkit-scroll-forward
"r" 'xwidget-webkit-reload
"yy" 'xwidget-webkit-current-url
;; TODO 'first-text-input', 'open-link-in-current-tab'
;; TODO `first-text-input', `open-link-in-current-tab'
"gi" 'undefined
"f" 'undefined
@ -142,7 +143,7 @@ F is the name of function, N is the pixel height."
;; Manipulating tabs (actually buffers)
;;
;; Only 'new-tab' and 'close-tab' are supported.
;; Only `new-tab' and `close-tab' are supported.
"t" 'evil-collection-xwidget-webkit-new-tab
"x" 'evil-collection-xwidget-webkit-close-tab
"X" 'evil-collection-xwidget-webkit-restore-last-closed-tab