mirror of
https://github.com/abo-abo/avy.git
synced 2025-12-04 20:55:43 +00:00
Quote symbols in docstrings according to conventions
This silences the following warnings during byte-compilation:
avy.el:396:2: Warning: defvar `avy-command' docstring has wrong usage of
unescaped single quotes (use \= or different quoting)
In avy--next-visible-point:
avy.el:935:2: Warning: docstring has wrong usage of unescaped single quotes
(use \= or different quoting)
In avy--next-invisible-point:
avy.el:942:2: Warning: docstring has wrong usage of unescaped single quotes
(use \= or different quoting)
This convention is documented in the Documentation Tips section of the Elisp manual
> • When a documentation string refers to a Lisp symbol, write it as it
> would be printed (which usually means in lower case), with a grave
> accent ‘`’ before and apostrophe ‘'’ after it. There are two
> exceptions: write ‘t’ and ‘nil’ without surrounding punctuation.
See:
- (info "(elisp)Documentaion Tips")
- https://www.gnu.org/software/emacs/manual/html_node/elisp/Documentation-Tips.html
This commit is contained in:
parent
955c8dedd6
commit
8576155193
6
avy.el
6
avy.el
@ -395,7 +395,7 @@ SEQ-LEN is how many elements of KEYS it takes to identify a match."
|
||||
|
||||
(defvar avy-command nil
|
||||
"Store the current command symbol.
|
||||
E.g. 'avy-goto-line or 'avy-goto-char.")
|
||||
E.g. `avy-goto-line' or `avy-goto-char'.")
|
||||
|
||||
(defun avy-tree (lst keys)
|
||||
"Coerce LST into a balanced tree.
|
||||
@ -933,14 +933,14 @@ multiple OVERLAY-FN invocations."
|
||||
(null (assoc invisible buffer-invisibility-spec)))))
|
||||
|
||||
(defun avy--next-visible-point ()
|
||||
"Return the next closest point without 'invisible property."
|
||||
"Return the next closest point without `invisible' property."
|
||||
(let ((s (point)))
|
||||
(while (and (not (= (point-max) (setq s (next-char-property-change s))))
|
||||
(not (avy--visible-p s))))
|
||||
s))
|
||||
|
||||
(defun avy--next-invisible-point ()
|
||||
"Return the next closest point with 'invisible property."
|
||||
"Return the next closest point with `invisible' property."
|
||||
(let ((s (point)))
|
||||
(while (and (not (= (point-max) (setq s (next-char-property-change s))))
|
||||
(avy--visible-p s)))
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user