diff options
author | Stefan Kangas <stefan@marxist.se> | 2021-09-12 18:33:03 +0200 |
---|---|---|
committer | Stefan Kangas <stefan@marxist.se> | 2021-09-12 18:36:49 +0200 |
commit | fc4b956c7cb2fba8ed2a18865a7686c6cfa5d030 (patch) | |
tree | bdd67b63d55da0b41e367feecc20e02ada92e92d | |
parent | 79113b5e4a7d69ec0fb3401b763292d91b54632e (diff) | |
download | emacs-fc4b956c7cb2fba8ed2a18865a7686c6cfa5d030.tar.gz emacs-fc4b956c7cb2fba8ed2a18865a7686c6cfa5d030.tar.bz2 emacs-fc4b956c7cb2fba8ed2a18865a7686c6cfa5d030.zip |
; Fix symbol quoting typos
-rw-r--r-- | lisp/auth-source-pass.el | 2 | ||||
-rw-r--r-- | lisp/calendar/calendar.el | 2 | ||||
-rw-r--r-- | lisp/cedet/semantic/complete.el | 4 | ||||
-rw-r--r-- | lisp/cedet/semantic/dep.el | 2 | ||||
-rw-r--r-- | lisp/emacs-lisp/cl-macs.el | 2 | ||||
-rw-r--r-- | lisp/emacs-lisp/lisp-mode.el | 2 | ||||
-rw-r--r-- | lisp/files-x.el | 2 | ||||
-rw-r--r-- | lisp/gnus/gnus.el | 5 | ||||
-rw-r--r-- | lisp/hexl.el | 2 | ||||
-rw-r--r-- | lisp/ldefs-boot.el | 2 | ||||
-rw-r--r-- | lisp/obsolete/rcompile.el | 2 | ||||
-rw-r--r-- | lisp/org/ob-sql.el | 4 | ||||
-rw-r--r-- | lisp/org/org-compat.el | 6 | ||||
-rw-r--r-- | lisp/org/org-list.el | 2 | ||||
-rw-r--r-- | lisp/org/org.el | 2 | ||||
-rw-r--r-- | lisp/progmodes/cperl-mode.el | 6 | ||||
-rw-r--r-- | lisp/progmodes/elisp-mode.el | 2 | ||||
-rw-r--r-- | lisp/textmodes/rst.el | 8 | ||||
-rw-r--r-- | lisp/vc/vc.el | 2 | ||||
-rw-r--r-- | test/lisp/auth-source-pass-tests.el | 8 | ||||
-rw-r--r-- | test/lisp/progmodes/flymake-tests.el | 2 |
21 files changed, 35 insertions, 34 deletions
diff --git a/lisp/auth-source-pass.el b/lisp/auth-source-pass.el index 914f8d2f1bf..162a3ec23c2 100644 --- a/lisp/auth-source-pass.el +++ b/lisp/auth-source-pass.el @@ -176,7 +176,7 @@ CONTENTS is the contents of a password-store formatted file." lines)))) (defun auth-source-pass--do-debug (&rest msg) - "Call `auth-source-do-debug` with MSG and a prefix." + "Call `auth-source-do-debug' with MSG and a prefix." (apply #'auth-source-do-debug (cons (concat "auth-source-pass: " (car msg)) (cdr msg)))) diff --git a/lisp/calendar/calendar.el b/lisp/calendar/calendar.el index 7c929ebed0d..fd97192c466 100644 --- a/lisp/calendar/calendar.el +++ b/lisp/calendar/calendar.el @@ -119,7 +119,7 @@ ;; Calendar has historically relied heavily on dynamic scoping. ;; Concretely, this manifests in the use of references to let-bound variables ;; in Custom vars as well as code in diary files. -;; `eval` is hence the core of the culprit. It's used on: +;; `eval' is hence the core of the culprit. It's used on: ;; - calendar-date-display-form ;; - calendar-time-display-form ;; - calendar-chinese-time-zone diff --git a/lisp/cedet/semantic/complete.el b/lisp/cedet/semantic/complete.el index d6ef7960473..5d34b308d0a 100644 --- a/lisp/cedet/semantic/complete.el +++ b/lisp/cedet/semantic/complete.el @@ -198,7 +198,7 @@ Argument COLLECTOR is an object which can be used to calculate a list of possible hits. See `semantic-completion-collector-engine' for details on COLLECTOR. Argument DISPLAYER is an object used to display a list of possible -completions for a given prefix. See`semantic-completion-display-engine' +completions for a given prefix. See `semantic-completion-display-engine' for details on DISPLAYER. PROMPT is a string to prompt with. DEFAULT-TAG is a semantic tag or string to use as the default value. @@ -746,7 +746,7 @@ Argument COLLECTOR is an object which can be used to calculate a list of possible hits. See `semantic-completion-collector-engine' for details on COLLECTOR. Argument DISPLAYER is an object used to display a list of possible -completions for a given prefix. See`semantic-completion-display-engine' +completions for a given prefix. See `semantic-completion-display-engine' for details on DISPLAYER. BUFFER is the buffer in which completion will take place. START is a location for the start of the full symbol. diff --git a/lisp/cedet/semantic/dep.el b/lisp/cedet/semantic/dep.el index efebe21a945..0694b9c2329 100644 --- a/lisp/cedet/semantic/dep.el +++ b/lisp/cedet/semantic/dep.el @@ -133,7 +133,7 @@ Changes made by this function are not persistent." ;;;###autoload (defun semantic-remove-system-include (dir &optional mode) "Add a system include DIR to path for MODE. -Modifies a mode-local version of`semantic-dependency-system-include-path'. +Modifies a mode-local version of `semantic-dependency-system-include-path'. Changes made by this function are not persistent." (interactive (list diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el index 4ea583d28f1..16308b3a595 100644 --- a/lisp/emacs-lisp/cl-macs.el +++ b/lisp/emacs-lisp/cl-macs.el @@ -3277,7 +3277,7 @@ the form NAME which is a shorthand for (NAME NAME)." (defun cl-struct-sequence-type (struct-type) "Return the sequence used to build STRUCT-TYPE. STRUCT-TYPE is a symbol naming a struct type. Return `record', -`vector`, or `list' if STRUCT-TYPE is a struct type, nil otherwise." +`vector', or `list' if STRUCT-TYPE is a struct type, nil otherwise." (declare (side-effect-free t) (pure t)) (cl--struct-class-type (cl--struct-get-class struct-type))) diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index 51fb88502ab..677da81144f 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el @@ -624,7 +624,7 @@ Value for `adaptive-fill-function'." (if (looking-at "\\s-+\"[^\n\"]+\"\\s-*$") "")) ;; Maybe this should be discouraged/obsoleted and users should be -;; encouraged to use `lisp-data-mode` instead. +;; encouraged to use `lisp-data-mode' instead. (defun lisp-mode-variables (&optional lisp-syntax keywords-case-insensitive elisp) "Common initialization routine for lisp modes. diff --git a/lisp/files-x.el b/lisp/files-x.el index 9e1954256a6..c7cc076f844 100644 --- a/lisp/files-x.el +++ b/lisp/files-x.el @@ -673,7 +673,7 @@ in order." (defun hack-connection-local-variables (criteria) "Read connection-local variables according to CRITERIA. Store the connection-local variables in buffer local -variable`connection-local-variables-alist'. +variable `connection-local-variables-alist'. This does nothing if `enable-connection-local-variables' is nil." (when enable-connection-local-variables diff --git a/lisp/gnus/gnus.el b/lisp/gnus/gnus.el index d52bd26a2cb..5009507208e 100644 --- a/lisp/gnus/gnus.el +++ b/lisp/gnus/gnus.el @@ -2140,8 +2140,9 @@ instance, to switch off all visual things except menus, you can say: Valid elements include `summary-highlight', `group-highlight', `article-highlight', `mouse-face', `summary-menu', `group-menu', -`article-menu', `tree-highlight', `menu', `highlight', `browse-menu', -`server-menu', `page-marker', `tree-menu', `binary-menu', and`pick-menu'." +`article-menu', `tree-highlight', `menu', `highlight', +`browse-menu', `server-menu', `page-marker', `tree-menu', +`binary-menu', and `pick-menu'." :group 'gnus-meta :group 'gnus-visual :type '(set (const summary-highlight) diff --git a/lisp/hexl.el b/lisp/hexl.el index 8bfc1fb89e4..f236498288e 100644 --- a/lisp/hexl.el +++ b/lisp/hexl.el @@ -93,7 +93,7 @@ as that will override any bit grouping options set here." "Face used in address area of Hexl mode buffer.") (defface hexl-ascii-region - ;; Copied from `header-line`. We used to inherit from it, but that + ;; Copied from `header-line'. We used to inherit from it, but that ;; looks awful when the headerline is given a variable-pitch font or ;; (even worse) a 3D look. '((((class color grayscale) (background light)) diff --git a/lisp/ldefs-boot.el b/lisp/ldefs-boot.el index 542cbef9f57..586e4233c51 100644 --- a/lisp/ldefs-boot.el +++ b/lisp/ldefs-boot.el @@ -8735,7 +8735,7 @@ BODY contains code to execute each time the mode is enabled or disabled. It is executed after toggling the mode, and before running MODE-hook. Before the actual body code, you can write keyword arguments, i.e. alternating keywords and values. If you provide BODY, then you must - provide at least one keyword argument (e.g. `:lighter nil`). + provide at least one keyword argument (e.g. `:lighter nil'). The following special keywords are supported (other keywords are passed to `defcustom' if the minor mode is global): diff --git a/lisp/obsolete/rcompile.el b/lisp/obsolete/rcompile.el index d7020f0d074..ff7d1dcdcea 100644 --- a/lisp/obsolete/rcompile.el +++ b/lisp/obsolete/rcompile.el @@ -108,7 +108,7 @@ nil means run no commands." ;;;; entry point -;; We use the Tramp internal function`tramp-make-tramp-file-name'. +;; We use the Tramp internal function `tramp-make-tramp-file-name'. ;; Better would be, if there are functions to provide user, host and ;; localname of a remote filename, independent of Tramp's implementation. ;; The function calls are wrapped by `funcall' in order to pacify the byte diff --git a/lisp/org/ob-sql.el b/lisp/org/ob-sql.el index 947acef1b27..0a08925d4f6 100644 --- a/lisp/org/ob-sql.el +++ b/lisp/org/ob-sql.el @@ -189,8 +189,8 @@ Otherwise, use Emacs' standard conversion function." "Return database connection parameter NAME. Given a parameter NAME, if :dbconnection is defined in PARAMS then look for the parameter into the corresponding connection -defined in `sql-connection-alist`, otherwise look into PARAMS. -Look `sql-connection-alist` (part of SQL mode) for how to define +defined in `sql-connection-alist', otherwise look into PARAMS. +See `sql-connection-alist' (part of SQL mode) for how to define database connections." (if (assq :dbconnection params) (let* ((dbconnection (cdr (assq :dbconnection params))) diff --git a/lisp/org/org-compat.el b/lisp/org/org-compat.el index b68e5b58fca..82611d907af 100644 --- a/lisp/org/org-compat.el +++ b/lisp/org/org-compat.el @@ -179,9 +179,9 @@ This is a floating point number if the size is too large for an integer." Case is significant." (string< s1 s2))) -;; The time- functions below translate nil to `current-time` and -;; accept an integer as of Emacs 25. `decode-time` and -;; `format-time-string` accept nil on Emacs 24 but don't accept an +;; The time- functions below translate nil to `current-time' and +;; accept an integer as of Emacs 25. `decode-time' and +;; `format-time-string' accept nil on Emacs 24 but don't accept an ;; integer until Emacs 25. (if (< emacs-major-version 25) (let ((convert diff --git a/lisp/org/org-list.el b/lisp/org/org-list.el index f97164ee33b..b26e47aba90 100644 --- a/lisp/org/org-list.el +++ b/lisp/org/org-list.el @@ -3355,7 +3355,7 @@ Valid parameters are: (when (and backend (symbolp backend) (not (org-export-get-backend backend))) (user-error "Unknown :backend value")) (unless backend (require 'ox-org)) - ;; When`:raw' property has a non-nil value, turn all objects back + ;; When `:raw' property has a non-nil value, turn all objects back ;; into Org syntax. (when (and backend (plist-get params :raw)) (org-element-map data org-element-all-objects diff --git a/lisp/org/org.el b/lisp/org/org.el index f560c65dc4f..dc56948b533 100644 --- a/lisp/org/org.el +++ b/lisp/org/org.el @@ -19654,7 +19654,7 @@ When BLOCK-REGEXP is non-nil, use this regexp to find blocks." ;; Org still relies on `comment-dwim', but cannot trust ;; `comment-only-p'. So, `comment-region-function' and ;; `uncomment-region-function' both point -;; to`org-comment-or-uncomment-region'. Eventually, +;; to `org-comment-or-uncomment-region'. Eventually, ;; `org-insert-comment' takes care of insertion of comments at the ;; beginning of line. diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el index 4f3ca924dd9..165834cc20f 100644 --- a/lisp/progmodes/cperl-mode.el +++ b/lisp/progmodes/cperl-mode.el @@ -1304,7 +1304,7 @@ package name and for the version.") (regexp ,cperl--version-regexp))) ,cperl--ws*-rx (group-n 3 (or ";" "{"))) - "A regular expression to collect package names for `imenu`. + "A regular expression to collect package names for `imenu'. Catches \"package NAME;\", \"package NAME VERSION;\", \"package NAME BLOCK\" and \"package NAME VERSION BLOCK.\" Contains three groups: One for the keyword \"package\", one for the package @@ -1345,7 +1345,7 @@ heading text.") `(or ,cperl--package-for-imenu-rx ,cperl--sub-name-for-imenu-rx ,cperl--pod-heading-rx) - "A regular expression to collect stuff that goes into the `imenu` index. + "A regular expression to collect stuff that goes into the `imenu' index. Covers packages, subroutines, and POD headings.") ;; end of eval-and-compiled stuff @@ -5454,7 +5454,7 @@ indentation and initial hashes. Behaves usually outside of comment." (defvar cperl-imenu-pod-keywords '("=head")) (defun cperl-imenu--create-perl-index () - "Implement `imenu-create-index-function` for CPerl mode. + "Implement `imenu-create-index-function' for CPerl mode. This function relies on syntaxification to exclude lines which look like declarations but actually are part of a string, a comment, or POD." diff --git a/lisp/progmodes/elisp-mode.el b/lisp/progmodes/elisp-mode.el index 483bf9d2edd..22150c7d825 100644 --- a/lisp/progmodes/elisp-mode.el +++ b/lisp/progmodes/elisp-mode.el @@ -883,7 +883,7 @@ there are no matches for variables." (secondary-xrefs nil)) ; other xrefs (let ((temp elisp-xref-find-def-functions)) - ;; FIXME: The `elisp-xref-find-def-functions` function interface does + ;; FIXME: The `elisp-xref-find-def-functions' function interface does ;; not allow for namespace filtering so we tacitly assume they all match. (while (and (null xrefs) temp) diff --git a/lisp/textmodes/rst.el b/lisp/textmodes/rst.el index 1471be0ecd6..46654b6076d 100644 --- a/lisp/textmodes/rst.el +++ b/lisp/textmodes/rst.el @@ -2444,7 +2444,7 @@ PREFER-ROMAN roman numbering is preferred over using letters." tab)) ;; FIXME: At least the continuation may be folded into -;; `newline-and-indent`. However, this may not be wanted by everyone so +;; `newline-and-indent'. However, this may not be wanted by everyone so ;; it should be possible to switch this off. (defun rst-insert-list (&optional prefer-roman) ;; testcover: ok. @@ -2915,7 +2915,7 @@ error if there is no working link at the given position." (pop-to-buffer (marker-buffer mrkr)) (goto-char mrkr) ;; FIXME: Should be a customizable number of lines from beginning or end of - ;; window just like the argument to `recenter`. It would be ideal if + ;; window just like the argument to `recenter'. It would be ideal if ;; the adornment is always completely visible. (recenter 5))) @@ -2995,7 +2995,7 @@ burying it." (define-derived-mode rst-toc-mode special-mode "ReST-TOC" "Major mode for output from \\[rst-toc], the table-of-contents for the document. \\{rst-toc-mode-map}" - ;; FIXME: `revert-buffer-function` must be defined so `revert-buffer` works + ;; FIXME: `revert-buffer-function' must be defined so `revert-buffer' works ;; as expected for a special mode. In particular the referred buffer ;; needs to be rescanned and the TOC must be updated accordingly. ;; FIXME: Should contain the name of the buffer this is the toc of. @@ -3217,7 +3217,7 @@ Return a list of tabs sorted by likeliness to continue writing like `rst-line-tabs'. Nearer lines have generally a higher likeliness than farther lines. Return nil if no tab is found in the text above." - ;; FIXME: See test `indent-for-tab-command-BUGS`. + ;; FIXME: See test `indent-for-tab-command-BUGS'. (save-excursion (goto-char pt) (let (leftmost ; Leftmost column found so far. diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el index f6ae27075f3..4fcba65ab4d 100644 --- a/lisp/vc/vc.el +++ b/lisp/vc/vc.el @@ -515,7 +515,7 @@ ;; ;; Turn on the mode used for editing the check in log. This ;; defaults to `log-edit-mode'. If changed, it should use a mode -;; derived from`log-edit-mode'. +;; derived from `log-edit-mode'. ;; ;; - check-headers () ;; diff --git a/test/lisp/auth-source-pass-tests.el b/test/lisp/auth-source-pass-tests.el index d050ac5b695..a0a97eca5eb 100644 --- a/test/lisp/auth-source-pass-tests.el +++ b/test/lisp/auth-source-pass-tests.el @@ -56,10 +56,10 @@ ("key2" . "please: keep my space after colon")))))) (defvar auth-source-pass--debug-log nil - "Contains a list of all messages passed to `auth-source-do-debug`.") + "Contains a list of all messages passed to `auth-source-do-debug'.") (defun auth-source-pass--have-message-matching (regexp) - "Return non-nil iff at least one `auth-source-do-debug` match REGEXP." + "Return non-nil iff at least one `auth-source-do-debug' match REGEXP." (seq-find (lambda (message) (string-match regexp message)) auth-source-pass--debug-log)) @@ -75,8 +75,8 @@ REGEXP is the same as in `auth-source-pass--have-message-matching'." (put #'auth-source-pass--have-message-matching 'ert-explainer #'auth-source-pass--explain--have-message-matching) (defun auth-source-pass--debug (&rest msg) - "Format MSG and add that to `auth-source-pass--debug-log`. -This function is intended to be set to `auth-source-debug`." + "Format MSG and add that to `auth-source-pass--debug-log'. +This function is intended to be set to `auth-source-debug'." (add-to-list 'auth-source-pass--debug-log (apply #'format msg) t)) (defvar auth-source-pass--parse-log nil) diff --git a/test/lisp/progmodes/flymake-tests.el b/test/lisp/progmodes/flymake-tests.el index bda1b663c22..45e0c435984 100644 --- a/test/lisp/progmodes/flymake-tests.el +++ b/test/lisp/progmodes/flymake-tests.el @@ -60,7 +60,7 @@ (cl-defun flymake-tests--call-with-fixture (fn file &key (severity-predicate nil sev-pred-supplied-p)) - "Call FN after flymake setup in FILE, using `flymake-proc`. + "Call FN after flymake setup in FILE, using `flymake-proc'. SEVERITY-PREDICATE is used to setup `flymake-proc-diagnostic-type-pred'" (let* ((file (expand-file-name file flymake-tests-data-directory)) |