emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master fc4b956: ; Fix symbol quoting typos


From: Stefan Kangas
Subject: master fc4b956: ; Fix symbol quoting typos
Date: Sun, 12 Sep 2021 12:40:16 -0400 (EDT)

branch: master
commit fc4b956c7cb2fba8ed2a18865a7686c6cfa5d030
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    ; Fix symbol quoting typos
---
 lisp/auth-source-pass.el             | 2 +-
 lisp/calendar/calendar.el            | 2 +-
 lisp/cedet/semantic/complete.el      | 4 ++--
 lisp/cedet/semantic/dep.el           | 2 +-
 lisp/emacs-lisp/cl-macs.el           | 2 +-
 lisp/emacs-lisp/lisp-mode.el         | 2 +-
 lisp/files-x.el                      | 2 +-
 lisp/gnus/gnus.el                    | 5 +++--
 lisp/hexl.el                         | 2 +-
 lisp/ldefs-boot.el                   | 2 +-
 lisp/obsolete/rcompile.el            | 2 +-
 lisp/org/ob-sql.el                   | 4 ++--
 lisp/org/org-compat.el               | 6 +++---
 lisp/org/org-list.el                 | 2 +-
 lisp/org/org.el                      | 2 +-
 lisp/progmodes/cperl-mode.el         | 6 +++---
 lisp/progmodes/elisp-mode.el         | 2 +-
 lisp/textmodes/rst.el                | 8 ++++----
 lisp/vc/vc.el                        | 2 +-
 test/lisp/auth-source-pass-tests.el  | 8 ++++----
 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 914f8d2..162a3ec 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 7c929eb..fd97192 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 d6ef796..5d34b30 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 efebe21..0694b9c 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 4ea583d..16308b3 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 51fb885..677da81 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 9e19542..c7cc076 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 d52bd26..5009507 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 8bfc1fb..f236498 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 542cbef..586e423 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 d7020f0..ff7d1dc 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 947acef..0a08925 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 b68e5b5..82611d9 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 f97164e..b26e47a 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 f560c65..dc56948 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 4f3ca92..165834c 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 483bf9d..22150c7 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 1471be0..46654b6 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 f6ae270..4fcba65 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 d050ac5..a0a97ec 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 bda1b66..45e0c43 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))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]