aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorEli Zaretskii2024-10-05 07:41:22 -0400
committerEli Zaretskii2024-10-05 07:41:22 -0400
commit7949452350ca69a7d3e56c1e16fa35f81d8fdf50 (patch)
treed971236313eec19419cf5ed9590974be08db96cf
parentb2ebba1d3cdcda9197ddce9ee14cd6184eca7131 (diff)
parentb68b9f291cc52f6120858534ff450fa7f6381d0b (diff)
downloademacs-7949452350ca69a7d3e56c1e16fa35f81d8fdf50.tar.gz
emacs-7949452350ca69a7d3e56c1e16fa35f81d8fdf50.zip
Merge from origin/emacs-30
b68b9f291cc ; * lisp/progmodes/csharp-mode.el (treesit-query-compile)... 688201ef18d ; * lisp/window.el (switch-to-prev-buffer-skip-regexp): D... ba44fc9a447 Restore comment/string check for 'electric-layout-mode' 5a462948e13 Update Arni Magnusson's email address 6b1271b169a Fix python-ts-mode-map docstring aaaafddc945 Normalize "Commentary" section in eudc.el d656be9794d Expand email abbrevs in X-Debbugs-Cc header. e9dcf0c57dd Fix 'list-tags' when invoked from a non-file buffer 51ef05f684c count-windows: Fix reference to walk-windows 5eaf0c784bf * lisp/info-look.el (mapc): Add use-package manual's index. 705a5a1a9e6 ; * ChangeLog.4: Fix attribution of one change. bf26ff0dc8d Update csharp-ts-mode font-lock (bug#73369) 4c866abab96 ; * doc/lispref/variables.texi (Creating Buffer-Local): F... d42d7d474fe ; * lisp/doc-view.el (doc-view-svg-face): Copy-edit docst... f46f476bb8f ; * admin/MAINTAINERS: Take VC subsystem, add note about ... d68e6d2689d ; rcirc-update-activity-string: Justify some existing beh... e6a37869c8d Fix inconsistency in value of rcirc-activity-string 108b3179bd4 Revert "; Minor clarification in variables.texi" 44156c21407 ; Minor clarification in variables.texi 63058e1153a Tag interactive commands in 'lua-ts-mode' 84bea20eba2 ; * lisp/info-look.el: Add two more links. 96b87ad5363 Mention LSP acronym in eglot defgroup docstring 9c904e8ceae Change :group of 'eglot' defgroup to 'tools' fd1a1b07805 Remove out-of-date documentation from python.el 11e3e0cadd4 Fix executing commands in Eshell using "env" with no loca... c0ef8a9a1b3 Fix a typo in the calendar manual 36ff7138feb ; Fix a thinko in sieve-manage.el 7abecbcd633 ; * nt/INSTALL: Update MinGW notes URL. (Bug#73528) # Conflicts: # admin/MAINTAINERS
-rw-r--r--.mailmap1
-rw-r--r--ChangeLog.42
-rw-r--r--admin/MAINTAINERS13
-rw-r--r--doc/emacs/calendar.texi2
-rw-r--r--doc/emacs/maintaining.texi15
-rw-r--r--doc/lispref/ChangeLog.12
-rw-r--r--doc/lispref/variables.texi4
-rw-r--r--doc/misc/ChangeLog.12
-rw-r--r--lisp/ChangeLog.162
-rw-r--r--lisp/ChangeLog.174
-rw-r--r--lisp/doc-view.el2
-rw-r--r--lisp/electric.el8
-rw-r--r--lisp/eshell/esh-var.el3
-rw-r--r--lisp/info-look.el3
-rw-r--r--lisp/mail/mailabbrev.el2
-rw-r--r--lisp/mail/mailalias.el4
-rw-r--r--lisp/net/eudc.el38
-rw-r--r--lisp/net/rcirc.el18
-rw-r--r--lisp/net/sieve-manage.el3
-rw-r--r--lisp/progmodes/bat-mode.el4
-rw-r--r--lisp/progmodes/csharp-mode.el156
-rw-r--r--lisp/progmodes/eglot.el4
-rw-r--r--lisp/progmodes/etags.el37
-rw-r--r--lisp/progmodes/lua-ts-mode.el6
-rw-r--r--lisp/progmodes/python.el19
-rw-r--r--lisp/window.el5
-rw-r--r--nt/INSTALL2
-rw-r--r--test/lisp/eshell/esh-var-tests.el5
28 files changed, 246 insertions, 120 deletions
diff --git a/.mailmap b/.mailmap
index 9647749940f..bbfe4bceba1 100644
--- a/.mailmap
+++ b/.mailmap
@@ -26,6 +26,7 @@ Andrew G Cohen <cohen@andy.bu.edu>
26Andrew G Cohen <cohen@andy.bu.edu> <cohen@bu.edu> 26Andrew G Cohen <cohen@andy.bu.edu> <cohen@bu.edu>
27Arash Esbati <arash@gnu.org> <arash.esbati@gmail.com> 27Arash Esbati <arash@gnu.org> <arash.esbati@gmail.com>
28Arash Esbati <arash@gnu.org> <esbati@gmx.de> 28Arash Esbati <arash@gnu.org> <esbati@gmx.de>
29Arni Magnusson <thisisarni@gmail.com> <arnima@hafro.is>
29Artur Malabarba <bruce.connor.am@gmail.com> <am12548@it055607.users.bris.ac.uk> 30Artur Malabarba <bruce.connor.am@gmail.com> <am12548@it055607.users.bris.ac.uk>
30Artur Malabarba <bruce.connor.am@gmail.com> Artur Malabarba <address@hidden> 31Artur Malabarba <bruce.connor.am@gmail.com> Artur Malabarba <address@hidden>
31Basil L. Contovounesios <basil@contovou.net> <contovob@tcd.ie> 32Basil L. Contovounesios <basil@contovou.net> <contovob@tcd.ie>
diff --git a/ChangeLog.4 b/ChangeLog.4
index 4bd583818ef..975750f40cd 100644
--- a/ChangeLog.4
+++ b/ChangeLog.4
@@ -11433,7 +11433,7 @@
11433 11433
11434 * etc/NEWS: Update announcement. 11434 * etc/NEWS: Update announcement.
11435 11435
114362024-05-15 Sean Whitton <spwhitton@spwhitton.name> 114362024-05-15 Stefan Monnier <monnier@iro.umontreal.ca>
11437 11437
11438 (eglot--managed-mode): Avoid calling track-changes unregistered 11438 (eglot--managed-mode): Avoid calling track-changes unregistered
11439 11439
diff --git a/admin/MAINTAINERS b/admin/MAINTAINERS
index be21a28b759..413a587d398 100644
--- a/admin/MAINTAINERS
+++ b/admin/MAINTAINERS
@@ -238,9 +238,22 @@ Yuan Fu
238 lisp/treesit.el 238 lisp/treesit.el
239 lisp/progmodes/c-ts-common.el 239 lisp/progmodes/c-ts-common.el
240 240
241Sean Whitton
242 VC
243 lisp/vc/*
244 doc/emacs/files.texi (Diff Mode)
245 doc/emacs/maintaining.texi (Version Control)
246 doc/emacs/vc*-xtra.texi
247 doc/emacs/emerge-xtra.texi
248 doc/misc/ediff.texi
249 test/lisp/vc/*
250
241============================================================================== 251==============================================================================
2422. Areas that someone is willing to maintain, although he would not 2522. Areas that someone is willing to maintain, although he would not
243necessarily mind if someone else was the official maintainer. 253necessarily mind if someone else was the official maintainer.
254This list also includes people who are in the process of handing over
255maintainership to someone listed above, but who want to continue to be
256CC'd as though they were still the primary maintainer, in the meantime.
244============================================================================== 257==============================================================================
245 258
246Kelvin White 259Kelvin White
diff --git a/doc/emacs/calendar.texi b/doc/emacs/calendar.texi
index f511b789796..f6de2e77135 100644
--- a/doc/emacs/calendar.texi
+++ b/doc/emacs/calendar.texi
@@ -106,7 +106,7 @@ commands for moving by characters and by lines. Just as @kbd{C-n}
106usually moves to the same column in the following line, in Calendar 106usually moves to the same column in the following line, in Calendar
107mode it is bound to @code{calendar-forward-week}, which moves to the 107mode it is bound to @code{calendar-forward-week}, which moves to the
108same day in the following week. And @kbd{C-p} 108same day in the following week. And @kbd{C-p}
109(@code{calendar-backward-week} moves to the same day in the previous 109(@code{calendar-backward-week}) moves to the same day in the previous
110week. @kbd{C-f} (@code{calendar-forward-day}) and @kbd{C-b} 110week. @kbd{C-f} (@code{calendar-forward-day}) and @kbd{C-b}
111(@code{calendar-backward-day}) move forward and back by days. 111(@code{calendar-backward-day}) move forward and back by days.
112 112
diff --git a/doc/emacs/maintaining.texi b/doc/emacs/maintaining.texi
index 0ec2385860b..4ac751a71af 100644
--- a/doc/emacs/maintaining.texi
+++ b/doc/emacs/maintaining.texi
@@ -2673,14 +2673,13 @@ loaded, this command can use it to generate completion candidates.
2673@xref{Symbol Completion}. 2673@xref{Symbol Completion}.
2674 2674
2675@findex list-tags 2675@findex list-tags
2676 @kbd{M-x list-tags} reads the name of one of the files covered by 2676 @kbd{M-x list-tags} reads the name of one of the files covered by the
2677the selected tags table, and displays a list of tags defined in that 2677selected tags table, with completion, and displays the list of tags
2678file. Do not include a directory as part of the file name unless the 2678defined in that file; it offers the current buffer's file name as the
2679file name recorded in the tags table includes a directory. This 2679default file whose tags to list. Do not include a directory as part of
2680command works only with the etags backend, and requires a tags table 2680the file name unless the file name recorded in the tags table includes a
2681for the project to be available. @xref{Tags Tables}. If used 2681directory. This command works only with the etags backend, and requires
2682interactively, the default tag is file name of the current buffer if 2682a tags table for the project to be available. @xref{Tags Tables}.
2683used interactively.
2684 2683
2685@findex tags-next-file 2684@findex tags-next-file
2686 @kbd{M-x tags-next-file} visits files covered by the selected tags table. 2685 @kbd{M-x tags-next-file} visits files covered by the selected tags table.
diff --git a/doc/lispref/ChangeLog.1 b/doc/lispref/ChangeLog.1
index e2d4c019b4a..a508ad9f28b 100644
--- a/doc/lispref/ChangeLog.1
+++ b/doc/lispref/ChangeLog.1
@@ -5551,7 +5551,7 @@
5551 * loading.texi (Hooks for Loading): Document after-load-functions. 5551 * loading.texi (Hooks for Loading): Document after-load-functions.
5552 Copyedits. 5552 Copyedits.
5553 5553
55542010-03-24 Arni Magnusson <arnima@hafro.is> (tiny change) 55542010-03-24 Arni Magnusson <thisisarni@gmail.com> (tiny change)
5555 5555
5556 * frames.texi (Cursor Parameters): Fix typo. (Bug#5760) 5556 * frames.texi (Cursor Parameters): Fix typo. (Bug#5760)
5557 5557
diff --git a/doc/lispref/variables.texi b/doc/lispref/variables.texi
index 76f15b2595c..af11e498d86 100644
--- a/doc/lispref/variables.texi
+++ b/doc/lispref/variables.texi
@@ -1732,11 +1732,11 @@ buffer-local variables interactively.
1732@defun kill-all-local-variables &optional kill-permanent 1732@defun kill-all-local-variables &optional kill-permanent
1733This function eliminates all the buffer-local variable bindings of the 1733This function eliminates all the buffer-local variable bindings of the
1734current buffer. As a result, the buffer will see the default values 1734current buffer. As a result, the buffer will see the default values
1735of most variables. By default, for variables marked as permanent and 1735of most variables. By default, variables marked as permanent and
1736local hook functions that have a non-@code{nil} 1736local hook functions that have a non-@code{nil}
1737@code{permanent-local-hook} property (@pxref{Setting Hooks}) won't be 1737@code{permanent-local-hook} property (@pxref{Setting Hooks}) won't be
1738killed, but if the optional @var{kill-permanent} argument is 1738killed, but if the optional @var{kill-permanent} argument is
1739non-@code{nil}, even these variables will be killed. 1739non-@code{nil}, even those variables will be killed.
1740 1740
1741This function also resets certain other information pertaining to the 1741This function also resets certain other information pertaining to the
1742buffer: it sets the local keymap to @code{nil}, the syntax table to the 1742buffer: it sets the local keymap to @code{nil}, the syntax table to the
diff --git a/doc/misc/ChangeLog.1 b/doc/misc/ChangeLog.1
index 37b304c2dca..14570bb174f 100644
--- a/doc/misc/ChangeLog.1
+++ b/doc/misc/ChangeLog.1
@@ -6407,7 +6407,7 @@
6407 * epa.texi (Mail-mode integration): Mention the way to do 6407 * epa.texi (Mail-mode integration): Mention the way to do
6408 "encrypt-to-self". (Bug#1807) 6408 "encrypt-to-self". (Bug#1807)
6409 6409
64102009-02-05 Arni Magnusson <arnima@hafro.is> (tiny change) 64102009-02-05 Arni Magnusson <thisisarni@gmail.com> (tiny change)
6411 6411
6412 * ada-mode.texi (No project files): Fix typo. (Bug#2214) 6412 * ada-mode.texi (No project files): Fix typo. (Bug#2214)
6413 6413
diff --git a/lisp/ChangeLog.16 b/lisp/ChangeLog.16
index fa956ac8784..6d807fbd44d 100644
--- a/lisp/ChangeLog.16
+++ b/lisp/ChangeLog.16
@@ -25198,7 +25198,7 @@
25198 * emacs-lisp/package-x.el (package-upload-buffer-internal): 25198 * emacs-lisp/package-x.el (package-upload-buffer-internal):
25199 Use `equal' for upload base check. 25199 Use `equal' for upload base check.
25200 25200
252012011-03-08 Arni Magnusson <arnima@hafro.is> (tiny change) 252012011-03-08 Arni Magnusson <thisisarni@gmail.com> (tiny change)
25202 25202
25203 * textmodes/texinfo.el (texinfo-environments): 25203 * textmodes/texinfo.el (texinfo-environments):
25204 Add deftypecv, deftypeivar, deftypemethod, deftypeop, html. (Bug#2783) 25204 Add deftypecv, deftypeivar, deftypemethod, deftypeop, html. (Bug#2783)
diff --git a/lisp/ChangeLog.17 b/lisp/ChangeLog.17
index 3eec2da2038..e6c35f63a20 100644
--- a/lisp/ChangeLog.17
+++ b/lisp/ChangeLog.17
@@ -6706,7 +6706,7 @@
67062014-10-12 Stefan Monnier <monnier@iro.umontreal.ca> 67062014-10-12 Stefan Monnier <monnier@iro.umontreal.ca>
6707 6707
6708 * progmodes/bat-mode.el (bat-font-lock-keywords): Fix \\<_ typo 6708 * progmodes/bat-mode.el (bat-font-lock-keywords): Fix \\<_ typo
6709 (bug#18622). Reported by Arni Magnusson <arnima@hafro.is>. 6709 (bug#18622). Reported by Arni Magnusson <thisisarni@gmail.com>.
6710 * progmodes/prolog.el (prolog-electric--underscore): Same. 6710 * progmodes/prolog.el (prolog-electric--underscore): Same.
6711 6711
67122014-10-12 Michael Albinus <michael.albinus@gmx.de> 67122014-10-12 Michael Albinus <michael.albinus@gmx.de>
@@ -20214,7 +20214,7 @@
20214 (dos-mode-syntax-table): Don't use "w" for symbol chars. 20214 (dos-mode-syntax-table): Don't use "w" for symbol chars.
20215 (dos-font-lock-keywords): Try to adjust font-lock rules accordingly. 20215 (dos-font-lock-keywords): Try to adjust font-lock rules accordingly.
20216 20216
202172013-08-07 Arni Magnusson <arnima@hafro.is> 202172013-08-07 Arni Magnusson <thisisarni@gmail.com>
20218 20218
20219 * progmodes/dos.el: New file. 20219 * progmodes/dos.el: New file.
20220 * generic-x.el (bat-generic-mode): Redefine as an obsolete alias to 20220 * generic-x.el (bat-generic-mode): Redefine as an obsolete alias to
diff --git a/lisp/doc-view.el b/lisp/doc-view.el
index 78dc472ddc3..446beeafd9f 100644
--- a/lisp/doc-view.el
+++ b/lisp/doc-view.el
@@ -260,7 +260,7 @@ showing only titles and no page number."
260See `doc-view-mupdf-use-svg'. 260See `doc-view-mupdf-use-svg'.
261 261
262Only background and foreground colors are used as the SVG image's 262Only background and foreground colors are used as the SVG image's
263descriptors, see (info \"(elisp) SVG Images\"). Non-standard values may 263descriptors; see (info \"(elisp) SVG Images\"). Custom values may
264cause low-contrast issues with certain documents." 264cause low-contrast issues with certain documents."
265 :version "30.1") 265 :version "30.1")
266 266
diff --git a/lisp/electric.el b/lisp/electric.el
index d02bcb4735b..d84faf5433f 100644
--- a/lisp/electric.el
+++ b/lisp/electric.el
@@ -385,6 +385,9 @@ If multiple rules match, only first one is executed.")
385(defvar electric-layout-allow-duplicate-newlines nil 385(defvar electric-layout-allow-duplicate-newlines nil
386 "If non-nil, allow duplication of `before' newlines.") 386 "If non-nil, allow duplication of `before' newlines.")
387 387
388(defvar electric-layout-allow-in-comment-or-string nil
389 "If non-nil, allow inserting newlines inside a comment or string.")
390
388(defun electric-layout-post-self-insert-function () 391(defun electric-layout-post-self-insert-function ()
389 (when electric-layout-mode 392 (when electric-layout-mode
390 (electric-layout-post-self-insert-function-1))) 393 (electric-layout-post-self-insert-function-1)))
@@ -409,7 +412,10 @@ If multiple rules match, only first one is executed.")
409 (goto-char pos) 412 (goto-char pos)
410 (funcall probe last-command-event)))) 413 (funcall probe last-command-event))))
411 (when res (throw 'done res)))))))))) 414 (when res (throw 'done res))))))))))
412 (when rule 415 (when (and rule
416 (or electric-layout-allow-in-comment-or-string
417 ;; Not in a comment or string.
418 (not (nth 8 (save-excursion (syntax-ppss pos))))))
413 (goto-char pos) 419 (goto-char pos)
414 (when (functionp rule) (setq rule (funcall rule))) 420 (when (functionp rule) (setq rule (funcall rule)))
415 (dolist (sym (if (symbolp rule) (list rule) rule)) 421 (dolist (sym (if (symbolp rule) (list rule) rule))
diff --git a/lisp/eshell/esh-var.el b/lisp/eshell/esh-var.el
index 0e6c01d2774..5d7ea1c3664 100644
--- a/lisp/eshell/esh-var.el
+++ b/lisp/eshell/esh-var.el
@@ -436,7 +436,8 @@ the values of nil for each."
436 :usage "[NAME=VALUE]... [COMMAND]...") 436 :usage "[NAME=VALUE]... [COMMAND]...")
437 (if args 437 (if args
438 (or (eshell-parse-local-variables args) 438 (or (eshell-parse-local-variables args)
439 (eshell-named-command (car args) (cdr args))) 439 (throw 'eshell-replace-command
440 `(eshell-named-command ,(car args) ',(cdr args))))
440 (eshell-with-buffered-print 441 (eshell-with-buffered-print
441 (dolist (setting (sort (eshell-environment-variables) 'string-lessp)) 442 (dolist (setting (sort (eshell-environment-variables) 'string-lessp))
442 (eshell-buffered-print setting "\n")))))) 443 (eshell-buffered-print setting "\n"))))))
diff --git a/lisp/info-look.el b/lisp/info-look.el
index 3066bc1d75d..a84026ac8b9 100644
--- a/lisp/info-look.el
+++ b/lisp/info-look.el
@@ -30,6 +30,8 @@
30;; Scheme: https://groups.csail.mit.edu/mac/ftpdir/scm/r5rs.info.tar.gz 30;; Scheme: https://groups.csail.mit.edu/mac/ftpdir/scm/r5rs.info.tar.gz
31;; LaTeX: https://mirrors.ctan.org/info/latex2e-help-texinfo/latex2e.texi 31;; LaTeX: https://mirrors.ctan.org/info/latex2e-help-texinfo/latex2e.texi
32;; (or CTAN mirrors) 32;; (or CTAN mirrors)
33;; Python: https://www.python.org/ftp/python/doc/
34;; SICP: https://github.com/webframp/sicp-info
33 35
34;; Traditionally, makeinfo quoted `like this', but version 5 and later 36;; Traditionally, makeinfo quoted `like this', but version 5 and later
35;; quotes 'like this' or ‘like this’. Doc specs with patterns 37;; quotes 'like this' or ‘like this’. Doc specs with patterns
@@ -1082,6 +1084,7 @@ Return nil if there is nothing appropriate in the buffer near point."
1082 ("srecode" "Index") 1084 ("srecode" "Index")
1083 ("tramp" "Variable Index" "Function Index") 1085 ("tramp" "Variable Index" "Function Index")
1084 ("url" "Variable Index" "Function Index") 1086 ("url" "Variable Index" "Function Index")
1087 ("use-package" "Index")
1085 ("vhdl" "(vhdl-mode)Variable Index" "(vhdl-mode)Command Index") 1088 ("vhdl" "(vhdl-mode)Variable Index" "(vhdl-mode)Command Index")
1086 ("viper" "Variable Index" "Function Index") 1089 ("viper" "Variable Index" "Function Index")
1087 ("vtable" "Index") 1090 ("vtable" "Index")
diff --git a/lisp/mail/mailabbrev.el b/lisp/mail/mailabbrev.el
index c8006294a7d..16e9d6f1bea 100644
--- a/lisp/mail/mailabbrev.el
+++ b/lisp/mail/mailabbrev.el
@@ -410,7 +410,7 @@ with a space."
410;;; Syntax tables and abbrev-expansion 410;;; Syntax tables and abbrev-expansion
411 411
412(defcustom mail-abbrev-mode-regexp 412(defcustom mail-abbrev-mode-regexp
413 "^\\(Resent-\\)?\\(To\\|From\\|Cc\\|Bcc\\|Reply-To\\):" 413 "^\\(Resent-\\)?\\(To\\|From\\|Cc\\|Bcc\\|Reply-To\\|X-Debbugs-Cc\\):"
414 "Regexp matching mail headers in which mail abbrevs should be expanded. 414 "Regexp matching mail headers in which mail abbrevs should be expanded.
415This string will be handed to `looking-at' with point at the beginning 415This string will be handed to `looking-at' with point at the beginning
416of the current line; if it matches, abbrev mode will be turned on, otherwise 416of the current line; if it matches, abbrev mode will be turned on, otherwise
diff --git a/lisp/mail/mailalias.el b/lisp/mail/mailalias.el
index cce2fcb104d..ca4ff67a6ac 100644
--- a/lisp/mail/mailalias.el
+++ b/lisp/mail/mailalias.el
@@ -50,7 +50,7 @@
50When t this still needs to be initialized.") 50When t this still needs to be initialized.")
51 51
52(defvar mail-address-field-regexp 52(defvar mail-address-field-regexp
53 "^\\(Resent-\\)?\\(To\\|From\\|Cc\\|Bcc\\|Reply-To\\):") 53 "^\\(Resent-\\)?\\(To\\|From\\|Cc\\|Bcc\\|Reply-To\\|X-Debbugs-Cc\\):")
54 54
55;; `pattern' is bound dynamically before evaluating the forms in 55;; `pattern' is bound dynamically before evaluating the forms in
56;; `mail-complete-alist' and may be part of user customizations of 56;; `mail-complete-alist' and may be part of user customizations of
@@ -61,7 +61,7 @@ When t this still needs to be initialized.")
61(defcustom mail-complete-alist 61(defcustom mail-complete-alist
62 ;; Don't refer to mail-address-field-regexp here; 62 ;; Don't refer to mail-address-field-regexp here;
63 ;; that confuses some things such as cus-dep.el. 63 ;; that confuses some things such as cus-dep.el.
64 '(("^\\(Resent-\\)?\\(To\\|From\\|Cc\\|Bcc\\|Reply-To\\):" 64 '(("^\\(Resent-\\)?\\(To\\|From\\|Cc\\|Bcc\\|Reply-To\\|X-Debbugs-Cc\\):"
65 . (mail-get-names pattern)) 65 . (mail-get-names pattern))
66 ("Newsgroups:" . (if (boundp 'gnus-active-hashtb) 66 ("Newsgroups:" . (if (boundp 'gnus-active-hashtb)
67 gnus-active-hashtb 67 gnus-active-hashtb
diff --git a/lisp/net/eudc.el b/lisp/net/eudc.el
index da8955d52c9..9e640768285 100644
--- a/lisp/net/eudc.el
+++ b/lisp/net/eudc.el
@@ -23,25 +23,27 @@
23;; along with GNU Emacs. If not, see <https://www.gnu.org/licenses/>. 23;; along with GNU Emacs. If not, see <https://www.gnu.org/licenses/>.
24 24
25;;; Commentary: 25;;; Commentary:
26;; This package provides a common interface to query directory servers using 26
27;; different protocols such as LDAP, CCSO PH/QI or BBDB. Queries can be 27;; This package provides a common interface to query directory servers using
28;; made through an interactive form or inline. Inline query strings in 28;; different protocols such as LDAP, CCSO PH/QI or BBDB. Queries can be
29;; buffers are expanded with appropriately formatted query results 29;; made through an interactive form or inline. Inline query strings in
30;; (especially used to expand email addresses in message buffers). EUDC 30;; buffers are expanded with appropriately formatted query results
31;; also interfaces with the BBDB package to let you register query results 31;; (especially used to expand email addresses in message buffers). EUDC
32;; into your own BBDB database. 32;; also interfaces with the BBDB package to let you register query results
33 33;; into your own BBDB database.
34;;; Usage: 34;;
35;; EUDC comes with an extensive documentation, please refer to it. 35;; Usage:
36;;
37;; EUDC comes with extensive documentation, please refer to it.
36;; 38;;
37;; The main entry points of EUDC are: 39;; The main entry points of EUDC are:
38;; `eudc-query-form': Query a directory server from a query form 40;; `eudc-query-form': Query a directory server from a query form
39;; `eudc-expand-inline': Query a directory server for the e-mail address 41;; `eudc-expand-inline': Query a directory server for the e-mail address
40;; of the name before cursor and insert it in the 42;; of the name before cursor and insert it in the
41;; buffer 43;; buffer
42;; `eudc-get-phone': Get a phone number from a directory server 44;; `eudc-get-phone': Get a phone number from a directory server
43;; `eudc-get-email': Get an e-mail address from a directory server 45;; `eudc-get-email': Get an e-mail address from a directory server
44;; `eudc-customize': Customize various aspects of EUDC 46;; `eudc-customize': Customize various aspects of EUDC
45 47
46;;; Code: 48;;; Code:
47 49
diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el
index 659035d4acb..2a713de83c2 100644
--- a/lisp/net/rcirc.el
+++ b/lisp/net/rcirc.el
@@ -2537,9 +2537,25 @@ activity. Only run if the buffer is not visible and
2537 (rcirc-activity-string lopri) 2537 (rcirc-activity-string lopri)
2538 ")")) 2538 ")"))
2539 (and hipri "]"))) 2539 (and hipri "]")))
2540 ;; Consistently don't display anything if there aren't
2541 ;; any IRC connections. Otherwise, whether we display
2542 ;; "[]" or not depends on whether or not this function
2543 ;; happens to have been called in this session yet.
2544 ;;
2545 ;; Consistently display nothing, rather than
2546 ;; consistently displaying "[]", for the sake of the
2547 ;; following sort of case: the user has enabled
2548 ;; `rcirc-track-minor-mode' using the customization
2549 ;; system, but also starts up Emacs instances that
2550 ;; aren't used for IRC. Due to the use of easy
2551 ;; customization, `rcirc-track-minor-mode' will be
2552 ;; turned on for every instance of Emacs. But we don't
2553 ;; want to take up valuable mode line space when, say,
2554 ;; Emacs is started up as the value of EDITOR/VISUAL.
2540 ((not (null (rcirc-process-list))) 2555 ((not (null (rcirc-process-list)))
2541 "[]") 2556 "[]")
2542 (t "[]"))) 2557 (t
2558 "")))
2543 (run-hooks 'rcirc-update-activity-string-hook) 2559 (run-hooks 'rcirc-update-activity-string-hook)
2544 (force-mode-line-update t))) 2560 (force-mode-line-update t)))
2545 2561
diff --git a/lisp/net/sieve-manage.el b/lisp/net/sieve-manage.el
index 0faeb02bcfd..da2167cd231 100644
--- a/lisp/net/sieve-manage.el
+++ b/lisp/net/sieve-manage.el
@@ -178,7 +178,8 @@ If it is nil, logging is disabled."
178 (with-current-buffer 178 (with-current-buffer
179 (get-buffer-create sieve-manage-log) 179 (get-buffer-create sieve-manage-log)
180 (set-buffer-multibyte nil) 180 (set-buffer-multibyte nil)
181 (buffer-disable-undo))) 181 (buffer-disable-undo)
182 (current-buffer)))
182 (goto-char (point-max)) 183 (goto-char (point-max))
183 (apply #'insert args)))) 184 (apply #'insert args))))
184 185
diff --git a/lisp/progmodes/bat-mode.el b/lisp/progmodes/bat-mode.el
index 0687a0c9f32..613de34eb7e 100644
--- a/lisp/progmodes/bat-mode.el
+++ b/lisp/progmodes/bat-mode.el
@@ -1,8 +1,8 @@
1;;; bat-mode.el --- Major mode for editing DOS/Windows scripts -*- lexical-binding: t -*- 1;;; bat-mode.el --- Major mode for editing DOS/Windows scripts -*- lexical-binding: t -*-
2 2
3;; Copyright (C) 2003, 2008-2024 Free Software Foundation, Inc. 3;; Copyright (C) 2003-2024 Free Software Foundation, Inc.
4 4
5;; Author: Arni Magnusson <arnima@hafro.is> 5;; Author: Arni Magnusson <thisisarni@gmail.com>
6;; Keywords: languages 6;; Keywords: languages
7 7
8;; This file is part of GNU Emacs. 8;; This file is part of GNU Emacs.
diff --git a/lisp/progmodes/csharp-mode.el b/lisp/progmodes/csharp-mode.el
index 29325ab9632..1f86527191a 100644
--- a/lisp/progmodes/csharp-mode.el
+++ b/lisp/progmodes/csharp-mode.el
@@ -46,6 +46,7 @@
46(declare-function treesit-node-type "treesit.c") 46(declare-function treesit-node-type "treesit.c")
47(declare-function treesit-node-child-by-field-name "treesit.c") 47(declare-function treesit-node-child-by-field-name "treesit.c")
48(declare-function treesit-query-capture "treesit.c") 48(declare-function treesit-query-capture "treesit.c")
49(declare-function treesit-query-compile "treesit.c")
49 50
50(defgroup csharp nil 51(defgroup csharp nil
51 "Major mode for editing C# code." 52 "Major mode for editing C# code."
@@ -730,6 +731,52 @@ compilation and evaluation time conflicts."
730 "readonly" "unmanaged") 731 "readonly" "unmanaged")
731 "C# keywords for tree-sitter font-locking.") 732 "C# keywords for tree-sitter font-locking.")
732 733
734(defun csharp-ts-mode--test-this-expression ()
735 "Return non-nil if (this_expression) is named in csharp grammar."
736 (ignore-errors
737 (treesit-query-compile 'c-sharp "(this_expression)" t)
738 t))
739
740(defun csharp-ts-mode--test-interpolated-string-text ()
741 "Return non-nil if (interpolated_string_text) is in the grammar."
742 (ignore-errors
743 (treesit-query-compile 'c-sharp "(interpolated_string_text)" t)
744 t))
745
746(defun csharp-ts-mode--test-type-constraint ()
747 "Return non-nil if (type_constraint) is in the grammar."
748 (ignore-errors
749 (treesit-query-compile 'c-sharp "(type_constraint)" t)
750 t))
751
752(defun csharp-ts-mode--test-type-of-expression ()
753 "Return non-nil if (type_of_expression) is in the grammar."
754 (ignore-errors
755 (treesit-query-compile 'c-sharp "(type_of_expression)" t)
756 t))
757
758(defun csharp-ts-mode--test-name-equals ()
759 "Return non-nil if (name_equals) is in the grammar."
760 (ignore-errors
761 (treesit-query-compile 'c-sharp "(name_equals)" t)
762 t))
763
764(defun csharp-ts-mode--test-if-directive ()
765 "Return non-nil if (if_directive) is in the grammar."
766 (ignore-errors
767 (treesit-query-compile 'c-sharp "(if_directive)" t)
768 t))
769
770(defun csharp-ts-mode--test-method-declaration-type-field ()
771 "Return non-nil if (method_declaration) has a type field."
772 (ignore-errors
773 (treesit-query-compile 'c-sharp "(method_declaration type: (_))" t)
774 t))
775
776(defvar csharp-ts-mode--type-field
777 (if (csharp-ts-mode--test-method-declaration-type-field)
778 'type: 'returns:))
779
733(defvar csharp-ts-mode--font-lock-settings 780(defvar csharp-ts-mode--font-lock-settings
734 (treesit-font-lock-rules 781 (treesit-font-lock-rules
735 :language 'c-sharp 782 :language 'c-sharp
@@ -760,7 +807,9 @@ compilation and evaluation time conflicts."
760 :feature 'keyword 807 :feature 'keyword
761 `([,@csharp-ts-mode--keywords] @font-lock-keyword-face 808 `([,@csharp-ts-mode--keywords] @font-lock-keyword-face
762 (modifier) @font-lock-keyword-face 809 (modifier) @font-lock-keyword-face
763 (this_expression) @font-lock-keyword-face) 810 ,@(if (csharp-ts-mode--test-this-expression)
811 '((this_expression) @font-lock-keyword-face)
812 '("this" @font-lock-keyword-face)))
764 813
765 :language 'c-sharp 814 :language 'c-sharp
766 :override t 815 :override t
@@ -786,18 +835,23 @@ compilation and evaluation time conflicts."
786 :feature 'string 835 :feature 'string
787 `([(string_literal) 836 `([(string_literal)
788 (verbatim_string_literal) 837 (verbatim_string_literal)
789 (interpolated_string_text) 838 ,@(if (csharp-ts-mode--test-interpolated-string-text)
790 (interpolated_verbatim_string_text) 839 '((interpolated_string_text)
791 (character_literal) 840 (interpolated_verbatim_string_text)
792 "\"" 841 (character_literal)
793 "$\"" 842 "\""
794 "@$\"" 843 "$\""
795 "$@\""] @font-lock-string-face) 844 "@$\""
845 "$@\"")
846 '((interpolated_string_expression)
847 (interpolation_start)
848 (interpolation_quote)))]
849 @font-lock-string-face)
796 850
797 :language 'c-sharp 851 :language 'c-sharp
798 :override t 852 :override t
799 :feature 'type 853 :feature 'type
800 '((predefined_type) @font-lock-type-face 854 `((predefined_type) @font-lock-type-face
801 (implicit_type) @font-lock-type-face 855 (implicit_type) @font-lock-type-face
802 (nullable_type) @font-lock-type-face 856 (nullable_type) @font-lock-type-face
803 (type_parameter 857 (type_parameter
@@ -816,10 +870,17 @@ compilation and evaluation time conflicts."
816 (cast_expression (generic_name (identifier) @font-lock-type-face)) 870 (cast_expression (generic_name (identifier) @font-lock-type-face))
817 ["operator"] @font-lock-type-face 871 ["operator"] @font-lock-type-face
818 (type_parameter_constraints_clause 872 (type_parameter_constraints_clause
819 target: (identifier) @font-lock-type-face) 873 (identifier) @font-lock-type-face)
820 (type_constraint type: (identifier) @font-lock-type-face) 874 ,@(if (csharp-ts-mode--test-type-constraint)
821 (type_constraint type: (generic_name (identifier) @font-lock-type-face)) 875 '((type_constraint type: (identifier) @font-lock-type-face)
822 (type_of_expression (identifier) @font-lock-type-face) 876 (type_constraint type: (generic_name (identifier) @font-lock-type-face)))
877 '((type_parameter_constraint (type type: (identifier) @font-lock-type-face))
878 (type_parameter_constraint (type type: (generic_name (identifier) @font-lock-type-face)))))
879
880 ,@(when (csharp-ts-mode--test-type-of-expression)
881 '((type_of_expression (identifier) @font-lock-type-face))
882 '((typeof_expression (identifier) @font-lock-type-face)))
883
823 (object_creation_expression 884 (object_creation_expression
824 type: (identifier) @font-lock-type-face) 885 type: (identifier) @font-lock-type-face)
825 (object_creation_expression 886 (object_creation_expression
@@ -832,8 +893,9 @@ compilation and evaluation time conflicts."
832 :override t 893 :override t
833 `((qualified_name (identifier) @font-lock-type-face) 894 `((qualified_name (identifier) @font-lock-type-face)
834 (using_directive (identifier) @font-lock-type-face) 895 (using_directive (identifier) @font-lock-type-face)
835 (using_directive (name_equals 896 ,@(when (csharp-ts-mode--test-name-equals)
836 (identifier) @font-lock-type-face)) 897 '((using_directive (name_equals
898 (identifier) @font-lock-type-face))))
837 899
838 (enum_declaration (identifier) @font-lock-type-face) 900 (enum_declaration (identifier) @font-lock-type-face)
839 (enum_member_declaration (identifier) @font-lock-variable-name-face) 901 (enum_member_declaration (identifier) @font-lock-variable-name-face)
@@ -861,10 +923,10 @@ compilation and evaluation time conflicts."
861 ;;; Check if keyword void_keyword is available, then return the correct rule." 923 ;;; Check if keyword void_keyword is available, then return the correct rule."
862 ,@(condition-case nil 924 ,@(condition-case nil
863 (progn (treesit-query-capture 'csharp '((void_keyword) @capture)) 925 (progn (treesit-query-capture 'csharp '((void_keyword) @capture))
864 `((method_declaration type: [(identifier) (void_keyword)] @font-lock-type-face))) 926 `((method_declaration ,csharp-ts-mode--type-field [(identifier) (void_keyword)] @font-lock-type-face)))
865 (error 927 (error
866 `((method_declaration type: [(identifier) (predefined_type)] @font-lock-type-face)))) 928 `((method_declaration ,csharp-ts-mode--type-field [(identifier) (predefined_type)] @font-lock-type-face))))
867 (method_declaration type: (generic_name (identifier) @font-lock-type-face)) 929 (method_declaration ,csharp-ts-mode--type-field (generic_name (identifier) @font-lock-type-face))
868 (method_declaration name: (_) @font-lock-function-name-face) 930 (method_declaration name: (_) @font-lock-function-name-face)
869 931
870 (catch_declaration 932 (catch_declaration
@@ -907,25 +969,45 @@ compilation and evaluation time conflicts."
907 :language 'c-sharp 969 :language 'c-sharp
908 :feature 'directives 970 :feature 'directives
909 :override t 971 :override t
910 '((if_directive 972 (if (csharp-ts-mode--test-if-directive)
911 "if" @font-lock-preprocessor-face 973 '((if_directive
912 (identifier) @font-lock-variable-use-face) 974 "if" @font-lock-preprocessor-face
913 (elif_directive 975 (identifier) @font-lock-variable-use-face)
914 "elif" @font-lock-preprocessor-face 976 (elif_directive
915 (identifier) @font-lock-variable-use-face) 977 "elif" @font-lock-preprocessor-face
916 (else_directive) @font-lock-preprocessor-face 978 (identifier) @font-lock-variable-use-face)
917 (endif_directive) @font-lock-preprocessor-face 979 (else_directive) @font-lock-preprocessor-face
918 (define_directive 980 (endif_directive) @font-lock-preprocessor-face
919 "define" @font-lock-preprocessor-face 981 (define_directive
920 (identifier) @font-lock-variable-use-face) 982 "define" @font-lock-preprocessor-face
921 (nullable_directive) @font-lock-preprocessor-face 983 (identifier) @font-lock-variable-use-face)
922 (pragma_directive) @font-lock-preprocessor-face 984 (nullable_directive) @font-lock-preprocessor-face
923 (region_directive) @font-lock-preprocessor-face 985 (pragma_directive) @font-lock-preprocessor-face
924 (endregion_directive) @font-lock-preprocessor-face 986 (region_directive) @font-lock-preprocessor-face
925 (region_directive 987 (endregion_directive) @font-lock-preprocessor-face
926 (preproc_message) @font-lock-variable-use-face) 988 (region_directive
927 (endregion_directive 989 (preproc_message) @font-lock-variable-use-face)
928 (preproc_message) @font-lock-variable-use-face)))) 990 (endregion_directive
991 (preproc_message) @font-lock-variable-use-face))
992 '((preproc_if
993 "#if" @font-lock-preprocessor-face
994 (identifier) @font-lock-variable-use-face)
995 (preproc_elif
996 "#elif" @font-lock-preprocessor-face
997 (identifier) @font-lock-variable-use-face)
998 (preproc_else) @font-lock-preprocessor-face
999 "#endif" @font-lock-preprocessor-face
1000 (preproc_define
1001 "#define" @font-lock-preprocessor-face
1002 (preproc_arg) @font-lock-variable-use-face)
1003 (preproc_nullable) @font-lock-preprocessor-face
1004 (preproc_pragma) @font-lock-preprocessor-face
1005 (preproc_region) @font-lock-preprocessor-face
1006 (preproc_endregion) @font-lock-preprocessor-face
1007 (preproc_region
1008 (preproc_arg) @font-lock-variable-use-face)
1009 (preproc_endregion
1010 (preproc_arg) @font-lock-variable-use-face)))))
929 1011
930;;;###autoload 1012;;;###autoload
931(add-to-list 'auto-mode-alist '("\\.cs\\'" . csharp-mode)) 1013(add-to-list 'auto-mode-alist '("\\.cs\\'" . csharp-mode))
diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el
index 5f2f66c5384..3c0c23f1c45 100644
--- a/lisp/progmodes/eglot.el
+++ b/lisp/progmodes/eglot.el
@@ -178,9 +178,9 @@
178 178
179;;; User tweakable stuff 179;;; User tweakable stuff
180(defgroup eglot nil 180(defgroup eglot nil
181 "Interaction with Language Server Protocol servers." 181 "Interaction with Language Server Protocol (LSP) servers."
182 :prefix "eglot-" 182 :prefix "eglot-"
183 :group 'applications) 183 :group 'tools)
184 184
185(defun eglot-alternatives (alternatives) 185(defun eglot-alternatives (alternatives)
186 "Compute server-choosing function for `eglot-server-programs'. 186 "Compute server-choosing function for `eglot-server-programs'.
diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el
index d3eb0d46e9b..35dc0215046 100644
--- a/lisp/progmodes/etags.el
+++ b/lisp/progmodes/etags.el
@@ -1894,27 +1894,40 @@ description of the arguments."
1894 (try-completion string (tags-table-files) predicate)))) 1894 (try-completion string (tags-table-files) predicate))))
1895 1895
1896(defun tags--get-current-buffer-name-in-tags-file () 1896(defun tags--get-current-buffer-name-in-tags-file ()
1897 "Get the file name that the current buffer corresponds in the tags file." 1897 "Return file name that corresponds to the current buffer in the tags table.
1898 (let ((tag-dir 1898This returns the file name which corresponds to the current buffer relative
1899 (save-excursion 1899to the directory of the current tags table (see `visit-tags-table-buffer').
1900 (visit-tags-table-buffer) 1900If no file is associated with the current buffer, this function returns nil."
1901 (file-name-directory (buffer-file-name))))) 1901 (let ((buf-fname (buffer-file-name)))
1902 (file-relative-name (buffer-file-name) tag-dir))) 1902 ;; FIXME: Are there interesting cases where 'buffer-file-name'
1903 ;; returns nil, but there's some file we expect to find in TAGS that
1904 ;; is associated with the buffer? The obvious cases of Dired and
1905 ;; Info buffers are not interesting for TAGS, but are there any
1906 ;; others?
1907 (if buf-fname
1908 (let ((tag-dir
1909 (save-excursion
1910 (visit-tags-table-buffer)
1911 (file-name-directory buf-fname))))
1912 (file-relative-name buf-fname tag-dir)))))
1903 1913
1904;;;###autoload 1914;;;###autoload
1905(defun list-tags (file &optional _next-match) 1915(defun list-tags (file &optional _next-match)
1906 "Display list of tags in file FILE. 1916 "Display list of tags in file FILE.
1907This searches only the first table in the list, and no included 1917Interactively, prompt for FILE, with completion, offering the current
1908tables. FILE should be as it appeared in the `etags' command, 1918buffer's file name as the defaul.
1909usually without a directory specification. If called 1919This command searches only the first table in the list of tags tables,
1910interactively, FILE defaults to the file name of the current 1920and does not search included tables.
1911buffer." 1921FILE should be as it was submitted to the `etags' command, which usually
1922means relative to the directory of the tags table file."
1912 (interactive (list (completing-read 1923 (interactive (list (completing-read
1913 "List tags in file: " 1924 "List tags in file: "
1914 'tags-complete-tags-table-file 1925 'tags-complete-tags-table-file
1915 nil t 1926 nil t
1916 ;; Default FILE to the current buffer. 1927 ;; Default FILE to the current buffer's file.
1917 (tags--get-current-buffer-name-in-tags-file)))) 1928 (tags--get-current-buffer-name-in-tags-file))))
1929 (if (string-empty-p file)
1930 (user-error "You must specify a file name"))
1918 (with-output-to-temp-buffer "*Tags List*" 1931 (with-output-to-temp-buffer "*Tags List*"
1919 (princ (substitute-command-keys "Tags in file `")) 1932 (princ (substitute-command-keys "Tags in file `"))
1920 (tags-with-face 'highlight (princ file)) 1933 (tags-with-face 'highlight (princ file))
diff --git a/lisp/progmodes/lua-ts-mode.el b/lisp/progmodes/lua-ts-mode.el
index d167215326c..a1dae0628d4 100644
--- a/lisp/progmodes/lua-ts-mode.el
+++ b/lisp/progmodes/lua-ts-mode.el
@@ -676,19 +676,19 @@ Calls REPORT-FN directly."
676 676
677(defun lua-ts-send-buffer () 677(defun lua-ts-send-buffer ()
678 "Send current buffer to the inferior Lua process." 678 "Send current buffer to the inferior Lua process."
679 (interactive) 679 (interactive nil lua-ts-mode)
680 (lua-ts-send-region (point-min) (point-max))) 680 (lua-ts-send-region (point-min) (point-max)))
681 681
682(defun lua-ts-send-file (file) 682(defun lua-ts-send-file (file)
683 "Send contents of FILE to the inferior Lua process." 683 "Send contents of FILE to the inferior Lua process."
684 (interactive "f") 684 (interactive "f" lua-ts-mode)
685 (with-temp-buffer 685 (with-temp-buffer
686 (insert-file-contents-literally file) 686 (insert-file-contents-literally file)
687 (lua-ts-send-region (point-min) (point-max)))) 687 (lua-ts-send-region (point-min) (point-max))))
688 688
689(defun lua-ts-send-region (beg end) 689(defun lua-ts-send-region (beg end)
690 "Send region between BEG and END to the inferior Lua process." 690 "Send region between BEG and END to the inferior Lua process."
691 (interactive "r") 691 (interactive "r" lua-ts-mode)
692 (let ((string (buffer-substring-no-properties beg end)) 692 (let ((string (buffer-substring-no-properties beg end))
693 (proc-buffer (lua-ts-inferior-lua))) 693 (proc-buffer (lua-ts-inferior-lua)))
694 (comint-send-string proc-buffer "print()") ; Prevent output from 694 (comint-send-string proc-buffer "print()") ; Prevent output from
diff --git a/lisp/progmodes/python.el b/lisp/progmodes/python.el
index 5532d5f6ce1..812e28268c2 100644
--- a/lisp/progmodes/python.el
+++ b/lisp/progmodes/python.el
@@ -233,23 +233,6 @@
233;; `python-imenu-format-parent-item-jump-label-function' variables for 233;; `python-imenu-format-parent-item-jump-label-function' variables for
234;; changing the way labels are formatted in the tree version. 234;; changing the way labels are formatted in the tree version.
235 235
236;; If you used python-mode.el you may miss auto-indentation when
237;; inserting newlines. To achieve the same behavior you have two
238;; options:
239
240;; 1) Enable the minor-mode `electric-indent-mode' (enabled by
241;; default) and use RET. If this mode is disabled use
242;; `newline-and-indent', bound to C-j.
243
244;; 2) Add the following hook in your .emacs:
245
246;; (add-hook 'python-mode-hook
247;; (lambda ()
248;; (define-key python-mode-map "\C-m" 'newline-and-indent)))
249
250;; I'd recommend the first one since you'll get the same behavior for
251;; all modes out-of-the-box.
252
253;; Flymake: A Flymake backend, using the pyflakes program by default, 236;; Flymake: A Flymake backend, using the pyflakes program by default,
254;; is provided. You can also use flake8 or pylint by customizing 237;; is provided. You can also use flake8 or pylint by customizing
255;; `python-flymake-command'. 238;; `python-flymake-command'.
@@ -440,7 +423,7 @@ To customize the Python interpreter for interactive use, modify
440 :help "Toggle subword movement and editing mode"]))) 423 :help "Toggle subword movement and editing mode"])))
441 424
442(defvar python-ts-mode-map (copy-keymap python-mode-map) 425(defvar python-ts-mode-map (copy-keymap python-mode-map)
443 "Keymap for `(copy-keymap python-mode-map)'.") 426 "Keymap for `python-ts-mode'.")
444 427
445 428
446;;; Python specialized rx 429;;; Python specialized rx
diff --git a/lisp/window.el b/lisp/window.el
index 07ea9584908..5822947f2fe 100644
--- a/lisp/window.el
+++ b/lisp/window.el
@@ -2661,7 +2661,7 @@ window is included in the count.
2661If ALL-FRAMES is non-nil, count the windows in all frames instead 2661If ALL-FRAMES is non-nil, count the windows in all frames instead
2662just the selected frame. 2662just the selected frame.
2663 2663
2664See `walk-windows' for the precise meaning of this argument." 2664See `walk-windows' for the precise meaning of these arguments."
2665 (length (window-list-1 nil minibuf all-frames))) 2665 (length (window-list-1 nil minibuf all-frames)))
2666 2666
2667;;; Resizing windows. 2667;;; Resizing windows.
@@ -4661,7 +4661,8 @@ Also see `switch-to-prev-buffer-skip-regexp'."
4661 "Buffers that `switch-to-prev-buffer' and `switch-to-next-buffer' should skip. 4661 "Buffers that `switch-to-prev-buffer' and `switch-to-next-buffer' should skip.
4662The value can either be a regexp or a list of regexps. Buffers whose 4662The value can either be a regexp or a list of regexps. Buffers whose
4663names match these regexps are skipped by `switch-to-prev-buffer' 4663names match these regexps are skipped by `switch-to-prev-buffer'
4664and `switch-to-next-buffer'. 4664and `switch-to-next-buffer', unless there's no other buffer to
4665switch to.
4665 4666
4666Also see `switch-to-prev-buffer-skip'." 4667Also see `switch-to-prev-buffer-skip'."
4667 :type '(choice regexp 4668 :type '(choice regexp
diff --git a/nt/INSTALL b/nt/INSTALL
index 6167365169b..b959ce362f7 100644
--- a/nt/INSTALL
+++ b/nt/INSTALL
@@ -157,7 +157,7 @@ build should run on Windows 9X and newer systems).
157 When the installation ends, perform the post-installation steps 157 When the installation ends, perform the post-installation steps
158 described on this page of the MinGW site: 158 described on this page of the MinGW site:
159 159
160 http://www.mingw.org/wiki/Getting_Started 160 https://web.archive.org/web/20210106033223/http://www.mingw.org/wiki/Getting_Started
161 161
162 in the "After Installing You Should ..." section. These steps are 162 in the "After Installing You Should ..." section. These steps are
163 important for making your installation complete, and in particular 163 important for making your installation complete, and in particular
diff --git a/test/lisp/eshell/esh-var-tests.el b/test/lisp/eshell/esh-var-tests.el
index 6b0e225f05f..7b29e4a21db 100644
--- a/test/lisp/eshell/esh-var-tests.el
+++ b/test/lisp/eshell/esh-var-tests.el
@@ -669,6 +669,11 @@ nil, use FUNCTION instead."
669 (eshell-match-command-output "env VAR=hello env" "VAR=hello\n") 669 (eshell-match-command-output "env VAR=hello env" "VAR=hello\n")
670 (should (equal (getenv "VAR") "value")))) 670 (should (equal (getenv "VAR") "value"))))
671 671
672(ert-deftest esh-var-test/local-variables/env/no-locals ()
673 "Test that \"env command\" works like \"command\"."
674 (with-temp-eshell
675 (eshell-match-command-output "env echo hi" "\\`hi\n")))
676
672 677
673;; Variable aliases 678;; Variable aliases
674 679