diff --git a/admin/codespell/codespell.exclude b/admin/codespell/codespell.exclude index f4c67ae83e8..f11918f53f3 100644 --- a/admin/codespell/codespell.exclude +++ b/admin/codespell/codespell.exclude @@ -1078,7 +1078,7 @@ decode_env_path (const char *evarname, const char *defalt, bool empty) Lisp_Object defalt; val = tbl->defalt; counts the ordinary slots and the top, defalt, parent, and purpose -verify (offsetof (struct Lisp_Char_Table, defalt) == header_size); +static_assert (offsetof (struct Lisp_Char_Table, defalt) == header_size); XCHAR_TABLE (table)->defalt = val; string, and DEFALT is a string, read from DEFALT instead of VAL. */ string_to_object (Lisp_Object val, Lisp_Object defalt) @@ -1743,3 +1743,9 @@ Timo Savola, Jorgen Sch@"afer, Holger Schauer, William Schelter, Ralph 2a85d81c47 Add support for gathering statistics on use-package declar... (let* ((nam (buffer-substring (match-beginning 2) (match-end 2))) (setq nmlst (cons nam nmlst) + (df '((defualt :foreground "cyan")))) +All the characters whose Unicode general-category is Nd now have the +;;; Each character whose Unicode general-category is Nd gets the digit + (skipp (or (erc--memq-msg-prop 'erc--skip 'stamp) + (when (and fullp culled (not skipp) (< 1 beg 3 end)) + ((not skipp)) diff --git a/doc/lispref/processes.texi b/doc/lispref/processes.texi index 2c19275f946..79ef959ae65 100644 --- a/doc/lispref/processes.texi +++ b/doc/lispref/processes.texi @@ -2718,7 +2718,7 @@ If non-@code{nil}, the host's capability string. @item :type @var{symbol} The connection type: @samp{plain} or @samp{tls}. @item :error @var{symbol} -A string describing any error encountered when perfoming +A string describing any error encountered when performing @acronym{STARTTLS} upgrade. @end table diff --git a/doc/misc/cc-mode.texi b/doc/misc/cc-mode.texi index 534f90321e7..ccdd6a97787 100644 --- a/doc/misc/cc-mode.texi +++ b/doc/misc/cc-mode.texi @@ -4831,9 +4831,9 @@ to make it easier to give an @code{enum} indentation like that of a @ssindex enum-intro @ssindex enum-close @ssindex enum-entry -Line 2 is assigned @code{enum-open} sytax, and line 6 +Line 2 is assigned @code{enum-open} syntax, and line 6 @code{enum-close}. The first enum element on line 3 is assigned -@code{enum-intro} sytax, and the remaining elements, on lines 4 and 5 +@code{enum-intro} syntax, and the remaining elements, on lines 4 and 5 are assigned @code{enum-entry}. When the first enum element follows the @samp{@{} of the @code{enum}, diff --git a/doc/misc/modus-themes.org b/doc/misc/modus-themes.org index 76379d1a168..b33b02d98ec 100644 --- a/doc/misc/modus-themes.org +++ b/doc/misc/modus-themes.org @@ -88,7 +88,7 @@ The Modus themes consist of eight themes, divided into four subgroups. are variants of the two main themes. They slightly tone down the intensity of the background and provide a bit more color variety. ~modus-operandi-tinted~ has a set of base tones that are shades of - light ochre (earthly colors), while ~modus-vivendi-tinted~ gives a + light ocher (earthly colors), while ~modus-vivendi-tinted~ gives a night sky impression. - Deuteranopia themes :: ~modus-operandi-deuteranopia~ and its @@ -1361,7 +1361,7 @@ value in some other application. :END: #+findex: modus-themes-get-color-value -The fuction ~modus-themes-get-color-value~ can be called from Lisp to +The function ~modus-themes-get-color-value~ can be called from Lisp to return the value of a color from the active Modus theme palette. It takea a =COLOR= argument and an optional =OVERRIDES=. It also accepts a third =THEME= argument, to get the color from the given theme. @@ -2367,7 +2367,7 @@ until version 4.3.0. ;; was the default in versions of the Modus themes before 4.4.0 (setq modus-themes-common-palette-overrides '((bg-prose-block-contents unspecified) - (bg-prose-block-delimiter unspeficied) + (bg-prose-block-delimiter unspecified) (fg-prose-block-delimiter fg-dim))) #+end_src @@ -3365,7 +3365,7 @@ specification of that variable looks like this: With the exception of ~org-verbatim~ and ~org-code~ faces, everything else uses the corresponding type of emphasis: a bold typographic weight, or -italicised, underlined, and struck through text. +italicized, underlined, and struck through text. The best way for users to add some extra attributes, such as a foreground color, is to define their own faces and assign them to the @@ -5407,7 +5407,7 @@ more effective than trying to do the same with either red or blue (the latter is the least effective in that regard). When we need to work with several colors, it is always better to have -sufficient manoeuvring space, especially since we cannot pick arbitrary +sufficient maneuvering space, especially since we cannot pick arbitrary colors but only those that satisfy the accessibility objectives of the themes. @@ -5513,7 +5513,7 @@ it is already understood that one must follow the indicator or headline to view its contents and (ii) underlining everything would make the interface virtually unusable. -Again, one must exercise judgement in order to avoid discrimination, +Again, one must exercise judgment in order to avoid discrimination, where "discrimination" refers to: + The treatment of substantially different magnitudes as if they were of @@ -5587,7 +5587,7 @@ the themes, which is partially fleshed out in this manual. With regard to the artistic aspect (where "art" qua skill may amount to an imprecise science), there is no hard-and-fast rule in effect as it -requires one to exercize discretion and make decisions based on +requires one to exercise discretion and make decisions based on context-dependent information or constraints. As is true with most things in life, when in doubt, do not cling on to the letter of the law but try to understand its spirit. diff --git a/doc/misc/tramp.texi b/doc/misc/tramp.texi index 93247e318de..8098366dc09 100644 --- a/doc/misc/tramp.texi +++ b/doc/misc/tramp.texi @@ -5234,7 +5234,7 @@ Otherwise, comment out the active code, and uncomment the just commented code. Call @command{emacs}, again. Reiterate, until you find the suspicious -configuaration. +configuration. @node Frequently Asked Questions diff --git a/etc/themes/modus-operandi-tinted-theme.el b/etc/themes/modus-operandi-tinted-theme.el index a9be4374f80..2cb8dfbc80b 100644 --- a/etc/themes/modus-operandi-tinted-theme.el +++ b/etc/themes/modus-operandi-tinted-theme.el @@ -1,4 +1,4 @@ -;;; modus-operandi-tinted-theme.el --- Elegant, highly legible theme with a light ochre background -*- lexical-binding:t -*- +;;; modus-operandi-tinted-theme.el --- Elegant, highly legible theme with a light ocher background -*- lexical-binding:t -*- ;; Copyright (C) 2019-2024 Free Software Foundation, Inc. @@ -44,7 +44,7 @@ ;;;###theme-autoload (deftheme modus-operandi-tinted - "Elegant, highly legible theme with a light ochre background. + "Elegant, highly legible theme with a light ocher background. Conforms with the highest legibility standard for color contrast between background and foreground in any given piece of text, which corresponds to a minimum contrast in relative luminance of diff --git a/etc/themes/modus-themes.el b/etc/themes/modus-themes.el index c2ffc6e3593..26b902bfc02 100644 --- a/etc/themes/modus-themes.el +++ b/etc/themes/modus-themes.el @@ -1449,7 +1449,7 @@ color that is combined with FG-FOR-BG." :foreground fg :weight ;; If we have `bold' specifically, we inherit the face of - ;; the same name. This allows the user to customise that + ;; the same name. This allows the user to customize that ;; face, such as to change its font family. (if (and weight (not (eq weight 'bold))) weight diff --git a/exec/trace.c b/exec/trace.c index 2af6d867efe..5e1ef1f74a1 100644 --- a/exec/trace.c +++ b/exec/trace.c @@ -1917,7 +1917,7 @@ after_fork (pid_t pid) /* Request that the child stop upon the next `exec' system call, one of which is assumed to always be issued by the child, as below, but await the next stop, and examine its contents. - Anciently, the syscall-stop preceeded events marked + Anciently, the syscall-stop preceded events marked PTRACE_EVENT_SECCOMP, whereas this sequence is reversed in 4.8+, and in releases with these changes backported. */ diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el index da351e99d91..f37bb965ffb 100644 --- a/lisp/emacs-lisp/comp.el +++ b/lisp/emacs-lisp/comp.el @@ -3667,7 +3667,7 @@ the compilation was successful return the compiled function." "Native compile if necessary all the .el files present in DIRECTORY. Each .el file is native-compiled if the corresponding .eln file is not found in any directory mentioned in `native-comp-eln-load-path'. -The search within DIRECTORY is perfomed recursively." +The search within DIRECTORY is performed recursively." (mapc (lambda (file) (unless (comp-lookup-eln file) (native-compile file))) diff --git a/lisp/emacs-lisp/cond-star.el b/lisp/emacs-lisp/cond-star.el index 0e4718f088d..7ba6bf369b0 100644 --- a/lisp/emacs-lisp/cond-star.el +++ b/lisp/emacs-lisp/cond-star.el @@ -22,7 +22,7 @@ ;;; Commentary: -;; This library implements `cond*', an alternative to 'pcase'. +;; This library implements `cond*', an alternative to `pcase'. ;; Here is the list of functions the generated code is known to call: ;; car, cdr, car-safe, cdr-safe, nth, nthcdr, null, eq, equal, eql, =, diff --git a/lisp/emacs-lisp/easy-mmode.el b/lisp/emacs-lisp/easy-mmode.el index db00e929ea9..9c429828b13 100644 --- a/lisp/emacs-lisp/easy-mmode.el +++ b/lisp/emacs-lisp/easy-mmode.el @@ -764,7 +764,7 @@ CSS contains a list of syntax specifications of the form (CHAR . SYNTAX)." ;;; (defun easy-mmode--prev (re name count &optional endfun narrowfun) - "Go to the COUNT'th previous occurence of RE. + "Go to the COUNT'th previous occurrence of RE. If none, error with NAME. @@ -788,7 +788,7 @@ ENDFUN and NARROWFUN are treated like in `easy-mmode-define-navigation'." (when re-narrow (funcall narrowfun))))) (defun easy-mmode--next (re name count &optional endfun narrowfun) - "Go to the next COUNT'th occurence of RE. + "Go to the next COUNT'th occurrence of RE. If none, error with NAME. diff --git a/lisp/eshell/esh-proc.el b/lisp/eshell/esh-proc.el index 4755996c40c..99ac22b2a80 100644 --- a/lisp/eshell/esh-proc.el +++ b/lisp/eshell/esh-proc.el @@ -522,7 +522,7 @@ output." ;; where this matters, using an external pipe ;; operator (`*|') may work instead. (cond - ;; Delay signalling remote processes to prevent + ;; Delay signaling remote processes to prevent ;; "Forbidden reentrant call of Tramp". ((process-get proc 'remote-pid) (run-at-time 0 nil #'signal-process proc 'SIGPIPE)) diff --git a/lisp/net/tramp-sh.el b/lisp/net/tramp-sh.el index 0182c8f8eb8..e9b11090022 100644 --- a/lisp/net/tramp-sh.el +++ b/lisp/net/tramp-sh.el @@ -3754,7 +3754,7 @@ Fall back to normal file name handler if no Tramp handler exists." ;; When `tramp-mode' is not enabled, or the file name is not a ;; remote file name, we don't do anything. Same for default - ;; file namne handlers. + ;; file name handlers. (tramp-run-real-handler operation args)))) (defun tramp-sh-handle-file-notify-add-watch (file-name flags _callback) diff --git a/lisp/obsolete/idlw-complete-structtag.el b/lisp/obsolete/idlw-complete-structtag.el index b1e8a891c18..02a3c1bccfd 100644 --- a/lisp/obsolete/idlw-complete-structtag.el +++ b/lisp/obsolete/idlw-complete-structtag.el @@ -28,7 +28,7 @@ ;; NOTE: IDLWAVE has been moved to GNU ELPA. The version bundled with ;; Emacs is out-of-date, marked as obsolete, and will be removed -;; in a future release. Please use `M-x package-list' to install +;; in a future release. Please use `M-x list-packages' to install ;; IDLWAVE from GNU ELPA instead of using this version. ;; Completion of structure tags can be done automatically in the diff --git a/lisp/obsolete/idlw-help.el b/lisp/obsolete/idlw-help.el index 3fc654407b3..4fed46b2157 100644 --- a/lisp/obsolete/idlw-help.el +++ b/lisp/obsolete/idlw-help.el @@ -27,7 +27,7 @@ ;; NOTE: IDLWAVE has been moved to GNU ELPA. The version bundled with ;; Emacs is out-of-date, marked as obsolete, and will be removed -;; in a future release. Please use `M-x package-list' to install +;; in a future release. Please use `M-x list-packages' to install ;; IDLWAVE from GNU ELPA instead of using this version. ;; The help link information for IDLWAVE's online help feature for diff --git a/lisp/obsolete/idlw-shell.el b/lisp/obsolete/idlw-shell.el index 2abf4b5e6dc..ae32a50bcc8 100644 --- a/lisp/obsolete/idlw-shell.el +++ b/lisp/obsolete/idlw-shell.el @@ -29,7 +29,7 @@ ;; NOTE: IDLWAVE has been moved to GNU ELPA. The version bundled with ;; Emacs is out-of-date, marked as obsolete, and will be removed -;; in a future release. Please use `M-x package-list' to install +;; in a future release. Please use `M-x list-packages' to install ;; IDLWAVE from GNU ELPA instead of using this version. ;; This mode is for IDL version 5 or later. diff --git a/lisp/obsolete/idlw-toolbar.el b/lisp/obsolete/idlw-toolbar.el index 4e7d336ec31..900177c2cb3 100644 --- a/lisp/obsolete/idlw-toolbar.el +++ b/lisp/obsolete/idlw-toolbar.el @@ -27,7 +27,7 @@ ;; NOTE: IDLWAVE has been moved to GNU ELPA. The version bundled with ;; Emacs is out-of-date, marked as obsolete, and will be removed -;; in a future release. Please use `M-x package-list' to install +;; in a future release. Please use `M-x list-packages' to install ;; IDLWAVE from GNU ELPA instead of using this version. ;; This file implements a debugging toolbar for IDLWAVE. diff --git a/lisp/obsolete/idlwave.el b/lisp/obsolete/idlwave.el index b456a542d35..8dd98b192b6 100644 --- a/lisp/obsolete/idlwave.el +++ b/lisp/obsolete/idlwave.el @@ -29,7 +29,7 @@ ;; NOTE: IDLWAVE has been moved to GNU ELPA. The version bundled with ;; Emacs is out-of-date, marked as obsolete, and will be removed -;; in a future release. Please use `M-x package-list' to install +;; in a future release. Please use `M-x list-packages' to install ;; IDLWAVE from GNU ELPA instead of using this version. ;; IDLWAVE enables feature-rich development and interaction with IDL, diff --git a/lisp/progmodes/cc-defs.el b/lisp/progmodes/cc-defs.el index b6137c02ca9..42dd6fffe53 100644 --- a/lisp/progmodes/cc-defs.el +++ b/lisp/progmodes/cc-defs.el @@ -1569,7 +1569,7 @@ Return the position of the first removed property, or nil." (defmacro c-clear-syntax-table-with-value-trim-caches (from to value) "Remove all `syntax-table' text-properties with value VALUE from [FROM, TO) -and invalidate the four caches from the first postion, if any, where a +and invalidate the four caches from the first position, if any, where a property was removed. Return the position of the first property removed, if any, else nil. POINT and the match data remain unchanged." (declare (debug t)) diff --git a/lisp/progmodes/cperl-mode.el b/lisp/progmodes/cperl-mode.el index 8a3f183231e..87ff3e86a41 100644 --- a/lisp/progmodes/cperl-mode.el +++ b/lisp/progmodes/cperl-mode.el @@ -7894,7 +7894,7 @@ LEVEL us the current level during the recursive calls." ;;"[*/+-|&<.]+=" ) "\\|") - "Lisp Regular expression for things regularly occuring in a Perl regex. + "Lisp Regular expression for things regularly occurring in a Perl regex. If matches at the start of match found by `my-bad-c-style-regexp', insertion of a whitespace will not help.") diff --git a/lisp/progmodes/typescript-ts-mode.el b/lisp/progmodes/typescript-ts-mode.el index ef5dbe51ada..860588995be 100644 --- a/lisp/progmodes/typescript-ts-mode.el +++ b/lisp/progmodes/typescript-ts-mode.el @@ -87,7 +87,7 @@ (defun typescript-ts-mode--check-dialect (dialect) (unless (or (eq dialect 'typescript) (eq dialect 'tsx)) (signal 'typescript-ts-mode-wrong-dialect-error - (list "Unsupported dialect for typescript-ts-mode suplied" dialect)))) + (list "Unsupported dialect for typescript-ts-mode supplied" dialect)))) (defun tsx-ts-mode--indent-compatibility-b893426 () "Indent rules helper, to handle different releases of tree-sitter-tsx. diff --git a/lisp/simple.el b/lisp/simple.el index 3a142ef14b3..dde6be4d78a 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -5820,7 +5820,7 @@ move the yanking point; just return the Nth kill forward." (defcustom kill-region-dwim nil "Behavior when `kill-region' is invoked without an active region. If set to nil (default), kill the region even if it is inactive, -signalling an error if there is no region. +signaling an error if there is no region. If set to `emacs-word', kill the last word as defined by the current major mode. If set to `unix-word', kill the last word in the style of a shell like @@ -5860,7 +5860,7 @@ Supply two arguments, character positions BEG and END indicating the `region', the function ignores BEG and END, and kills the current region instead. Interactively, REGION is always non-nil, and so this command always kills the current region. It is possible to - override this behavior by customising the user option + override this behavior by customizing the user option `kill-region-dwim'." ;; Pass mark first, then point, because the order matters when ;; calling `kill-append'. diff --git a/src/w32dwrite.c b/src/w32dwrite.c index 29f9d5f1fed..26ad4e9f9a2 100644 --- a/src/w32dwrite.c +++ b/src/w32dwrite.c @@ -722,7 +722,7 @@ get_bitmap_render_target (HDC hdc, int width, int height) if (!verify_hr (hr, "Failed to CreateBitmapRenderTarget")) return NULL; - /* We handle high dpi displays by incresing font size, so override + /* We handle high dpi displays by increasing font size, so override PixelsPerDip. */ brt->lpVtbl->SetPixelsPerDip (brt, 1.0); diff --git a/src/w32font.c b/src/w32font.c index 48968a28fbd..2e6f8bed3e7 100644 --- a/src/w32font.c +++ b/src/w32font.c @@ -892,7 +892,7 @@ w32font_otf_drive (struct font *font, Lisp_Object features, Windows fonts in Emacs's sources, this cannot be fixed in the the default fontset setup provided by Emacs: we cannot arrange for the "good" fonts to be used in all such cases, because that would mean - naming those fonts. The solution for thes issues is to customize the + naming those fonts. The solution for these issues is to customize the default fontset using set-fontset-font, to force Emacs to use a font known to support some characters. diff --git a/test/lisp/erc/erc-scenarios-log.el b/test/lisp/erc/erc-scenarios-log.el index 4ff1b956aea..06fbc37a08a 100644 --- a/test/lisp/erc/erc-scenarios-log.el +++ b/test/lisp/erc/erc-scenarios-log.el @@ -267,7 +267,7 @@ (should (string= (buffer-name) (format "127.0.0.1:%d" port))) (should-not (file-exists-p logserv)) (should-not (file-exists-p logchan)) - ;; Verify that truncation actally happens where it should. + ;; Verify that truncation actually happens where it should. (funcall assert-truncation expect) (should (file-exists-p logserv)))) diff --git a/test/lisp/erc/erc-track-tests.el b/test/lisp/erc/erc-track-tests.el index c830c8b2016..59b200a2fe8 100644 --- a/test/lisp/erc/erc-track-tests.el +++ b/test/lisp/erc/erc-track-tests.el @@ -314,7 +314,7 @@ (push (list (point)) bounds) (insert ; JOIN - ts " " ; iniital `fill' indentation lacks properties + ts " " ; initial `fill' indentation lacks properties #("*** You have joined channel #chan" 0 33 (font-lock-face erc-notice-face)) "\n") diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el index 59b4bbb7c6a..5df3dadf5c9 100644 --- a/test/lisp/net/tramp-tests.el +++ b/test/lisp/net/tramp-tests.el @@ -8058,7 +8058,7 @@ process sentinels. They shall not disturb each other." ;; We want to see the timeout message. (tramp--test-instrument-test-case 3 (sleep-for 2)) - ;; Session cancelled, no password in cache. + ;; Session canceled, no password in cache. (should-not (password-in-cache-p (auth-source-format-cache-entry