mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-06 06:20:55 -08:00
; Fix several symbol name typos
This commit is contained in:
parent
c716d0cf56
commit
db2ed9f333
27 changed files with 32 additions and 32 deletions
|
|
@ -1221,7 +1221,7 @@ SORTFUN is passed to `sort' to change the default ordering."
|
|||
|
||||
(defface abbrev-table-name
|
||||
'((t :inherit font-lock-function-name-face))
|
||||
"Face used for displaying the abbrev table name in `edit-abbrev-mode'."
|
||||
"Face used for displaying the abbrev table name in `edit-abbrevs-mode'."
|
||||
:version "29.1")
|
||||
|
||||
(defvar edit-abbrevs-mode-font-lock-keywords
|
||||
|
|
|
|||
|
|
@ -172,7 +172,7 @@ You cannot create projects for the baseclass."
|
|||
(defclass ede-locate-locate (ede-locate-base)
|
||||
()
|
||||
"EDE Locator using the locate command.
|
||||
Configure the Emacs `locate-program' variable to also
|
||||
Configure the Emacs `locate-command' variable to also
|
||||
configure the use of EDE locate.")
|
||||
|
||||
(cl-defmethod ede-locate-ok-in-project ((_loc (subclass ede-locate-locate))
|
||||
|
|
|
|||
|
|
@ -38,7 +38,7 @@
|
|||
|
||||
(defvar wisent-lex-lookahead nil
|
||||
"Extra lookahead token.
|
||||
When non-nil it is directly returned by `wisent-lex-function'.")
|
||||
When non-nil it is directly returned by `wisent-lexer-function'.")
|
||||
|
||||
(defmacro wisent-lex-eoi ()
|
||||
"Return an End-Of-Input lexical token.
|
||||
|
|
|
|||
|
|
@ -190,7 +190,7 @@ FORCE is non-nil, use TEXT exactly as is."
|
|||
If CHOOSE, allow the user to choose interactively between the
|
||||
matches.
|
||||
|
||||
Auto-select when `ecomplete-message-display-abbrev-auto-select' is
|
||||
Auto-select when `ecomplete-auto-select' is
|
||||
non-nil and there is only a single completion option available."
|
||||
(let* ((matches (ecomplete-get-matches type word))
|
||||
(match-list (and matches (split-string matches "\n")))
|
||||
|
|
|
|||
|
|
@ -753,7 +753,7 @@ property for use by navigation."
|
|||
|
||||
(defun backtrace--line-length-or-nil ()
|
||||
"Return `backtrace-line-length' if valid, nil else."
|
||||
;; mirror the logic in `cl-print-to-string-with-limits'
|
||||
;; mirror the logic in `cl-print-to-string-with-limit'
|
||||
(and (natnump backtrace-line-length)
|
||||
(not (zerop backtrace-line-length))
|
||||
backtrace-line-length))
|
||||
|
|
|
|||
|
|
@ -178,7 +178,7 @@ Earlier variables shadow later ones with the same name.")
|
|||
;; be displayed when the function's source file will be
|
||||
;; compiled anyway, but more importantly we would otherwise
|
||||
;; emit spurious warnings here because we don't have the full
|
||||
;; context, such as `declare-functions' placed earlier in the
|
||||
;; context, such as `declare-function's placed earlier in the
|
||||
;; source file's code or `with-suppressed-warnings' that
|
||||
;; surrounded the `defsubst'.
|
||||
(byte-compile-warnings nil))
|
||||
|
|
|
|||
|
|
@ -96,7 +96,7 @@ Integer values are handled in the `range' slot.")
|
|||
`comp-common-supertype'.")
|
||||
(subtype-p-mem (make-hash-table :test #'equal) :type hash-table
|
||||
:documentation "Serve memoization for
|
||||
`comp-subtype-p-mem'.")
|
||||
`comp-cstr-ctxt-subtype-p-mem'.")
|
||||
(union-1-mem-no-range (make-hash-table :test #'equal) :type hash-table
|
||||
:documentation "Serve memoization for
|
||||
`comp-cstr-union-1'.")
|
||||
|
|
|
|||
|
|
@ -835,8 +835,7 @@ byte-compilation of the new package to fail."
|
|||
If DEPS is non-nil, also activate its dependencies (unless they
|
||||
are already activated).
|
||||
If RELOAD is non-nil, also `load' any files inside the package which
|
||||
correspond to previously loaded files (those returned by
|
||||
`package--list-loaded-files')."
|
||||
correspond to previously loaded files."
|
||||
(let* ((name (package-desc-name pkg-desc))
|
||||
(pkg-dir (package-desc-dir pkg-desc)))
|
||||
(unless pkg-dir
|
||||
|
|
|
|||
|
|
@ -62,7 +62,7 @@
|
|||
;; You can customize the prefix and the face used to display it,
|
||||
;; `erc-capab-identify-unidentified'. If the value of
|
||||
;; `erc-capab-identify-prefix' is nil or you disable this module (see
|
||||
;; `erc-capab-identify-disable'), no prefix will be inserted, but the
|
||||
;; `erc-capab-identify-activated'), no prefix will be inserted, but the
|
||||
;; flag sent by the server will still be stripped.
|
||||
|
||||
;;; Code:
|
||||
|
|
|
|||
|
|
@ -1256,7 +1256,7 @@ Signal an error when the network cannot be determined."
|
|||
;; but aren't being proxied through to a real network. The
|
||||
;; service may send a 422 but no NETWORK param (or *any* 005s).
|
||||
(let ((m (concat "Failed to determine network. Please set entry for "
|
||||
erc-server-announced-name " in `erc-network-alist'.")))
|
||||
erc-server-announced-name " in `erc-networks-alist'.")))
|
||||
(erc-display-error-notice parsed m)
|
||||
(erc-error "Failed to determine network"))) ; beep
|
||||
(setq erc-network name))
|
||||
|
|
|
|||
|
|
@ -1301,7 +1301,7 @@ non-first windows in Follow mode."
|
|||
"The buffer current at the last call to `follow-adjust-window' or nil.
|
||||
`follow-mode' is not necessarily enabled in this buffer.")
|
||||
|
||||
;; This function is added to `pre-display-function' and is thus called
|
||||
;; This function is added to `pre-redisplay-function' and is thus called
|
||||
;; before each redisplay operation. It supersedes (2018-09) the
|
||||
;; former use of the post command hook, and now does the right thing
|
||||
;; when a program calls `redisplay' or `sit-for'.
|
||||
|
|
|
|||
|
|
@ -1810,7 +1810,7 @@ where unread is an integer count of calculated unread
|
|||
messages (or nil), and info is a regular gnus info entry.
|
||||
|
||||
The info element is shared with the same element of
|
||||
`gnus-newrc-alist', so as to conserve space."
|
||||
`gnus-newsrc-alist', so as to conserve space."
|
||||
(let ((alist gnus-newsrc-alist)
|
||||
(ohashtb gnus-newsrc-hashtb)
|
||||
info method gname rest methods)
|
||||
|
|
|
|||
|
|
@ -152,7 +152,7 @@ certificate."
|
|||
(defcustom smime-CA-file (car (gnutls-trustfiles))
|
||||
"File containing certificates for CAs you trust.
|
||||
The file should contain certificates in PEM format. By default,
|
||||
this is initialized from the `gnutls-trusfiles' variable."
|
||||
this is initialized from the `gnutls-trustfiles' variable."
|
||||
:version "29.1"
|
||||
:type '(choice (const :tag "none" nil)
|
||||
file))
|
||||
|
|
|
|||
|
|
@ -139,7 +139,7 @@ See `icomplete-delay-completions-threshold'."
|
|||
|
||||
(defvar icomplete-in-buffer nil
|
||||
"If non-nil, also use Icomplete when completing in non-mini buffers.
|
||||
This affects commands like `complete-in-region', but not commands
|
||||
This affects commands like `completion-in-region', but not commands
|
||||
that use their own completions setup.")
|
||||
|
||||
(defcustom icomplete-minibuffer-setup-hook nil
|
||||
|
|
|
|||
|
|
@ -216,7 +216,7 @@ Each item has the form (ORIGINAL-FILE TARGET-FILE).")
|
|||
"Maximum number of concurrent jobs permitted for generating images.
|
||||
Increase at own risk. If you want to experiment with this,
|
||||
consider setting `image-dired-debug' to a non-nil value to see
|
||||
the time spent on generating thumbnails. Run `image-clear-cache'
|
||||
the time spent on generating thumbnails. Run `clear-image-cache'
|
||||
and remove the cached thumbnail files between each trial run.")
|
||||
|
||||
(defun image-dired-pngnq-thumb (spec)
|
||||
|
|
|
|||
|
|
@ -1049,7 +1049,7 @@ Each element has the form (TYPE HANDLE), where TYPE is a string
|
|||
and HANDLE is either the symbol `immediate' or `deferred'.
|
||||
Messages in an immediate batch are handled just like regular
|
||||
messages, while deferred messages are stored in
|
||||
`rcirc-batch-messages'.")
|
||||
`rcirc-batched-messages'.")
|
||||
|
||||
(defvar-local rcirc-batch-attributes nil
|
||||
"Alist mapping batch IDs to parameters.")
|
||||
|
|
|
|||
|
|
@ -385,7 +385,7 @@ Return the buffer associated with the connection."
|
|||
(defun sieve-manage-open (server &optional port stream auth buffer)
|
||||
"Open a network connection to a managesieve SERVER (string).
|
||||
Optional argument PORT is port number (integer) on remote server.
|
||||
Optional argument STREAM is any of `sieve-manage-streams' (a symbol).
|
||||
Optional argument STREAM is any of `sieve-manage-stream' (a symbol).
|
||||
Optional argument AUTH indicates authenticator to use, see
|
||||
`sieve-manage-authenticators' for available authenticators.
|
||||
If nil, chooses the best stream the server is capable of.
|
||||
|
|
|
|||
|
|
@ -5306,7 +5306,7 @@ of what a project is and how to check if it stuck, customize the variable
|
|||
"Hook run when the fancy diary buffer is cleaned up.")
|
||||
|
||||
(defun org-agenda-cleanup-fancy-diary ()
|
||||
"Remove unwanted stuff in buffer created by `fancy-diary-display'.
|
||||
"Remove unwanted stuff in buffer created by `diary-fancy-display'.
|
||||
This gets rid of the date, the underline under the date, and the
|
||||
dummy entry installed by Org mode to ensure non-empty diary for
|
||||
each date. It also removes lines that contain only whitespace."
|
||||
|
|
|
|||
|
|
@ -456,7 +456,7 @@ Optional argument JUSTIFY can specify any type of justification
|
|||
among `left', `center', `right' or `full'. A nil value is
|
||||
equivalent to `left'. For a justification that doesn't also fill
|
||||
string, see `org-ascii--justify-lines' and
|
||||
`org-ascii--justify-block'.
|
||||
`org-ascii--justify-element'.
|
||||
|
||||
Return nil if S isn't a string."
|
||||
(when (stringp s)
|
||||
|
|
|
|||
|
|
@ -618,7 +618,7 @@ Honour `eglot-strict-mode'."
|
|||
(cl-defmacro eglot--dcase (obj &rest clauses)
|
||||
"Like `pcase', but for the LSP object OBJ.
|
||||
CLAUSES is a list (DESTRUCTURE FORMS...) where DESTRUCTURE is
|
||||
treated as in `eglot-dbind'."
|
||||
treated as in `eglot--dbind'."
|
||||
(declare (indent 1) (debug (sexp &rest (sexp &rest form))))
|
||||
(let ((obj-once (make-symbol "obj-once")))
|
||||
`(let ((,obj-once ,obj))
|
||||
|
|
@ -2464,7 +2464,7 @@ may be called multiple times (respecting the protocol of
|
|||
(defun eglot-xref-backend () "Eglot xref backend." 'eglot)
|
||||
|
||||
(defvar eglot--temp-location-buffers (make-hash-table :test #'equal)
|
||||
"Helper variable for `eglot--handling-xrefs'.")
|
||||
"Helper variable for `eglot--collecting-xrefs'.")
|
||||
|
||||
(defvar eglot-xref-lessp-function #'ignore
|
||||
"Compare two `xref-item' objects for sorting.")
|
||||
|
|
|
|||
|
|
@ -1360,8 +1360,9 @@ default) no filter is applied."
|
|||
flymake-mode-line-warning-counter
|
||||
flymake-mode-line-note-counter "]")
|
||||
"Mode-line construct for formatting Flymake diagnostic counters.
|
||||
This is a suitable place for placing the `flymake-error-counter',
|
||||
`flymake-warning-counter' and `flymake-note-counter' constructs.
|
||||
This is a suitable place for placing the `flymake-mode-line-error-counter',
|
||||
`flymake-mode-line-warning-counter' and `flymake-mode-line-note-counter'
|
||||
constructs.
|
||||
Separating each of these with space is not necessary."
|
||||
:type '(repeat (choice string symbol)))
|
||||
|
||||
|
|
|
|||
|
|
@ -4359,7 +4359,7 @@ member."
|
|||
"Mapping of local variable names to a string with their value.")
|
||||
|
||||
(defun gdb-locals-values-handler-custom ()
|
||||
"Store the values of local variables in `gdb-locals-value-map'."
|
||||
"Store the values of local variables in `gdb-locals-values-table'."
|
||||
(let ((locals-list (bindat-get-field (gdb-mi--partial-output) 'variables)))
|
||||
(dolist (local locals-list)
|
||||
(let ((name (bindat-get-field local 'name))
|
||||
|
|
|
|||
|
|
@ -9630,7 +9630,7 @@ Returns REGEXP and list of ( (signal_name connection_name)... )."
|
|||
|
||||
(defun verilog-read-auto-template (module)
|
||||
"Look for an auto_template for the instantiation of the given MODULE.
|
||||
If found returns `verilog-read-auto-template-inside' structure."
|
||||
If found returns `verilog-read-auto-template-middle' structure."
|
||||
(save-excursion
|
||||
;; Find beginning
|
||||
(let ((pt (point)))
|
||||
|
|
@ -10024,7 +10024,7 @@ Used for __FLAGS__ in `verilog-expand-command'."
|
|||
|
||||
(defvar verilog-dir-cache-preserving nil
|
||||
"If true, the directory cache is enabled, and file system changes are ignored.
|
||||
See `verilog-dir-exists-p' and `verilog-dir-files'.")
|
||||
See `verilog-dir-file-exists-p' and `verilog-dir-files'.")
|
||||
|
||||
;; If adding new cached variable, add also to verilog-preserve-dir-cache
|
||||
(defvar verilog-dir-cache-list nil
|
||||
|
|
|
|||
|
|
@ -1296,7 +1296,7 @@ KEY is a string or vector representing a sequence of keystrokes."
|
|||
|
||||
(defun local-key-binding (keys &optional accept-default)
|
||||
"Return the binding for command KEYS in current local keymap only.
|
||||
This is a legacy function; see `keymap-local-binding' for the
|
||||
This is a legacy function; see `keymap-local-lookup' for the
|
||||
recommended function to use instead.
|
||||
|
||||
KEYS is a string or vector, a sequence of keystrokes.
|
||||
|
|
@ -1310,7 +1310,7 @@ about this."
|
|||
|
||||
(defun global-key-binding (keys &optional accept-default)
|
||||
"Return the binding for command KEYS in current global keymap only.
|
||||
This is a legacy function; see `keymap-global-binding' for the
|
||||
This is a legacy function; see `keymap-global-lookup' for the
|
||||
recommended function to use instead.
|
||||
|
||||
KEYS is a string or vector, a sequence of keystrokes.
|
||||
|
|
|
|||
|
|
@ -3501,7 +3501,7 @@ Optional support for popup buttons is also implemented here."
|
|||
|
||||
(cl-defmethod transient-format-description ((obj transient-child))
|
||||
"The `description' slot may be a function, in which case that is
|
||||
called inside the correct buffer (see `transient-insert-group')
|
||||
called inside the correct buffer (see `transient--insert-group')
|
||||
and its value is returned to the caller."
|
||||
(and-let* ((desc (oref obj description)))
|
||||
(if (functionp desc)
|
||||
|
|
|
|||
|
|
@ -823,7 +823,7 @@ Return a list of results."
|
|||
(should (= (comp-tests-tco-f 1 0 10) 55))))
|
||||
|
||||
(defun comp-tests-fw-prop-checker-1 (_)
|
||||
"Check that inside `comp-tests-fw-prop-f' `concat' and `length' are folded."
|
||||
"Check that inside `comp-tests-fw-prop-1-f' `concat' and `length' are folded."
|
||||
(should
|
||||
(cl-notany
|
||||
#'identity
|
||||
|
|
|
|||
|
|
@ -263,7 +263,7 @@ must evaluate to a regular expression string."
|
|||
|
||||
(ert-deftest module--test-assertions--load-non-live-object-with-global-copy ()
|
||||
"Check that -module-assertions verify that non-live objects aren't accessed.
|
||||
This differs from `module--test-assertions-load-non-live-object'
|
||||
This differs from `module--test-assertions--load-non-live-object'
|
||||
in that it stows away a global reference. The module assertions
|
||||
should nevertheless detect the invalid load."
|
||||
:tags (if (getenv "EMACS_EMBA_CI") '(:unstable))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue