aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorPaul Eggert2017-11-25 22:55:35 -0800
committerPaul Eggert2017-11-25 22:55:35 -0800
commitd20161b25e9cd184d841ba9e36ee5141c01fd75f (patch)
tree6026fea9d48e641bf63b23209970efd1f8024e2c /lisp
parente27004c5fe3c227476ea210ff5bee2efb783ae17 (diff)
parenta89f0b6f33f9eb8910a1fceda9028d76ef50b05d (diff)
downloademacs-d20161b25e9cd184d841ba9e36ee5141c01fd75f.tar.gz
emacs-d20161b25e9cd184d841ba9e36ee5141c01fd75f.zip
Merge from origin/emacs-26
a89f0b6f33 maint: shorten https://lists.gnu.org/archive/html/... links 8be3aee281 Merge from Gnulib 265cee553f Work around GCC bug 80776 on Fedora 27 x86 dc7a97fb84 Tweak copy-file, rename-file doc cfa2a944d4 Change font-lock-extend-region-multiline handling in mhtml... a8664cc998 Minor cleanup in tramp-gvfs-handle-file-local-copy 55c5b12fa0 Add test for Bug#29423 in Tramp. 3198a1646e Avoid jumbled order in HTML rendered by shr.el 23bfc2d2db Make sure 'dired-filename' property is always put by ls-lisp f7fdaea4c0 A better solution for bug#29347 86e6ed8521 ; * src/thread.c (acquire_global_lock): Fix thinko in last... f300852037 Avoid a hang after C-g while sit-for on a Unix TTY d7fc719ff1 Improve the doc string of 'list-packages' b4f67ebb92 Improve discoverability of 'defvar' for suppressing warnings 8a2b204e64 Improve discoverability of 'read-buffer-completion-ignore-... eea4e9194c Improve documentation of self-insert-uses-region-functions e6e41dac87 Reflect changes in copy-file and rename-file in doc strings 0ec534070f * lisp/progmodes/cc-vars.el (c-offsets-alist): Doc fix. (... 1d0dbdff6c Reorder type predicates in ELisp manual b081ec9dd7 Fix backward scrolling in buffers with header-line 8e40429c96 ; Fix some doc typos ed2c542920 * lisp/bindings.el (buffer-file-coding-system): Add explic... d82474e452 * src/fns.c (syms_of_fns) <overriding-plist-environment>: ... 292c09ff6d Fix incorrect interaction of drag/drop and double click (b... d6fadb1d26 * lisp/menu-bar.el (menu-bar-options-save): Add display-li... daa959efbc * lisp/menu-bar.el (menu-bar-options-save): Add global-dis... 17fc74d1b9 * lisp/follow.el (follow-mode): Restore mode line lighter.... f20c2e2f3d ; Compare process status against 127 exactly 2d203ffb7e Extract the common part of ruby-flymake-simple and ruby-fl... 09944d499a Add Rubocop Flymake backend c65a0ae7c4 ; Fix a typo 7ab7603125 Update nt/INSTALL.W64 (Bug#28601) 11db253c08 Remove incorrect NEWS item about VC state indicator (Bug#2... 2fdc01c036 * lisp/emacs-lisp/byte-run.el (defsubst): Doc fix. 735c8b516e Make c-defun-name analyze more thoroughly a function type ... 92f0c4cd56 Avoid bogus abbreviated file names if HOME changes 8d450453fa * lisp/emacs-lisp/byte-run.el (inline): Give it a doc. 37a3b4ea40 Fix erc keep-place module with new defaults (Bug#29111) 6c312605bf Add window divider faces to NS (bug#29353) # Conflicts: # etc/NEWS # lisp/ruler-mode.el
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog.112
-rw-r--r--lisp/ChangeLog.138
-rw-r--r--lisp/ChangeLog.1528
-rw-r--r--lisp/ChangeLog.1636
-rw-r--r--lisp/ChangeLog.1760
-rw-r--r--lisp/Makefile.in6
-rw-r--r--lisp/bindings.el4
-rw-r--r--lisp/calendar/cal-dst.el2
-rw-r--r--lisp/calendar/cal-menu.el2
-rw-r--r--lisp/calendar/diary-lib.el6
-rw-r--r--lisp/calendar/todo-mode.el2
-rw-r--r--lisp/char-fold.el2
-rw-r--r--lisp/comint.el2
-rw-r--r--lisp/cus-edit.el2
-rw-r--r--lisp/delsel.el12
-rw-r--r--lisp/dired-aux.el2
-rw-r--r--lisp/dnd.el2
-rw-r--r--lisp/emacs-lisp/byte-run.el9
-rw-r--r--lisp/emacs-lisp/lisp.el6
-rw-r--r--lisp/emacs-lisp/package.el4
-rw-r--r--lisp/emacs-lisp/subr-x.el2
-rw-r--r--lisp/epg.el2
-rw-r--r--lisp/erc/erc-goodies.el14
-rw-r--r--lisp/eshell/em-unix.el2
-rw-r--r--lisp/faces.el2
-rw-r--r--lisp/ffap.el2
-rw-r--r--lisp/files.el58
-rw-r--r--lisp/finder.el2
-rw-r--r--lisp/follow.el1
-rw-r--r--lisp/frame.el2
-rw-r--r--lisp/gnus/ChangeLog.32
-rw-r--r--lisp/gnus/message.el4
-rw-r--r--lisp/htmlfontify.el2
-rw-r--r--lisp/info.el2
-rw-r--r--lisp/international/quail.el2
-rw-r--r--lisp/ls-lisp.el18
-rw-r--r--lisp/mail/emacsbug.el2
-rw-r--r--lisp/mail/rmail.el4
-rw-r--r--lisp/mail/supercite.el2
-rw-r--r--lisp/menu-bar.el3
-rw-r--r--lisp/net/rlogin.el2
-rw-r--r--lisp/net/shr.el4
-rw-r--r--lisp/net/tramp-gvfs.el8
-rw-r--r--lisp/obsolete/complete.el2
-rw-r--r--lisp/org/ChangeLog.16
-rw-r--r--lisp/org/ox-odt.el2
-rw-r--r--lisp/pixel-scroll.el2
-rw-r--r--lisp/plstore.el4
-rw-r--r--lisp/proced.el2
-rw-r--r--lisp/progmodes/cc-cmds.el22
-rw-r--r--lisp/progmodes/cc-menus.el2
-rw-r--r--lisp/progmodes/cc-vars.el4
-rw-r--r--lisp/progmodes/compile.el4
-rw-r--r--lisp/progmodes/flymake-proc.el2
-rw-r--r--lisp/progmodes/octave.el2
-rw-r--r--lisp/progmodes/ruby-mode.el149
-rw-r--r--lisp/progmodes/verilog-mode.el2
-rw-r--r--lisp/simple.el17
-rw-r--r--lisp/startup.el4
-rw-r--r--lisp/subr.el12
-rw-r--r--lisp/term/ns-win.el4
-rw-r--r--lisp/term/x-win.el2
-rw-r--r--lisp/textmodes/mhtml-mode.el9
-rw-r--r--lisp/textmodes/nroff-mode.el2
-rw-r--r--lisp/textmodes/tex-mode.el2
-rw-r--r--lisp/vc/diff-mode.el2
-rw-r--r--lisp/vc/smerge-mode.el2
-rw-r--r--lisp/vc/vc-git.el2
-rw-r--r--lisp/vc/vc-rcs.el2
-rw-r--r--lisp/view.el2
-rw-r--r--lisp/wid-edit.el2
-rw-r--r--lisp/windmove.el2
-rw-r--r--lisp/window.el27
73 files changed, 392 insertions, 245 deletions
diff --git a/lisp/ChangeLog.11 b/lisp/ChangeLog.11
index 52f5189228e..94a3cbfb582 100644
--- a/lisp/ChangeLog.11
+++ b/lisp/ChangeLog.11
@@ -6395,7 +6395,7 @@
6395 * vc-svn.el (vc-svn-checkin): Use `nconc' instead of `list*', 6395 * vc-svn.el (vc-svn-checkin): Use `nconc' instead of `list*',
6396 because the latter is a CL-ism. This fixes the bug reported by 6396 because the latter is a CL-ism. This fixes the bug reported by
6397 Shawn Boyette <mdxi@collapsar.net> in 6397 Shawn Boyette <mdxi@collapsar.net> in
6398 https://lists.gnu.org/archive/html/emacs-devel/2004-05/msg00442.html. 6398 https://lists.gnu.org/r/emacs-devel/2004-05/msg00442.html.
6399 6399
64002004-06-04 Miles Bader <miles@gnu.org> 64002004-06-04 Miles Bader <miles@gnu.org>
6401 6401
diff --git a/lisp/ChangeLog.13 b/lisp/ChangeLog.13
index 8869cc46eb8..d14325b5ff1 100644
--- a/lisp/ChangeLog.13
+++ b/lisp/ChangeLog.13
@@ -4667,7 +4667,7 @@
46672008-01-02 Karl Fogel <kfogel@red-bean.com> 46672008-01-02 Karl Fogel <kfogel@red-bean.com>
4668 4668
4669 Change a return type, for greater extensibility. 4669 Change a return type, for greater extensibility.
4670 See https://lists.gnu.org/archive/html/emacs-devel/2007-12/msg01077.html 4670 See https://lists.gnu.org/r/emacs-devel/2007-12/msg01077.html
4671 and its thread for discussion leading to this change. 4671 and its thread for discussion leading to this change.
4672 4672
4673 * bookmark.el (bookmark-jump-noselect): 4673 * bookmark.el (bookmark-jump-noselect):
@@ -14464,7 +14464,7 @@
14464 14464
14465 * bookmark.el: Revert 2007-07-13T18:16:17Z!kfogel@red-bean.com, 14465 * bookmark.el: Revert 2007-07-13T18:16:17Z!kfogel@red-bean.com,
14466 thus restoring bookmark bindings to three slots under C-x r. See 14466 thus restoring bookmark bindings to three slots under C-x r. See
14467 https://lists.gnu.org/archive/html/emacs-devel/2007-07/msg00705.html. 14467 https://lists.gnu.org/r/emacs-devel/2007-07/msg00705.html.
14468 14468
144692007-07-15 Jeff Miller <jmiller@cablespeed.com> (tiny change) 144692007-07-15 Jeff Miller <jmiller@cablespeed.com> (tiny change)
14470 14470
@@ -14511,7 +14511,7 @@
14511 * bookmark.el (bookmark-jump-other-window): New function. 14511 * bookmark.el (bookmark-jump-other-window): New function.
14512 (bookmark-map): Bind it to "o". 14512 (bookmark-map): Bind it to "o".
14513 14513
14514 https://lists.gnu.org/archive/html/emacs-devel/2007-07/msg00633.html 14514 https://lists.gnu.org/r/emacs-devel/2007-07/msg00633.html
14515 and its thread contains discussion about this change. 14515 and its thread contains discussion about this change.
14516 The original patch was slightly tweaked by Karl Fogel 14516 The original patch was slightly tweaked by Karl Fogel
14517 <kfogel@red-bean.com> before committing. 14517 <kfogel@red-bean.com> before committing.
@@ -14525,7 +14525,7 @@
14525 * bookmark.el: Don't define bookmark keys under the "C-xr" map; 14525 * bookmark.el: Don't define bookmark keys under the "C-xr" map;
14526 instead, make "C-xp" a prefix for bookmark-map. Patch by Drew 14526 instead, make "C-xp" a prefix for bookmark-map. Patch by Drew
14527 Adams <drew.adams@oracle.com>, mildly tweaked by me. See 14527 Adams <drew.adams@oracle.com>, mildly tweaked by me. See
14528 https://lists.gnu.org/archive/html/emacs-devel/2007-07/msg00633.html. 14528 https://lists.gnu.org/r/emacs-devel/2007-07/msg00633.html.
14529 14529
145302007-07-13 Carsten Dominik <dominik@science.uva.nl> 145302007-07-13 Carsten Dominik <dominik@science.uva.nl>
14531 14531
diff --git a/lisp/ChangeLog.15 b/lisp/ChangeLog.15
index 3e6d664aa6b..11bc31f3b29 100644
--- a/lisp/ChangeLog.15
+++ b/lisp/ChangeLog.15
@@ -9833,7 +9833,7 @@
9833 * window.el (pop-to-buffer): Remove the conditional that 9833 * window.el (pop-to-buffer): Remove the conditional that
9834 compares new-window and old-window, so it will reselect 9834 compares new-window and old-window, so it will reselect
9835 the selected window unconditionally. 9835 the selected window unconditionally.
9836 https://lists.gnu.org/archive/html/emacs-devel/2010-06/msg00078.html 9836 https://lists.gnu.org/r/emacs-devel/2010-06/msg00078.html
9837 9837
98382010-06-07 Stefan Monnier <monnier@iro.umontreal.ca> 98382010-06-07 Stefan Monnier <monnier@iro.umontreal.ca>
9839 9839
@@ -9882,7 +9882,7 @@
9882 of kill-ring: don't call menu-bar-update-yank-menu, don't push 9882 of kill-ring: don't call menu-bar-update-yank-menu, don't push
9883 interprogram-paste strings to kill-ring, and don't push the input 9883 interprogram-paste strings to kill-ring, and don't push the input
9884 argument `string' to kill-ring. 9884 argument `string' to kill-ring.
9885 https://lists.gnu.org/archive/html/emacs-devel/2010-06/msg00072.html 9885 https://lists.gnu.org/r/emacs-devel/2010-06/msg00072.html
9886 9886
98872010-06-04 Juanma Barranquero <lekktu@gmail.com> 98872010-06-04 Juanma Barranquero <lekktu@gmail.com>
9888 9888
@@ -10445,7 +10445,7 @@
10445 * dired-x.el (dired-jump, dired-jump-other-window): Add arg 10445 * dired-x.el (dired-jump, dired-jump-other-window): Add arg
10446 FILE-NAME to read from the minibuffer when called interactively 10446 FILE-NAME to read from the minibuffer when called interactively
10447 with prefix argument instead of using buffer-file-name. 10447 with prefix argument instead of using buffer-file-name.
10448 https://lists.gnu.org/archive/html/emacs-devel/2010-05/msg00534.html 10448 https://lists.gnu.org/r/emacs-devel/2010-05/msg00534.html
10449 10449
10450 * dired.el: Update autoloads. 10450 * dired.el: Update autoloads.
10451 10451
@@ -11998,7 +11998,7 @@
119982010-04-05 Juri Linkov <juri@jurta.org> 119982010-04-05 Juri Linkov <juri@jurta.org>
11999 11999
12000 Scrolling commands which scroll a line instead of full screen. 12000 Scrolling commands which scroll a line instead of full screen.
12001 https://lists.gnu.org/archive/html/emacs-devel/2010-03/msg01452.html 12001 https://lists.gnu.org/r/emacs-devel/2010-03/msg01452.html
12002 12002
12003 * simple.el (scroll-up-line, scroll-down-line): New commands. 12003 * simple.el (scroll-up-line, scroll-down-line): New commands.
12004 Put property isearch-scroll=t on them. 12004 Put property isearch-scroll=t on them.
@@ -12009,7 +12009,7 @@
120092010-04-05 Juri Linkov <juri@jurta.org> 120092010-04-05 Juri Linkov <juri@jurta.org>
12010 12010
12011 Scrolling commands which do not signal errors at top/bottom. 12011 Scrolling commands which do not signal errors at top/bottom.
12012 https://lists.gnu.org/archive/html/emacs-devel/2010-03/msg01452.html 12012 https://lists.gnu.org/r/emacs-devel/2010-03/msg01452.html
12013 12013
12014 * simple.el (scroll-up-command, scroll-down-command): New commands. 12014 * simple.el (scroll-up-command, scroll-down-command): New commands.
12015 Put property isearch-scroll=t on them. 12015 Put property isearch-scroll=t on them.
@@ -12063,7 +12063,7 @@
12063 (electric-help-mode): Set it to original major-mode. Doc fix. 12063 (electric-help-mode): Set it to original major-mode. Doc fix.
12064 (with-electric-help): Use `electric-help-orig-major-mode' instead 12064 (with-electric-help): Use `electric-help-orig-major-mode' instead
12065 of (default-value 'major-mode). Doc fix. 12065 of (default-value 'major-mode). Doc fix.
12066 https://lists.gnu.org/archive/html/emacs-devel/2010-04/msg00069.html 12066 https://lists.gnu.org/r/emacs-devel/2010-04/msg00069.html
12067 12067
120682010-04-02 Sam Steingold <sds@gnu.org> 120682010-04-02 Sam Steingold <sds@gnu.org>
12069 12069
@@ -12089,13 +12089,13 @@
12089 12089
12090 * simple.el (next-line, previous-line): Re-throw a signal 12090 * simple.el (next-line, previous-line): Re-throw a signal
12091 with `signal' instead of using `ding'. 12091 with `signal' instead of using `ding'.
12092 https://lists.gnu.org/archive/html/emacs-devel/2010-03/msg01432.html 12092 https://lists.gnu.org/r/emacs-devel/2010-03/msg01432.html
12093 12093
120942010-03-31 Juri Linkov <juri@jurta.org> 120942010-03-31 Juri Linkov <juri@jurta.org>
12095 12095
12096 * simple.el (keyboard-escape-quit): Raise deselecting the active 12096 * simple.el (keyboard-escape-quit): Raise deselecting the active
12097 region higher than exiting the minibuffer. 12097 region higher than exiting the minibuffer.
12098 https://lists.gnu.org/archive/html/emacs-devel/2010-03/msg00904.html 12098 https://lists.gnu.org/r/emacs-devel/2010-03/msg00904.html
12099 12099
121002010-03-31 Juri Linkov <juri@jurta.org> 121002010-03-31 Juri Linkov <juri@jurta.org>
12101 12101
@@ -12184,7 +12184,7 @@
121842010-03-30 Juri Linkov <juri@jurta.org> 121842010-03-30 Juri Linkov <juri@jurta.org>
12185 12185
12186 Make occur handle multi-line matches cleanly with context. 12186 Make occur handle multi-line matches cleanly with context.
12187 https://lists.gnu.org/archive/html/emacs-devel/2010-03/msg01280.html 12187 https://lists.gnu.org/r/emacs-devel/2010-03/msg01280.html
12188 12188
12189 * replace.el (occur-accumulate-lines): Add optional arg `pt'. 12189 * replace.el (occur-accumulate-lines): Add optional arg `pt'.
12190 (occur-engine): Add local variables `ret', `prev-after-lines', 12190 (occur-engine): Add local variables `ret', `prev-after-lines',
@@ -12379,7 +12379,7 @@
123792010-03-23 Juri Linkov <juri@jurta.org> 123792010-03-23 Juri Linkov <juri@jurta.org>
12380 12380
12381 Implement Occur multi-line matches. 12381 Implement Occur multi-line matches.
12382 https://lists.gnu.org/archive/html/emacs-devel/2010-03/msg01044.html 12382 https://lists.gnu.org/r/emacs-devel/2010-03/msg01044.html
12383 12383
12384 * replace.el (occur): Doc fix. 12384 * replace.el (occur): Doc fix.
12385 (occur-engine): Set `begpt' to the beginning of the first line. 12385 (occur-engine): Set `begpt' to the beginning of the first line.
@@ -12456,7 +12456,7 @@
124562010-03-21 Juri Linkov <juri@jurta.org> 124562010-03-21 Juri Linkov <juri@jurta.org>
12457 12457
12458 Fix message of multi-line occur regexps and multi-buffer header lines. 12458 Fix message of multi-line occur regexps and multi-buffer header lines.
12459 https://lists.gnu.org/archive/html/emacs-devel/2010-03/msg00457.html 12459 https://lists.gnu.org/r/emacs-devel/2010-03/msg00457.html
12460 12460
12461 * replace.el (occur-1): Don't display regexp if it is longer 12461 * replace.el (occur-1): Don't display regexp if it is longer
12462 than window-width. Use `query-replace-descr' to display regexp. 12462 than window-width. Use `query-replace-descr' to display regexp.
@@ -12750,7 +12750,7 @@
127502010-03-10 Kim F. Storm <storm@cua.dk> 127502010-03-10 Kim F. Storm <storm@cua.dk>
12751 12751
12752 Animated image API. 12752 Animated image API.
12753 https://lists.gnu.org/archive/html/emacs-devel/2010-03/msg00211.html 12753 https://lists.gnu.org/r/emacs-devel/2010-03/msg00211.html
12754 12754
12755 * image.el (image-animate-max-time): New defcustom. 12755 * image.el (image-animate-max-time): New defcustom.
12756 (image-animated-types): New defconst. 12756 (image-animated-types): New defconst.
@@ -13908,7 +13908,7 @@
13908 positions by using `bookmark-bmenu-marks-width', instead of hardcoding. 13908 positions by using `bookmark-bmenu-marks-width', instead of hardcoding.
13909 This fixes the `bookmark-bmenu-execute-deletions' bug reported here: 13909 This fixes the `bookmark-bmenu-execute-deletions' bug reported here:
13910 13910
13911 https://lists.gnu.org/archive/html/emacs-devel/2009-12/msg00819.html 13911 https://lists.gnu.org/r/emacs-devel/2009-12/msg00819.html
13912 From: Sun Yijiang <sunyijiang {_AT_} gmail.com> 13912 From: Sun Yijiang <sunyijiang {_AT_} gmail.com>
13913 To: emacs-devel {_AT_} gnu.org 13913 To: emacs-devel {_AT_} gnu.org
13914 Subject: bookmark.el bug report 13914 Subject: bookmark.el bug report
@@ -19816,7 +19816,7 @@
19816 * files.el (find-alternate-file): If the old buffer is modified 19816 * files.el (find-alternate-file): If the old buffer is modified
19817 and visiting a file, behave similarly to `kill-buffer' when 19817 and visiting a file, behave similarly to `kill-buffer' when
19818 killing it, thus reverting to the pre-1.878 behavior; see 19818 killing it, thus reverting to the pre-1.878 behavior; see
19819 https://lists.gnu.org/archive/html/emacs-devel/2009-09/msg00101.html 19819 https://lists.gnu.org/r/emacs-devel/2009-09/msg00101.html
19820 for discussion. Also, consult `buffer-file-name' as a variable 19820 for discussion. Also, consult `buffer-file-name' as a variable
19821 not as a function, for consistency with the rest of the code. 19821 not as a function, for consistency with the rest of the code.
19822 19822
diff --git a/lisp/ChangeLog.16 b/lisp/ChangeLog.16
index 33bd9a03323..dcf2fd071d0 100644
--- a/lisp/ChangeLog.16
+++ b/lisp/ChangeLog.16
@@ -1371,7 +1371,7 @@
1371 1371
1372 * frame.el (toggle-frame-maximized, toggle-frame-fullscreen): 1372 * frame.el (toggle-frame-maximized, toggle-frame-fullscreen):
1373 Use fullboth as an alias for fullscreen. Suggested by Jan Djärv in 1373 Use fullboth as an alias for fullscreen. Suggested by Jan Djärv in
1374 <https://lists.gnu.org/archive/html/emacs-devel/2013-01/msg00203.html>. 1374 <https://lists.gnu.org/r/emacs-devel/2013-01/msg00203.html>.
1375 1375
13762013-01-30 Stefan Monnier <monnier@iro.umontreal.ca> 13762013-01-30 Stefan Monnier <monnier@iro.umontreal.ca>
1377 1377
@@ -2422,7 +2422,7 @@
2422 2422
2423 * epg.el: Support pinentry-curses. 2423 * epg.el: Support pinentry-curses.
2424 Suggested by Werner Koch in 2424 Suggested by Werner Koch in
2425 <https://lists.gnu.org/archive/html/emacs-devel/2007-02/msg00755.html>. 2425 <https://lists.gnu.org/r/emacs-devel/2007-02/msg00755.html>.
2426 (epg-agent-file, epg-agent-mtime): New variable. 2426 (epg-agent-file, epg-agent-mtime): New variable.
2427 (epg--start): Record the modified time of gpg-agent socket file, 2427 (epg--start): Record the modified time of gpg-agent socket file,
2428 to restore Emacs frame after pinentry-curses termination. 2428 to restore Emacs frame after pinentry-curses termination.
@@ -2448,7 +2448,7 @@
2448 (toggle-frame-maximized): Rewrite and bind to M-<f10>. 2448 (toggle-frame-maximized): Rewrite and bind to M-<f10>.
2449 (toggle-frame-fullscreen): New command bound to <f11> instead of 2449 (toggle-frame-fullscreen): New command bound to <f11> instead of
2450 `toggle-frame-maximized'. 2450 `toggle-frame-maximized'.
2451 https://lists.gnu.org/archive/html/emacs-devel/2012-12/msg00703.html 2451 https://lists.gnu.org/r/emacs-devel/2012-12/msg00703.html
2452 2452
24532012-12-27 Michael Albinus <michael.albinus@gmx.de> 24532012-12-27 Michael Albinus <michael.albinus@gmx.de>
2454 2454
@@ -2686,7 +2686,7 @@
2686 (isearch-insert-char-by-name): New command. 2686 (isearch-insert-char-by-name): New command.
2687 * international/mule-cmds.el (read-char-by-name): Let-bind 2687 * international/mule-cmds.el (read-char-by-name): Let-bind
2688 `enable-recursive-minibuffers' to t. 2688 `enable-recursive-minibuffers' to t.
2689 https://lists.gnu.org/archive/html/emacs-devel/2012-12/msg00234.html 2689 https://lists.gnu.org/r/emacs-devel/2012-12/msg00234.html
2690 2690
26912012-12-15 Juri Linkov <juri@jurta.org> 26912012-12-15 Juri Linkov <juri@jurta.org>
2692 2692
@@ -4831,7 +4831,7 @@
4831 * progmodes/compile.el (compilation-error-regexp-alist-alist): 4831 * progmodes/compile.el (compilation-error-regexp-alist-alist):
4832 Adjust the msft regexp to the output of Studio 2010, and move msft 4832 Adjust the msft regexp to the output of Studio 2010, and move msft
4833 before edg-1. See the discussion on emacs-devel, 4833 before edg-1. See the discussion on emacs-devel,
4834 https://lists.gnu.org/archive/html/emacs-devel/2012-09/msg00579.html, 4834 https://lists.gnu.org/r/emacs-devel/2012-09/msg00579.html,
4835 for the details. 4835 for the details.
4836 4836
48372012-10-14 Stefan Monnier <monnier@iro.umontreal.ca> 48372012-10-14 Stefan Monnier <monnier@iro.umontreal.ca>
@@ -5453,7 +5453,7 @@
5453 5453
5454 * profiler.el (profiler-sampling-interval): Change default back to 1. 5454 * profiler.el (profiler-sampling-interval): Change default back to 1.
5455 See Stefan Monnier in 5455 See Stefan Monnier in
5456 <https://lists.gnu.org/archive/html/emacs-devel/2012-09/msg00863.html>. 5456 <https://lists.gnu.org/r/emacs-devel/2012-09/msg00863.html>.
5457 5457
54582012-10-01 Fabián Ezequiel Gallina <fgallina@cuca> 54582012-10-01 Fabián Ezequiel Gallina <fgallina@cuca>
5459 5459
@@ -6641,7 +6641,7 @@
6641 search-whitespace-regexp if isearch-lax-whitespace or 6641 search-whitespace-regexp if isearch-lax-whitespace or
6642 isearch-regexp-lax-whitespace is non-nil. 6642 isearch-regexp-lax-whitespace is non-nil.
6643 (Info-mode): Don't set local variable search-whitespace-regexp. 6643 (Info-mode): Don't set local variable search-whitespace-regexp.
6644 https://lists.gnu.org/archive/html/emacs-devel/2012-08/msg00811.html 6644 https://lists.gnu.org/r/emacs-devel/2012-08/msg00811.html
6645 6645
66462012-09-12 Stefan Monnier <monnier@iro.umontreal.ca> 66462012-09-12 Stefan Monnier <monnier@iro.umontreal.ca>
6647 6647
@@ -7037,7 +7037,7 @@
70372012-09-02 Juri Linkov <juri@jurta.org> 70372012-09-02 Juri Linkov <juri@jurta.org>
7038 7038
7039 Toggle whitespace matching mode with M-s SPC. 7039 Toggle whitespace matching mode with M-s SPC.
7040 https://lists.gnu.org/archive/html/emacs-devel/2012-09/msg00008.html 7040 https://lists.gnu.org/r/emacs-devel/2012-09/msg00008.html
7041 7041
7042 * isearch.el (search-whitespace-regexp): Doc fix. 7042 * isearch.el (search-whitespace-regexp): Doc fix.
7043 Remove cons cell customization. 7043 Remove cons cell customization.
@@ -8109,7 +8109,7 @@
8109 8109
8110 * whitespace.el (whitespace-display-mappings): Use Unicode 8110 * whitespace.el (whitespace-display-mappings): Use Unicode
8111 codepoints, instead of emacs-mule codepoints. See 8111 codepoints, instead of emacs-mule codepoints. See
8112 https://lists.gnu.org/archive/html/help-gnu-emacs/2012-07/msg00366.html 8112 https://lists.gnu.org/r/help-gnu-emacs/2012-07/msg00366.html
8113 for the details. 8113 for the details.
8114 8114
8115 * files.el (file-truename): Don't skip symlink-chasing part on 8115 * files.el (file-truename): Don't skip symlink-chasing part on
@@ -8513,7 +8513,7 @@
8513 * startup.el (command-line): Don't display an empty user name in 8513 * startup.el (command-line): Don't display an empty user name in
8514 the error message about non-existent home directory, when 8514 the error message about non-existent home directory, when
8515 init-file-user was set to an empty string. See 8515 init-file-user was set to an empty string. See
8516 https://lists.gnu.org/archive/html/bug-gnu-emacs/2012-07/msg00835.html 8516 https://lists.gnu.org/r/bug-gnu-emacs/2012-07/msg00835.html
8517 for the details and context. 8517 for the details and context.
8518 8518
85192012-07-22 Vincent Belaïche <vincentb1@users.sourceforge.net> 85192012-07-22 Vincent Belaïche <vincentb1@users.sourceforge.net>
@@ -9419,7 +9419,7 @@
9419 9419
9420 * calendar/calendar.el (calendar-exit): Don't try to delete or 9420 * calendar/calendar.el (calendar-exit): Don't try to delete or
9421 iconify last frame. See: 9421 iconify last frame. See:
9422 https://lists.gnu.org/archive/html/emacs-devel/2012-06/msg00372.html 9422 https://lists.gnu.org/r/emacs-devel/2012-06/msg00372.html
9423 9423
94242012-06-25 Jim Diamond <Jim.Diamond@AcadiaU.ca> (tiny change) 94242012-06-25 Jim Diamond <Jim.Diamond@AcadiaU.ca> (tiny change)
9425 9425
@@ -10430,7 +10430,7 @@
10430 * descr-text.el (describe-char): Mention how to insert the 10430 * descr-text.el (describe-char): Mention how to insert the
10431 character, if the current input method doesn't support it. 10431 character, if the current input method doesn't support it.
10432 See the discussion in this thread for the details: 10432 See the discussion in this thread for the details:
10433 https://lists.gnu.org/archive/html/emacs-devel/2012-05/msg00533.html. 10433 https://lists.gnu.org/r/emacs-devel/2012-05/msg00533.html.
10434 10434
104352012-06-08 Sam Steingold <sds@gnu.org> 104352012-06-08 Sam Steingold <sds@gnu.org>
10436 10436
@@ -13909,7 +13909,7 @@
13909 Insert invisible LRM characters before each character in a keyboard 13909 Insert invisible LRM characters before each character in a keyboard
13910 layout cell, to prevent their reordering by bidi display engine. 13910 layout cell, to prevent their reordering by bidi display engine.
13911 For details, see the discussion in 13911 For details, see the discussion in
13912 https://lists.gnu.org/archive/html/emacs-devel/2012-03/msg00085.html. 13912 https://lists.gnu.org/r/emacs-devel/2012-03/msg00085.html.
13913 13913
139142012-03-08 Alan Mackenzie <acm@muc.de> 139142012-03-08 Alan Mackenzie <acm@muc.de>
13915 13915
@@ -13927,7 +13927,7 @@
13927 13927
13928 * international/quail.el (quail-help): 13928 * international/quail.el (quail-help):
13929 Force bidi-paragraph-direction be left-to-right. See discussion in 13929 Force bidi-paragraph-direction be left-to-right. See discussion in
13930 https://lists.gnu.org/archive/html/emacs-devel/2012-03/msg00062.html 13930 https://lists.gnu.org/r/emacs-devel/2012-03/msg00062.html
13931 for the reason. 13931 for the reason.
13932 13932
139332012-03-07 Michael Albinus <michael.albinus@gmx.de> 139332012-03-07 Michael Albinus <michael.albinus@gmx.de>
@@ -15004,7 +15004,7 @@
15004 15004
15005 * descr-text.el (describe-char): Show the raw character, not only 15005 * descr-text.el (describe-char): Show the raw character, not only
15006 its display form at POS. Suggested by Kenichi Handa <handa@m17n.org>. 15006 its display form at POS. Suggested by Kenichi Handa <handa@m17n.org>.
15007 See https://lists.gnu.org/archive/html/emacs-devel/2012-01/msg00760.html 15007 See https://lists.gnu.org/r/emacs-devel/2012-01/msg00760.html
15008 for the reasons. 15008 for the reasons.
15009 15009
150102012-01-28 Phil Hagelberg <phil@hagelb.org> 150102012-01-28 Phil Hagelberg <phil@hagelb.org>
@@ -15362,7 +15362,7 @@
15362 * time.el (display-time-load-average) 15362 * time.el (display-time-load-average)
15363 (display-time-default-load-average): Doc fixes. See the thread 15363 (display-time-default-load-average): Doc fixes. See the thread
15364 starting at 15364 starting at
15365 https://lists.gnu.org/archive/html/help-gnu-emacs/2012-01/msg00059.html 15365 https://lists.gnu.org/r/help-gnu-emacs/2012-01/msg00059.html
15366 for the details. 15366 for the details.
15367 15367
153682012-01-06 Glenn Morris <rgm@gnu.org> 153682012-01-06 Glenn Morris <rgm@gnu.org>
@@ -15769,7 +15769,7 @@
15769 (texinfo-insert-master-menu-list): Improve the error message 15769 (texinfo-insert-master-menu-list): Improve the error message
15770 displayed if there's no menu in the Top node. 15770 displayed if there's no menu in the Top node.
15771 (Bug#2975) See also this thread: 15771 (Bug#2975) See also this thread:
15772 https://lists.gnu.org/archive/html/emacs-devel/2011-12/msg00156.html. 15772 https://lists.gnu.org/r/emacs-devel/2011-12/msg00156.html.
15773 15773
157742011-12-09 Manuel Gómez <mgrojo@gmail.com> (tiny change) 157742011-12-09 Manuel Gómez <mgrojo@gmail.com> (tiny change)
15775 15775
@@ -24381,7 +24381,7 @@
24381 24381
24382 * help-fns.el (describe-variable): Complete all variables having 24382 * help-fns.el (describe-variable): Complete all variables having
24383 documentation, including keywords. 24383 documentation, including keywords.
24384 https://lists.gnu.org/archive/html/emacs-devel/2011-04/msg00112.html 24384 https://lists.gnu.org/r/emacs-devel/2011-04/msg00112.html
24385 24385
243862011-04-04 Juanma Barranquero <lekktu@gmail.com> 243862011-04-04 Juanma Barranquero <lekktu@gmail.com>
24387 24387
diff --git a/lisp/ChangeLog.17 b/lisp/ChangeLog.17
index bb3375be9a6..b2d315c53f3 100644
--- a/lisp/ChangeLog.17
+++ b/lisp/ChangeLog.17
@@ -3598,7 +3598,7 @@
3598 3598
3599 * comint.el (comint-history-isearch-message): Use field-beginning 3599 * comint.el (comint-history-isearch-message): Use field-beginning
3600 instead of comint-line-beginning-position - that's more fixes for 3600 instead of comint-line-beginning-position - that's more fixes for
3601 https://lists.gnu.org/archive/html/emacs-devel/2014-12/msg00305.html 3601 https://lists.gnu.org/r/emacs-devel/2014-12/msg00305.html
3602 (comint-history-isearch-message): Fix args of isearch-message-prefix. 3602 (comint-history-isearch-message): Fix args of isearch-message-prefix.
3603 3603
36042014-12-29 Juri Linkov <juri@linkov.net> 36042014-12-29 Juri Linkov <juri@linkov.net>
@@ -3698,7 +3698,7 @@
3698 3698
3699 * language/misc-lang.el (composition-function-table): Add Syriac 3699 * language/misc-lang.el (composition-function-table): Add Syriac
3700 characters and also ZWJ/ZWNJ. 3700 characters and also ZWJ/ZWNJ.
3701 See https://lists.gnu.org/archive/html/help-gnu-emacs/2014-12/msg00248.html 3701 See https://lists.gnu.org/r/help-gnu-emacs/2014-12/msg00248.html
3702 for the details. 3702 for the details.
3703 3703
37042014-12-27 Fabián Ezequiel Gallina <fgallina@gnu.org> 37042014-12-27 Fabián Ezequiel Gallina <fgallina@gnu.org>
@@ -4489,14 +4489,14 @@
4489 comint-line-beginning-position. 4489 comint-line-beginning-position.
4490 (comint-send-input): Go to the end of the field instead of the end 4490 (comint-send-input): Go to the end of the field instead of the end
4491 of the line to accept whole multi-line input. 4491 of the line to accept whole multi-line input.
4492 https://lists.gnu.org/archive/html/emacs-devel/2014-12/msg00305.html 4492 https://lists.gnu.org/r/emacs-devel/2014-12/msg00305.html
4493 4493
44942014-12-05 Juri Linkov <juri@linkov.net> 44942014-12-05 Juri Linkov <juri@linkov.net>
4495 4495
4496 * minibuffer.el (minibuffer-completion-help): 4496 * minibuffer.el (minibuffer-completion-help):
4497 Compare selected-window with minibuffer-window to check whether 4497 Compare selected-window with minibuffer-window to check whether
4498 completions should be displayed near the minibuffer. (Bug#17809) 4498 completions should be displayed near the minibuffer. (Bug#17809)
4499 https://lists.gnu.org/archive/html/emacs-devel/2014-12/msg00311.html 4499 https://lists.gnu.org/r/emacs-devel/2014-12/msg00311.html
4500 4500
45012014-12-05 Michael Albinus <michael.albinus@gmx.de> 45012014-12-05 Michael Albinus <michael.albinus@gmx.de>
4502 4502
@@ -4605,7 +4605,7 @@
4605 the remote repository were unreachable, because the VC hooks tried 4605 the remote repository were unreachable, because the VC hooks tried
4606 to run "svn status -u" on the file, where the "-u" tells svn to 4606 to run "svn status -u" on the file, where the "-u" tells svn to
4607 get update information from the remote repository. 4607 get update information from the remote repository.
4608 https://lists.gnu.org/archive/html/emacs-devel/2014-12/msg00174.html 4608 https://lists.gnu.org/r/emacs-devel/2014-12/msg00174.html
4609 4609
4610 * vc/vc-svn.el (vc-svn-state): Remove optional `localp' 4610 * vc/vc-svn.el (vc-svn-state): Remove optional `localp'
4611 argument and always pass "-v" to "svn status", never "-u". 4611 argument and always pass "-v" to "svn status", never "-u".
@@ -5306,7 +5306,7 @@
5306 (query-replace-read-from): Call custom-reevaluate-setting on 5306 (query-replace-read-from): Call custom-reevaluate-setting on
5307 query-replace-from-to-separator to reevaluate the separator 5307 query-replace-from-to-separator to reevaluate the separator
5308 depending on the return value of char-displayable-p. 5308 depending on the return value of char-displayable-p.
5309 https://lists.gnu.org/archive/html/emacs-devel/2014-11/msg00466.html 5309 https://lists.gnu.org/r/emacs-devel/2014-11/msg00466.html
5310 5310
53112014-11-18 Juri Linkov <juri@linkov.net> 53112014-11-18 Juri Linkov <juri@linkov.net>
5312 5312
@@ -5316,7 +5316,7 @@
5316 5316
5317 * simple.el (next-line-or-history-element) 5317 * simple.el (next-line-or-history-element)
5318 (previous-line-or-history-element): New commands. 5318 (previous-line-or-history-element): New commands.
5319 https://lists.gnu.org/archive/html/emacs-devel/2014-11/msg00822.html 5319 https://lists.gnu.org/r/emacs-devel/2014-11/msg00822.html
5320 5320
53212014-11-18 Leo Liu <sdl.web@gmail.com> 53212014-11-18 Leo Liu <sdl.web@gmail.com>
5322 5322
@@ -5441,7 +5441,7 @@
5441 5441
5442 Improve time stamp handling, and be more consistent about it. 5442 Improve time stamp handling, and be more consistent about it.
5443 This implements a suggestion made in: 5443 This implements a suggestion made in:
5444 https://lists.gnu.org/archive/html/emacs-devel/2014-10/msg00587.html 5444 https://lists.gnu.org/r/emacs-devel/2014-10/msg00587.html
5445 Among other things, this means timer.el no longer needs to 5445 Among other things, this means timer.el no longer needs to
5446 autoload the time-date module. 5446 autoload the time-date module.
5447 * allout-widgets.el (allout-elapsed-time-seconds): Doc fix. 5447 * allout-widgets.el (allout-elapsed-time-seconds): Doc fix.
@@ -5682,7 +5682,7 @@
56822014-11-10 Sylvain Chouleur <sylvain.chouleur@gmail.com> (tiny change) 56822014-11-10 Sylvain Chouleur <sylvain.chouleur@gmail.com> (tiny change)
5683 5683
5684 Allow VTIMEZONE where daylight and standard time zones are equal. 5684 Allow VTIMEZONE where daylight and standard time zones are equal.
5685 See: https://lists.gnu.org/archive/html/emacs-devel/2014-11/msg00494.html 5685 See: https://lists.gnu.org/r/emacs-devel/2014-11/msg00494.html
5686 * calendar/icalendar.el (icalendar--convert-tz-offset): 5686 * calendar/icalendar.el (icalendar--convert-tz-offset):
5687 Support timezone without daylight saving time. 5687 Support timezone without daylight saving time.
5688 5688
@@ -5813,7 +5813,7 @@
5813 to the history variables. 5813 to the history variables.
5814 (query-replace-read-to): Add FROM-TO pairs to query-replace-defaults. 5814 (query-replace-read-to): Add FROM-TO pairs to query-replace-defaults.
5815 (query-replace-regexp-eval): Let-bind query-replace-defaults to nil. 5815 (query-replace-regexp-eval): Let-bind query-replace-defaults to nil.
5816 https://lists.gnu.org/archive/html/emacs-devel/2014-11/msg00253.html 5816 https://lists.gnu.org/r/emacs-devel/2014-11/msg00253.html
5817 5817
5818 * isearch.el (isearch-text-char-description): Keep characters 5818 * isearch.el (isearch-text-char-description): Keep characters
5819 intact and put formatted strings with the `display' property. 5819 intact and put formatted strings with the `display' property.
@@ -7565,7 +7565,7 @@
7565 (lisp--form-quoted-p): New functions. 7565 (lisp--form-quoted-p): New functions.
7566 (lisp-completion-at-point): Use them to see if we're completing a 7566 (lisp-completion-at-point): Use them to see if we're completing a
7567 variable reference, a function name, or just any symbol. 7567 variable reference, a function name, or just any symbol.
7568 https://lists.gnu.org/archive/html/emacs-devel/2014-02/msg00229.html 7568 https://lists.gnu.org/r/emacs-devel/2014-02/msg00229.html
7569 7569
75702014-09-18 Ivan Kanis <ivan@kanis.fr> 75702014-09-18 Ivan Kanis <ivan@kanis.fr>
7571 7571
@@ -9937,7 +9937,7 @@
9937 `window-configuration-change-hook'. 9937 `window-configuration-change-hook'.
9938 (desktop-auto-save-set-timer): Change REPEAT arg of 9938 (desktop-auto-save-set-timer): Change REPEAT arg of
9939 `run-with-idle-timer' from t to nil. 9939 `run-with-idle-timer' from t to nil.
9940 https://lists.gnu.org/archive/html/emacs-devel/2014-06/msg00147.html 9940 https://lists.gnu.org/r/emacs-devel/2014-06/msg00147.html
9941 9941
99422014-06-08 Santiago Payà i Miralta <santiagopim@gmail.com> 99422014-06-08 Santiago Payà i Miralta <santiagopim@gmail.com>
9943 9943
@@ -10488,7 +10488,7 @@
10488 * emacs-lisp/package.el (package-generate-description-file): 10488 * emacs-lisp/package.el (package-generate-description-file):
10489 Output first-line comment to set buffer-local var `no-byte-compile'. 10489 Output first-line comment to set buffer-local var `no-byte-compile'.
10490 Suggested by Dmitry Gutov: 10490 Suggested by Dmitry Gutov:
10491 <https://lists.gnu.org/archive/html/emacs-devel/2014-05/msg00401.html>. 10491 <https://lists.gnu.org/r/emacs-devel/2014-05/msg00401.html>.
10492 10492
104932014-05-25 Thien-Thi Nguyen <ttn@gnu.org> 104932014-05-25 Thien-Thi Nguyen <ttn@gnu.org>
10494 10494
@@ -12170,7 +12170,7 @@
12170 to `comment-start-skip' if not `comment-use-syntax'. (Bug#16971) 12170 to `comment-start-skip' if not `comment-use-syntax'. (Bug#16971)
12171 (comment-beginning): Use `narrow-to-region' instead of moving back 12171 (comment-beginning): Use `narrow-to-region' instead of moving back
12172 one character. 12172 one character.
12173 (https://lists.gnu.org/archive/html/emacs-devel/2014-03/msg00488.html) 12173 (https://lists.gnu.org/r/emacs-devel/2014-03/msg00488.html)
12174 (comment-start-skip): Update the docstring. 12174 (comment-start-skip): Update the docstring.
12175 12175
121762014-03-18 Richard Stallman <rms@gnu.org> 121762014-03-18 Richard Stallman <rms@gnu.org>
@@ -12467,7 +12467,7 @@
12467 from `xterm-standard-colors' that look well on the default white 12467 from `xterm-standard-colors' that look well on the default white
12468 background (and also on the black background) to avoid illegible 12468 background (and also on the black background) to avoid illegible
12469 color combinations like yellow-on-white and white-on-white. 12469 color combinations like yellow-on-white and white-on-white.
12470 https://lists.gnu.org/archive/html/emacs-devel/2014-02/msg00157.html 12470 https://lists.gnu.org/r/emacs-devel/2014-02/msg00157.html
12471 12471
124722014-03-08 Juanma Barranquero <lekktu@gmail.com> 124722014-03-08 Juanma Barranquero <lekktu@gmail.com>
12473 12473
@@ -13224,7 +13224,7 @@
132242014-02-12 Dmitry Gutov <dgutov@yandex.ru> 132242014-02-12 Dmitry Gutov <dgutov@yandex.ru>
13225 13225
13226 * progmodes/js.el (js-indent-line): Don't widen. 13226 * progmodes/js.el (js-indent-line): Don't widen.
13227 https://lists.gnu.org/archive/html/emacs-devel/2012-06/msg00276.html 13227 https://lists.gnu.org/r/emacs-devel/2012-06/msg00276.html
13228 13228
132292014-02-12 Glenn Morris <rgm@gnu.org> 132292014-02-12 Glenn Morris <rgm@gnu.org>
13230 13230
@@ -13965,7 +13965,7 @@
13965 choices. 13965 choices.
13966 (ruby-smie-rules): Instead of using a hardcoded list of alignable 13966 (ruby-smie-rules): Instead of using a hardcoded list of alignable
13967 keywords, check against the value of `ruby-alignable-keywords' 13967 keywords, check against the value of `ruby-alignable-keywords'
13968 (https://lists.gnu.org/archive/html/emacs-devel/2014-01/msg01439.html). 13968 (https://lists.gnu.org/r/emacs-devel/2014-01/msg01439.html).
13969 13969
139702014-01-17 Glenn Morris <rgm@gnu.org> 139702014-01-17 Glenn Morris <rgm@gnu.org>
13971 13971
@@ -15408,7 +15408,7 @@
15408 * simple.el (blink-matching--overlay): New variable. 15408 * simple.el (blink-matching--overlay): New variable.
15409 (blink-matching-open): Instead of moving point, highlight the 15409 (blink-matching-open): Instead of moving point, highlight the
15410 matching paren with an overlay 15410 matching paren with an overlay
15411 (https://lists.gnu.org/archive/html/emacs-devel/2013-12/msg00333.html). 15411 (https://lists.gnu.org/r/emacs-devel/2013-12/msg00333.html).
15412 15412
15413 * faces.el (paren-showing-faces, show-paren-match) 15413 * faces.el (paren-showing-faces, show-paren-match)
15414 (show-paren-mismatch): Move from paren.el. 15414 (show-paren-mismatch): Move from paren.el.
@@ -16628,7 +16628,7 @@
16628 16628
16629 * textmodes/ispell.el (ispell-lookup-words): When `look' is not 16629 * textmodes/ispell.el (ispell-lookup-words): When `look' is not
16630 available and the word has no wildcards, append one to the grep pattern. 16630 available and the word has no wildcards, append one to the grep pattern.
16631 https://lists.gnu.org/archive/html/emacs-devel/2013-11/msg00258.html 16631 https://lists.gnu.org/r/emacs-devel/2013-11/msg00258.html
16632 (ispell-complete-word): Call `ispell-lookup-words' with the value 16632 (ispell-complete-word): Call `ispell-lookup-words' with the value
16633 independent of `ispell-look-p'. 16633 independent of `ispell-look-p'.
16634 16634
@@ -18282,7 +18282,7 @@
18282 18282
18283 * emacs-lisp/package.el (package-buffer-info, describe-package-1): 18283 * emacs-lisp/package.el (package-buffer-info, describe-package-1):
18284 Use :url instead of :homepage, as per 18284 Use :url instead of :homepage, as per
18285 https://lists.gnu.org/archive/html/emacs-devel/2013-09/msg00622.html 18285 https://lists.gnu.org/r/emacs-devel/2013-09/msg00622.html
18286 18286
18287 * newcomment.el (comment-beginning): When `comment-use-syntax' is 18287 * newcomment.el (comment-beginning): When `comment-use-syntax' is
18288 non-nil, use `syntax-ppss' (Bug#15251). 18288 non-nil, use `syntax-ppss' (Bug#15251).
@@ -19828,7 +19828,7 @@
19828 19828
19829 * xml.el (xml-parse-tag-1): Use looking-at (this reverts change in 19829 * xml.el (xml-parse-tag-1): Use looking-at (this reverts change in
19830 2013-08-11T00:07:48Z!lekktu@gmail.com, which breaks the test suite). 19830 2013-08-11T00:07:48Z!lekktu@gmail.com, which breaks the test suite).
19831 https://lists.gnu.org/archive/html/emacs-devel/2013-08/msg00263.html 19831 https://lists.gnu.org/r/emacs-devel/2013-08/msg00263.html
19832 19832
198332013-08-12 Eli Zaretskii <eliz@gnu.org> 198332013-08-12 Eli Zaretskii <eliz@gnu.org>
19834 19834
@@ -21942,7 +21942,7 @@
219422013-06-25 Martin Rudalics <rudalics@gmx.at> 219422013-06-25 Martin Rudalics <rudalics@gmx.at>
21943 21943
21944 * window.el (window--state-get-1): Workaround for bug#14527. 21944 * window.el (window--state-get-1): Workaround for bug#14527.
21945 https://lists.gnu.org/archive/html/emacs-devel/2013-06/msg00941.html 21945 https://lists.gnu.org/r/emacs-devel/2013-06/msg00941.html
21946 21946
219472013-06-25 Lars Magne Ingebrigtsen <larsi@gnus.org> 219472013-06-25 Lars Magne Ingebrigtsen <larsi@gnus.org>
21948 21948
@@ -22055,7 +22055,7 @@
22055 22055
22056 * progmodes/ruby-mode.el (ruby-font-lock-keywords): Move `catch', 22056 * progmodes/ruby-mode.el (ruby-font-lock-keywords): Move `catch',
22057 add some more keyword-like methods. 22057 add some more keyword-like methods.
22058 https://lists.gnu.org/archive/html/emacs-devel/2013-06/msg00911.html 22058 https://lists.gnu.org/r/emacs-devel/2013-06/msg00911.html
22059 22059
220602013-06-22 Juanma Barranquero <lekktu@gmail.com> 220602013-06-22 Juanma Barranquero <lekktu@gmail.com>
22061 22061
@@ -22674,7 +22674,7 @@
226742013-06-18 Matthias Meulien <orontee@gmail.com> 226742013-06-18 Matthias Meulien <orontee@gmail.com>
22675 22675
22676 * tabify.el (untabify, tabify): With prefix, apply to entire buffer. 22676 * tabify.el (untabify, tabify): With prefix, apply to entire buffer.
22677 <https://lists.gnu.org/archive/html/emacs-devel/2013-03/msg00545.html> 22677 <https://lists.gnu.org/r/emacs-devel/2013-03/msg00545.html>
22678 22678
226792013-06-18 Glenn Morris <rgm@gnu.org> 226792013-06-18 Glenn Morris <rgm@gnu.org>
22680 22680
@@ -22704,7 +22704,7 @@
22704 22704
22705 * emacs-lisp/package.el (package-load-descriptor): 22705 * emacs-lisp/package.el (package-load-descriptor):
22706 Remove `with-syntax-table' call, `read' doesn't need it. 22706 Remove `with-syntax-table' call, `read' doesn't need it.
22707 https://lists.gnu.org/archive/html/emacs-devel/2013-06/msg00539.html 22707 https://lists.gnu.org/r/emacs-devel/2013-06/msg00539.html
22708 22708
227092013-06-17 Juanma Barranquero <lekktu@gmail.com> 227092013-06-17 Juanma Barranquero <lekktu@gmail.com>
22710 22710
@@ -25118,7 +25118,7 @@
25118 (desktop-auto-save, desktop-auto-save-set-timer): New functions. 25118 (desktop-auto-save, desktop-auto-save-set-timer): New functions.
25119 (after-init-hook): Call `desktop-auto-save-set-timer'. 25119 (after-init-hook): Call `desktop-auto-save-set-timer'.
25120 Suggested by Reuben Thomas <rrt@sc3d.org> in 25120 Suggested by Reuben Thomas <rrt@sc3d.org> in
25121 <https://lists.gnu.org/archive/html/emacs-devel/2013-04/msg00327.html>. 25121 <https://lists.gnu.org/r/emacs-devel/2013-04/msg00327.html>.
25122 25122
251232013-04-27 Leo Liu <sdl.web@gmail.com> 251232013-04-27 Leo Liu <sdl.web@gmail.com>
25124 25124
@@ -25144,7 +25144,7 @@
25144 25144
25145 * ls-lisp.el (ls-lisp-insert-directory): If no files are 25145 * ls-lisp.el (ls-lisp-insert-directory): If no files are
25146 displayed, move point to after the totals line. 25146 displayed, move point to after the totals line.
25147 See https://lists.gnu.org/archive/html/emacs-devel/2013-04/msg00677.html 25147 See https://lists.gnu.org/r/emacs-devel/2013-04/msg00677.html
25148 for the details. 25148 for the details.
25149 25149
251502013-04-27 Stefan Monnier <monnier@iro.umontreal.ca> 251502013-04-27 Stefan Monnier <monnier@iro.umontreal.ca>
@@ -25757,7 +25757,7 @@
25757 25757
25758 Do not set x-display-name until X connection is established. 25758 Do not set x-display-name until X connection is established.
25759 This is needed to prevent from weird situation described at 25759 This is needed to prevent from weird situation described at
25760 <https://lists.gnu.org/archive/html/emacs-devel/2013-04/msg00212.html>. 25760 <https://lists.gnu.org/r/emacs-devel/2013-04/msg00212.html>.
25761 * frame.el (make-frame): Set x-display-name after call to 25761 * frame.el (make-frame): Set x-display-name after call to
25762 window system initialization function, not before. 25762 window system initialization function, not before.
25763 * term/x-win.el (x-initialize-window-system): Add optional 25763 * term/x-win.el (x-initialize-window-system): Add optional
@@ -26079,7 +26079,7 @@
26079 (batch-skkdic-convert): Suppress most of the chatter. 26079 (batch-skkdic-convert): Suppress most of the chatter.
26080 It's not needed so much now that machines are faster, 26080 It's not needed so much now that machines are faster,
26081 and its non-ASCII component was confusing; see Dmitry Gutov in 26081 and its non-ASCII component was confusing; see Dmitry Gutov in
26082 <https://lists.gnu.org/archive/html/emacs-devel/2013-03/msg00508.html>. 26082 <https://lists.gnu.org/r/emacs-devel/2013-03/msg00508.html>.
26083 26083
260842013-03-20 Leo Liu <sdl.web@gmail.com> 260842013-03-20 Leo Liu <sdl.web@gmail.com>
26085 26085
@@ -26223,7 +26223,7 @@
26223 * startup.el (command-line-normalize-file-name): Fix handling of 26223 * startup.el (command-line-normalize-file-name): Fix handling of
26224 backslashes in DOS and Windows file names. Reported by Xue Fuqiao 26224 backslashes in DOS and Windows file names. Reported by Xue Fuqiao
26225 <xfq.free@gmail.com> in 26225 <xfq.free@gmail.com> in
26226 https://lists.gnu.org/archive/html/help-gnu-emacs/2013-03/msg00245.html. 26226 https://lists.gnu.org/r/help-gnu-emacs/2013-03/msg00245.html.
26227 26227
262282013-03-15 Michael Albinus <michael.albinus@gmx.de> 262282013-03-15 Michael Albinus <michael.albinus@gmx.de>
26229 26229
diff --git a/lisp/Makefile.in b/lisp/Makefile.in
index b628444aad1..de3dc186170 100644
--- a/lisp/Makefile.in
+++ b/lisp/Makefile.in
@@ -132,13 +132,13 @@ PHONY_EXTRAS =
132# This could lead to problems in parallel builds if automatically 132# This could lead to problems in parallel builds if automatically
133# generated *.el files (eg loaddefs etc) were being changed at the same time. 133# generated *.el files (eg loaddefs etc) were being changed at the same time.
134# One solution was to add autoloads as a prerequisite: 134# One solution was to add autoloads as a prerequisite:
135# https://lists.gnu.org/archive/html/emacs-pretest-bug/2007-01/msg00469.html 135# https://lists.gnu.org/r/emacs-pretest-bug/2007-01/msg00469.html
136# https://lists.gnu.org/archive/html/bug-gnu-emacs/2007-12/msg00171.html 136# https://lists.gnu.org/r/bug-gnu-emacs/2007-12/msg00171.html
137# However, this meant that running these targets modified loaddefs.el, 137# However, this meant that running these targets modified loaddefs.el,
138# every time (due to time-stamping). Calling these rules from 138# every time (due to time-stamping). Calling these rules from
139# bootstrap-after would modify loaddefs after src/emacs, resulting 139# bootstrap-after would modify loaddefs after src/emacs, resulting
140# in make install remaking src/emacs for no real reason: 140# in make install remaking src/emacs for no real reason:
141# https://lists.gnu.org/archive/html/emacs-devel/2008-02/msg00311.html 141# https://lists.gnu.org/r/emacs-devel/2008-02/msg00311.html
142# Nowadays these commands don't scan automatically generated files, 142# Nowadays these commands don't scan automatically generated files,
143# since they will never contain any useful information 143# since they will never contain any useful information
144# (see finder-no-scan-regexp and custom-dependencies-no-scan-regexp). 144# (see finder-no-scan-regexp and custom-dependencies-no-scan-regexp).
diff --git a/lisp/bindings.el b/lisp/bindings.el
index 3a679f778ab..2b664044de8 100644
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -689,6 +689,7 @@ okay. See `mode-line-format'.")
689;; `kill-all-local-variables', because they have no default value. 689;; `kill-all-local-variables', because they have no default value.
690;; For consistency, we give them the `permanent-local' property, even 690;; For consistency, we give them the `permanent-local' property, even
691;; though `kill-all-local-variables' does not actually consult it. 691;; though `kill-all-local-variables' does not actually consult it.
692;; See init_buffer_once in buffer.c for the origins of this list.
692 693
693(mapc (lambda (sym) (put sym 'permanent-local t)) 694(mapc (lambda (sym) (put sym 'permanent-local t))
694 '(buffer-file-name default-directory buffer-backed-up 695 '(buffer-file-name default-directory buffer-backed-up
@@ -697,7 +698,8 @@ okay. See `mode-line-format'.")
697 point-before-scroll buffer-file-truename 698 point-before-scroll buffer-file-truename
698 buffer-file-format buffer-auto-save-file-format 699 buffer-file-format buffer-auto-save-file-format
699 buffer-display-count buffer-display-time 700 buffer-display-count buffer-display-time
700 enable-multibyte-characters)) 701 enable-multibyte-characters
702 buffer-file-coding-system))
701 703
702;; We have base64, md5 and sha1 functions built in now. 704;; We have base64, md5 and sha1 functions built in now.
703(provide 'base64) 705(provide 'base64)
diff --git a/lisp/calendar/cal-dst.el b/lisp/calendar/cal-dst.el
index 6a4054d73fa..301dc29c56a 100644
--- a/lisp/calendar/cal-dst.el
+++ b/lisp/calendar/cal-dst.el
@@ -248,7 +248,7 @@ The result has the proper form for `calendar-daylight-savings-starts'."
248;; TODO it might be better to extract this information directly from 248;; TODO it might be better to extract this information directly from
249;; the system timezone database. But cross-platform...? 249;; the system timezone database. But cross-platform...?
250;; See thread 250;; See thread
251;; https://lists.gnu.org/archive/html/emacs-pretest-bug/2006-11/msg00060.html 251;; https://lists.gnu.org/r/emacs-pretest-bug/2006-11/msg00060.html
252(defun calendar-dst-find-data (&optional time) 252(defun calendar-dst-find-data (&optional time)
253 "Find data on the first daylight saving time transitions after TIME. 253 "Find data on the first daylight saving time transitions after TIME.
254TIME defaults to `current-time'. Return value is as described 254TIME defaults to `current-time'. Return value is as described
diff --git a/lisp/calendar/cal-menu.el b/lisp/calendar/cal-menu.el
index 32769332df5..b2079797b6c 100644
--- a/lisp/calendar/cal-menu.el
+++ b/lisp/calendar/cal-menu.el
@@ -100,7 +100,7 @@
100 ;; Show 11 years--5 before, 5 after year of middle month. 100 ;; Show 11 years--5 before, 5 after year of middle month.
101 ;; We used to use :suffix rather than :label and bumped into 101 ;; We used to use :suffix rather than :label and bumped into
102 ;; an easymenu bug: 102 ;; an easymenu bug:
103 ;; https://lists.gnu.org/archive/html/emacs-devel/2007-11/msg01813.html 103 ;; https://lists.gnu.org/r/emacs-devel/2007-11/msg01813.html
104 ;; The bug has since been fixed. 104 ;; The bug has since been fixed.
105 (dotimes (i 11) 105 (dotimes (i 11)
106 (push (vector (format "hol-year-%d" i) 106 (push (vector (format "hol-year-%d" i)
diff --git a/lisp/calendar/diary-lib.el b/lisp/calendar/diary-lib.el
index d8d2dd4aafa..e45f8b27622 100644
--- a/lisp/calendar/diary-lib.el
+++ b/lisp/calendar/diary-lib.el
@@ -425,7 +425,7 @@ Only used if `diary-header-line-flag' is non-nil."
425;; display does not create the fancy buffer, nor does it set 425;; display does not create the fancy buffer, nor does it set
426;; diary-selective-display in the diary buffer. This means some 426;; diary-selective-display in the diary buffer. This means some
427;; customizations will not take effect, eg: 427;; customizations will not take effect, eg:
428;; https://lists.gnu.org/archive/html/emacs-pretest-bug/2007-03/msg00466.html 428;; https://lists.gnu.org/r/emacs-pretest-bug/2007-03/msg00466.html
429;; So the check for diary-selective-display was dropped. This means the 429;; So the check for diary-selective-display was dropped. This means the
430;; diary will be displayed if one customizes a diary variable while 430;; diary will be displayed if one customizes a diary variable while
431;; just visiting the diary-file. This is i) unlikely, and ii) no great loss. 431;; just visiting the diary-file. This is i) unlikely, and ii) no great loss.
@@ -814,8 +814,8 @@ LIST-ONLY is non-nil, in which case it just returns the list."
814 ;; diary-header-line-flag after diary has been displayed 814 ;; diary-header-line-flag after diary has been displayed
815 ;; take effect. Unconditionally calling (diary-mode) 815 ;; take effect. Unconditionally calling (diary-mode)
816 ;; clobbers file local variables. 816 ;; clobbers file local variables.
817 ;; https://lists.gnu.org/archive/html/emacs-pretest-bug/2007-03/msg00363.html 817 ;; https://lists.gnu.org/r/emacs-pretest-bug/2007-03/msg00363.html
818 ;; https://lists.gnu.org/archive/html/emacs-pretest-bug/2007-04/msg00404.html 818 ;; https://lists.gnu.org/r/emacs-pretest-bug/2007-04/msg00404.html
819 (if (eq major-mode 'diary-mode) 819 (if (eq major-mode 'diary-mode)
820 (setq header-line-format (and diary-header-line-flag 820 (setq header-line-format (and diary-header-line-flag
821 diary-header-line-format))))) 821 diary-header-line-format)))))
diff --git a/lisp/calendar/todo-mode.el b/lisp/calendar/todo-mode.el
index 3e568213a63..0ae59c58804 100644
--- a/lisp/calendar/todo-mode.el
+++ b/lisp/calendar/todo-mode.el
@@ -5210,7 +5210,7 @@ If the category's done items are visible, this command called
5210with a prefix argument only moves point to a higher item, e.g., 5210with a prefix argument only moves point to a higher item, e.g.,
5211with point on the first done item and called with prefix 1, it 5211with point on the first done item and called with prefix 1, it
5212moves to the last todo item; but if called with point on the 5212moves to the last todo item; but if called with point on the
5213first done item without a prefix argument, it moves point the the 5213first done item without a prefix argument, it moves point to the
5214empty line above the done items separator." 5214empty line above the done items separator."
5215 (let* ((done (todo-done-item-p))) 5215 (let* ((done (todo-done-item-p)))
5216 (todo-item-start) 5216 (todo-item-start)
diff --git a/lisp/char-fold.el b/lisp/char-fold.el
index 18ce5bea4f6..b24363530f3 100644
--- a/lisp/char-fold.el
+++ b/lisp/char-fold.el
@@ -196,7 +196,7 @@ from which to start."
196;;; If N suffixes match, we "branch" out into N+1 executions for the 196;;; If N suffixes match, we "branch" out into N+1 executions for the
197;;; length of the longest match. This means "fix" will match "fix" but 197;;; length of the longest match. This means "fix" will match "fix" but
198;;; not "fⅸ", but it's necessary to keep the regexp size from scaling 198;;; not "fⅸ", but it's necessary to keep the regexp size from scaling
199;;; exponentially. See https://lists.gnu.org/archive/html/emacs-devel/2015-11/msg02562.html 199;;; exponentially. See https://lists.gnu.org/r/emacs-devel/2015-11/msg02562.html
200 (let ((subs (substring string (1+ i) (+ i 1 max-length)))) 200 (let ((subs (substring string (1+ i) (+ i 1 max-length))))
201 ;; `i' is still going to inc by 1 below. 201 ;; `i' is still going to inc by 1 below.
202 (setq i (+ i max-length)) 202 (setq i (+ i max-length))
diff --git a/lisp/comint.el b/lisp/comint.el
index 9bbb362d9ce..aa7dab28f32 100644
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -678,7 +678,7 @@ Entry to this mode runs the hooks on `comint-mode-hook'."
678 ;; comint-scroll-show-maximum-output is nil, and no-one can remember 678 ;; comint-scroll-show-maximum-output is nil, and no-one can remember
679 ;; what the original problem was. If there are problems with point 679 ;; what the original problem was. If there are problems with point
680 ;; not going to the end, consider re-enabling this. 680 ;; not going to the end, consider re-enabling this.
681 ;; https://lists.gnu.org/archive/html/emacs-devel/2007-08/msg00827.html 681 ;; https://lists.gnu.org/r/emacs-devel/2007-08/msg00827.html
682 ;; 682 ;;
683 ;; This makes it really work to keep point at the bottom. 683 ;; This makes it really work to keep point at the bottom.
684 ;; (make-local-variable 'scroll-conservatively) 684 ;; (make-local-variable 'scroll-conservatively)
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index edf3545cadd..4965adfd56c 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -2799,7 +2799,7 @@ If STATE is nil, the value is computed by `custom-variable-state'."
2799 ;; init-file-user rather than user-init-file. This is in case 2799 ;; init-file-user rather than user-init-file. This is in case
2800 ;; cus-edit is loaded by something in site-start.el, because 2800 ;; cus-edit is loaded by something in site-start.el, because
2801 ;; user-init-file is not set at that stage. 2801 ;; user-init-file is not set at that stage.
2802 ;; https://lists.gnu.org/archive/html/emacs-devel/2007-10/msg00310.html 2802 ;; https://lists.gnu.org/r/emacs-devel/2007-10/msg00310.html
2803 ,@(when (or custom-file init-file-user) 2803 ,@(when (or custom-file init-file-user)
2804 '(("Save for Future Sessions" custom-variable-save 2804 '(("Save for Future Sessions" custom-variable-save
2805 (lambda (widget) 2805 (lambda (widget)
diff --git a/lisp/delsel.el b/lisp/delsel.el
index 17b46efc7cb..65b2cb85cea 100644
--- a/lisp/delsel.el
+++ b/lisp/delsel.el
@@ -256,12 +256,18 @@ See `delete-selection-helper'."
256 (get this-command 'delete-selection))))) 256 (get this-command 'delete-selection)))))
257 257
258(defun delete-selection-uses-region-p () 258(defun delete-selection-uses-region-p ()
259 "Return t when the current command will be using the region 259 "Return t when `delete-selection-mode' should not delete the region.
260rather than having `delete-selection' delete it, nil otherwise. 260
261The `self-insert-command' could be the current command or may be
262called by the current command. If this function returns nil,
263then `delete-selection' is allowed to delete the region.
261 264
262This function is intended for use as the value of the 265This function is intended for use as the value of the
263`delete-selection' property of a command, and shouldn't be used 266`delete-selection' property of a command, and shouldn't be used
264for anything else." 267for anything else. In particular, `self-insert-command' has this
268function as its `delete-selection' property, so that \"electric\"
269self-insert commands that act on the region could adapt themselves
270to `delete-selection-mode'."
265 (not (run-hook-with-args-until-success 271 (not (run-hook-with-args-until-success
266 'self-insert-uses-region-functions))) 272 'self-insert-uses-region-functions)))
267 273
diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el
index 3f9912980ba..f1f7cf0b0ef 100644
--- a/lisp/dired-aux.el
+++ b/lisp/dired-aux.el
@@ -1014,7 +1014,7 @@ ARGS are command switches passed to PROGRAM.")
1014 "Control the compression shell command for `dired-do-compress-to'. 1014 "Control the compression shell command for `dired-do-compress-to'.
1015 1015
1016Each element is (REGEXP . CMD), where REGEXP is the name of the 1016Each element is (REGEXP . CMD), where REGEXP is the name of the
1017archive to which you want to compress, and CMD the the 1017archive to which you want to compress, and CMD is the
1018corresponding command. 1018corresponding command.
1019 1019
1020Within CMD, %i denotes the input file(s), and %o denotes the 1020Within CMD, %i denotes the input file(s), and %o denotes the
diff --git a/lisp/dnd.el b/lisp/dnd.el
index a0c91b13742..c5ee8975ac6 100644
--- a/lisp/dnd.el
+++ b/lisp/dnd.el
@@ -144,7 +144,7 @@ Return nil if URI is not a local file."
144 str)) 144 str))
145 uri t t)) 145 uri t t))
146 146
147;; https://lists.gnu.org/archive/html/emacs-devel/2006-05/msg01060.html 147;; https://lists.gnu.org/r/emacs-devel/2006-05/msg01060.html
148(defun dnd-get-local-file-name (uri &optional must-exist) 148(defun dnd-get-local-file-name (uri &optional must-exist)
149 "Return file name converted from file:/// or file: syntax. 149 "Return file name converted from file:/// or file: syntax.
150URI is the uri for the file. If MUST-EXIST is given and non-nil, 150URI is the uri for the file. If MUST-EXIST is given and non-nil,
diff --git a/lisp/emacs-lisp/byte-run.el b/lisp/emacs-lisp/byte-run.el
index abfcdb347a3..d6c43ecf462 100644
--- a/lisp/emacs-lisp/byte-run.el
+++ b/lisp/emacs-lisp/byte-run.el
@@ -286,8 +286,12 @@ The return value is undefined.
286 286
287 287
288;; Redefined in byte-opt.el. 288;; Redefined in byte-opt.el.
289;; This is not documented--it's not clear that we should promote it. 289;; This was undocumented and unused for decades.
290(fset 'inline 'progn) 290(defalias 'inline 'progn
291 "Like `progn', but when compiled inline top-level function calls in body.
292You don't need this. (See bytecomp.el commentary for more details.)
293
294\(fn BODY...)")
291 295
292;;; Interface to inline functions. 296;;; Interface to inline functions.
293 297
@@ -318,6 +322,7 @@ The return value is undefined.
318 322
319(defmacro defsubst (name arglist &rest body) 323(defmacro defsubst (name arglist &rest body)
320 "Define an inline function. The syntax is just like that of `defun'. 324 "Define an inline function. The syntax is just like that of `defun'.
325
321\(fn NAME ARGLIST &optional DOCSTRING DECL &rest BODY)" 326\(fn NAME ARGLIST &optional DOCSTRING DECL &rest BODY)"
322 (declare (debug defun) (doc-string 3)) 327 (declare (debug defun) (doc-string 3))
323 (or (memq (get name 'byte-optimizer) 328 (or (memq (get name 'byte-optimizer)
diff --git a/lisp/emacs-lisp/lisp.el b/lisp/emacs-lisp/lisp.el
index c54828e7b43..6952ef4cf49 100644
--- a/lisp/emacs-lisp/lisp.el
+++ b/lisp/emacs-lisp/lisp.el
@@ -402,7 +402,7 @@ is called as a function to find the defun's beginning."
402 "Return non-nil if the point is in an \"emptyish\" line. 402 "Return non-nil if the point is in an \"emptyish\" line.
403This means a line that consists entirely of comments and/or 403This means a line that consists entirely of comments and/or
404whitespace." 404whitespace."
405;; See https://lists.gnu.org/archive/html/help-gnu-emacs/2016-08/msg00141.html 405;; See https://lists.gnu.org/r/help-gnu-emacs/2016-08/msg00141.html
406 (save-excursion 406 (save-excursion
407 (forward-line 0) 407 (forward-line 0)
408 (< (line-end-position) 408 (< (line-end-position)
@@ -525,7 +525,7 @@ the one(s) already marked."
525 (interactive "p") 525 (interactive "p")
526 (setq arg (or arg 1)) 526 (setq arg (or arg 1))
527 ;; There is no `mark-defun-back' function - see 527 ;; There is no `mark-defun-back' function - see
528 ;; https://lists.gnu.org/archive/html/bug-gnu-emacs/2016-11/msg00079.html 528 ;; https://lists.gnu.org/r/bug-gnu-emacs/2016-11/msg00079.html
529 ;; for explanation 529 ;; for explanation
530 (when (eq last-command 'mark-defun-back) 530 (when (eq last-command 'mark-defun-back)
531 (setq arg (- arg))) 531 (setq arg (- arg)))
@@ -574,7 +574,7 @@ the one(s) already marked."
574 (goto-char beg) 574 (goto-char beg)
575 (unless (= arg -1) ; beginning-of-defun behaves 575 (unless (= arg -1) ; beginning-of-defun behaves
576 ; strange with zero arg - see 576 ; strange with zero arg - see
577 ; https://lists.gnu.org/archive/html/bug-gnu-emacs/2017-02/msg00196.html 577 ; https://lists.gnu.org/r/bug-gnu-emacs/2017-02/msg00196.html
578 (beginning-of-defun (1- (- arg)))) 578 (beginning-of-defun (1- (- arg))))
579 (push-mark end nil t)))))) 579 (push-mark end nil t))))))
580 (skip-chars-backward "[:space:]\n") 580 (skip-chars-backward "[:space:]\n")
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index 68ca1972d1e..61bff5cfbca 100644
--- a/lisp/emacs-lisp/package.el
+++ b/lisp/emacs-lisp/package.el
@@ -3397,7 +3397,9 @@ This function is called after `package-refresh-contents'."
3397 "Display a list of packages. 3397 "Display a list of packages.
3398This first fetches the updated list of packages before 3398This first fetches the updated list of packages before
3399displaying, unless a prefix argument NO-FETCH is specified. 3399displaying, unless a prefix argument NO-FETCH is specified.
3400The list is displayed in a buffer named `*Packages*'." 3400The list is displayed in a buffer named `*Packages*', and
3401includes the package's version, availability status, and a
3402short description."
3401 (interactive "P") 3403 (interactive "P")
3402 (require 'finder-inf nil t) 3404 (require 'finder-inf nil t)
3403 ;; Initialize the package system if necessary. 3405 ;; Initialize the package system if necessary.
diff --git a/lisp/emacs-lisp/subr-x.el b/lisp/emacs-lisp/subr-x.el
index 8ed29d8659d..9ff742c4331 100644
--- a/lisp/emacs-lisp/subr-x.el
+++ b/lisp/emacs-lisp/subr-x.el
@@ -28,7 +28,7 @@
28;; in subr.el. 28;; in subr.el.
29 29
30;; Do not document these functions in the lispref. 30;; Do not document these functions in the lispref.
31;; https://lists.gnu.org/archive/html/emacs-devel/2014-01/msg01006.html 31;; https://lists.gnu.org/r/emacs-devel/2014-01/msg01006.html
32 32
33;; NB If you want to use this library, it's almost always correct to use: 33;; NB If you want to use this library, it's almost always correct to use:
34;; (eval-when-compile (require 'subr-x)) 34;; (eval-when-compile (require 'subr-x))
diff --git a/lisp/epg.el b/lisp/epg.el
index 903cbd62eeb..b2d80023f0f 100644
--- a/lisp/epg.el
+++ b/lisp/epg.el
@@ -608,7 +608,7 @@ callback data (if any)."
608 ;; Record modified time of gpg-agent socket to restore the Emacs 608 ;; Record modified time of gpg-agent socket to restore the Emacs
609 ;; frame on text terminal in `epg-wait-for-completion'. 609 ;; frame on text terminal in `epg-wait-for-completion'.
610 ;; See 610 ;; See
611 ;; <https://lists.gnu.org/archive/html/emacs-devel/2007-02/msg00755.html> 611 ;; <https://lists.gnu.org/r/emacs-devel/2007-02/msg00755.html>
612 ;; for more details. 612 ;; for more details.
613 (when (and agent-info (string-match "\\(.*\\):[0-9]+:[0-9]+" agent-info)) 613 (when (and agent-info (string-match "\\(.*\\):[0-9]+:[0-9]+" agent-info))
614 (setq agent-file (match-string 1 agent-info) 614 (setq agent-file (match-string 1 agent-info)
diff --git a/lisp/erc/erc-goodies.el b/lisp/erc/erc-goodies.el
index a655d48a6ac..8906da1e47d 100644
--- a/lisp/erc/erc-goodies.el
+++ b/lisp/erc/erc-goodies.el
@@ -147,7 +147,19 @@ Put this function on `erc-insert-post-hook' and/or `erc-send-post-hook'."
147 (>= (point) erc-insert-marker)) 147 (>= (point) erc-insert-marker))
148 (deactivate-mark) 148 (deactivate-mark)
149 (goto-char (erc-beg-of-input-line)) 149 (goto-char (erc-beg-of-input-line))
150 (forward-line -1))) 150 (forward-line -1)
151 ;; if `switch-to-buffer-preserve-window-point' is set,
152 ;; we cannot rely on point being saved, and must commit
153 ;; it to window-prev-buffers.
154 (when switch-to-buffer-preserve-window-point
155 (dolist (frame (frame-list))
156 (walk-window-tree
157 (lambda (window)
158 (let ((prev (assq (current-buffer)
159 (window-prev-buffers window))))
160 (when prev
161 (setf (nth 2 prev) (point-marker)))))
162 frame nil 'nominibuf)))))
151 163
152;;; Distinguish non-commands 164;;; Distinguish non-commands
153(defvar erc-noncommands-list '(erc-cmd-ME 165(defvar erc-noncommands-list '(erc-cmd-ME
diff --git a/lisp/eshell/em-unix.el b/lisp/eshell/em-unix.el
index c486d2c51d1..e5c799ea167 100644
--- a/lisp/eshell/em-unix.el
+++ b/lisp/eshell/em-unix.el
@@ -961,7 +961,7 @@ Show wall-clock time elapsed during execution of COMMAND.")
961 ;; after setting 961 ;; after setting
962 (throw 'eshell-replace-command 962 (throw 'eshell-replace-command
963 (eshell-parse-command (car time-args) 963 (eshell-parse-command (car time-args)
964;;; https://lists.gnu.org/archive/html/bug-gnu-emacs/2007-08/msg00205.html 964;;; https://lists.gnu.org/r/bug-gnu-emacs/2007-08/msg00205.html
965 (eshell-stringify-list 965 (eshell-stringify-list
966 (eshell-flatten-list (cdr time-args)))))))) 966 (eshell-flatten-list (cdr time-args))))))))
967 967
diff --git a/lisp/faces.el b/lisp/faces.el
index a5f1d1dd328..d8ec454e626 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -2361,7 +2361,7 @@ If you set `term-file-prefix' to nil, this function does nothing."
2361(defface variable-pitch 2361(defface variable-pitch
2362 '((((type w32)) 2362 '((((type w32))
2363 ;; This is a workaround for an issue discussed in 2363 ;; This is a workaround for an issue discussed in
2364 ;; https://lists.gnu.org/archive/html/emacs-devel/2016-04/msg00746.html. 2364 ;; https://lists.gnu.org/r/emacs-devel/2016-04/msg00746.html.
2365 ;; We need (a) the splash screen not to pick up bold-italics variant of 2365 ;; We need (a) the splash screen not to pick up bold-italics variant of
2366 ;; the font, and (b) still be able to request bold/italic/larger size 2366 ;; the font, and (b) still be able to request bold/italic/larger size
2367 ;; variants in the likes of EWW. 2367 ;; variants in the likes of EWW.
diff --git a/lisp/ffap.el b/lisp/ffap.el
index 810afd5739b..a776668d109 100644
--- a/lisp/ffap.el
+++ b/lisp/ffap.el
@@ -786,7 +786,7 @@ This uses `ffap-file-exists-string', which may try adding suffixes from
786 ("\\`~/" . ffap-lcd) ; |~/misc/ffap.el.Z| 786 ("\\`~/" . ffap-lcd) ; |~/misc/ffap.el.Z|
787 ;; This used to have a blank, but ffap-string-at-point doesn't 787 ;; This used to have a blank, but ffap-string-at-point doesn't
788 ;; handle blanks. 788 ;; handle blanks.
789 ;; https://lists.gnu.org/archive/html/emacs-devel/2008-01/msg01058.html 789 ;; https://lists.gnu.org/r/emacs-devel/2008-01/msg01058.html
790 ("\\`[Rr][Ff][Cc][-#]?\\([0-9]+\\)" ; no $ 790 ("\\`[Rr][Ff][Cc][-#]?\\([0-9]+\\)" ; no $
791 . ffap-rfc) ; "100% RFC2100 compliant" 791 . ffap-rfc) ; "100% RFC2100 compliant"
792 (dired-mode . ffap-dired) ; maybe in a subdirectory 792 (dired-mode . ffap-dired) ; maybe in a subdirectory
diff --git a/lisp/files.el b/lisp/files.el
index 63dd509eab8..5d78cd07b6e 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -1859,9 +1859,9 @@ home directory is a root directory) and removes automounter prefixes
1859 1859
1860When this function is first called, it caches the user's home 1860When this function is first called, it caches the user's home
1861directory as a regexp in `abbreviated-home-dir', and reuses it 1861directory as a regexp in `abbreviated-home-dir', and reuses it
1862afterwards. Lisp programs that temporarily set the home directory 1862afterwards (so long as the home directory does not change;
1863to a different value should let-bind `abbreviated-home-dir' for 1863if you want to permanently change your home directory after having
1864the modified home directory to take effect." 1864started Emacs, set `abbreviated-home-dir' to nil so it will be recalculated)."
1865 ;; Get rid of the prefixes added by the automounter. 1865 ;; Get rid of the prefixes added by the automounter.
1866 (save-match-data 1866 (save-match-data
1867 (if (and automount-dir-prefix 1867 (if (and automount-dir-prefix
@@ -1883,29 +1883,37 @@ the modified home directory to take effect."
1883 ;; give time for directory-abbrev-alist to be set properly. 1883 ;; give time for directory-abbrev-alist to be set properly.
1884 ;; We include a slash at the end, to avoid spurious matches 1884 ;; We include a slash at the end, to avoid spurious matches
1885 ;; such as `/usr/foobar' when the home dir is `/usr/foo'. 1885 ;; such as `/usr/foobar' when the home dir is `/usr/foo'.
1886 (or abbreviated-home-dir 1886 (unless abbreviated-home-dir
1887 (setq abbreviated-home-dir 1887 (put 'abbreviated-home-dir 'home (expand-file-name "~"))
1888 (let ((abbreviated-home-dir "$foo")) 1888 (setq abbreviated-home-dir
1889 (setq abbreviated-home-dir 1889 (let ((abbreviated-home-dir "$foo"))
1890 (concat "\\`" 1890 (setq abbreviated-home-dir
1891 (abbreviate-file-name (expand-file-name "~")) 1891 (concat "\\`"
1892 "\\(/\\|\\'\\)")) 1892 (abbreviate-file-name
1893 ;; Depending on whether default-directory does or 1893 (get 'abbreviated-home-dir 'home))
1894 ;; doesn't include non-ASCII characters, the value 1894 "\\(/\\|\\'\\)"))
1895 ;; of abbreviated-home-dir could be multibyte or 1895 ;; Depending on whether default-directory does or
1896 ;; unibyte. In the latter case, we need to decode 1896 ;; doesn't include non-ASCII characters, the value
1897 ;; it. Note that this function is called for the 1897 ;; of abbreviated-home-dir could be multibyte or
1898 ;; first time (from startup.el) when 1898 ;; unibyte. In the latter case, we need to decode
1899 ;; locale-coding-system is already set up. 1899 ;; it. Note that this function is called for the
1900 (if (multibyte-string-p abbreviated-home-dir) 1900 ;; first time (from startup.el) when
1901 abbreviated-home-dir 1901 ;; locale-coding-system is already set up.
1902 (decode-coding-string abbreviated-home-dir 1902 (if (multibyte-string-p abbreviated-home-dir)
1903 (if (eq system-type 'windows-nt) 1903 abbreviated-home-dir
1904 'utf-8 1904 (decode-coding-string abbreviated-home-dir
1905 locale-coding-system)))))) 1905 (if (eq system-type 'windows-nt)
1906 'utf-8
1907 locale-coding-system))))))
1906 1908
1907 ;; If FILENAME starts with the abbreviated homedir, 1909 ;; If FILENAME starts with the abbreviated homedir,
1910 ;; and ~ hasn't changed since abbreviated-home-dir was set,
1908 ;; make it start with `~' instead. 1911 ;; make it start with `~' instead.
1912 ;; If ~ has changed, we ignore abbreviated-home-dir rather than
1913 ;; invalidating it, on the assumption that a change in HOME
1914 ;; is likely temporary (eg for testing).
1915 ;; FIXME Is it even worth caching abbreviated-home-dir?
1916 ;; Ref: https://debbugs.gnu.org/19657#20
1909 (if (and (string-match abbreviated-home-dir filename) 1917 (if (and (string-match abbreviated-home-dir filename)
1910 ;; If the home dir is just /, don't change it. 1918 ;; If the home dir is just /, don't change it.
1911 (not (and (= (match-end 0) 1) 1919 (not (and (= (match-end 0) 1)
@@ -1914,7 +1922,9 @@ the modified home directory to take effect."
1914 ;; Novell Netware allows drive letters beyond `Z:'. 1922 ;; Novell Netware allows drive letters beyond `Z:'.
1915 (not (and (memq system-type '(ms-dos windows-nt cygwin)) 1923 (not (and (memq system-type '(ms-dos windows-nt cygwin))
1916 (save-match-data 1924 (save-match-data
1917 (string-match "^[a-zA-`]:/$" filename))))) 1925 (string-match "^[a-zA-`]:/$" filename))))
1926 (equal (get 'abbreviated-home-dir 'home)
1927 (expand-file-name "~")))
1918 (setq filename 1928 (setq filename
1919 (concat "~" 1929 (concat "~"
1920 (match-string 1 filename) 1930 (match-string 1 filename)
diff --git a/lisp/finder.el b/lisp/finder.el
index ab37ed7fc24..1cebad7b546 100644
--- a/lisp/finder.el
+++ b/lisp/finder.el
@@ -129,7 +129,7 @@ Keywords and package names both should be symbols.")
129;; Skip autogenerated files, because they will never contain anything 129;; Skip autogenerated files, because they will never contain anything
130;; useful, and because in parallel builds of Emacs they may get 130;; useful, and because in parallel builds of Emacs they may get
131;; modified while we are trying to read them. 131;; modified while we are trying to read them.
132;; https://lists.gnu.org/archive/html/emacs-pretest-bug/2007-01/msg00469.html 132;; https://lists.gnu.org/r/emacs-pretest-bug/2007-01/msg00469.html
133;; ldefs-boot is not auto-generated, but has nothing useful. 133;; ldefs-boot is not auto-generated, but has nothing useful.
134(defvar finder-no-scan-regexp "\\(^\\.#\\|\\(loaddefs\\|ldefs-boot\\|\ 134(defvar finder-no-scan-regexp "\\(^\\.#\\|\\(loaddefs\\|ldefs-boot\\|\
135cus-load\\|finder-inf\\|esh-groups\\|subdirs\\|leim-list\\)\\.el$\\)" 135cus-load\\|finder-inf\\|esh-groups\\|subdirs\\|leim-list\\)\\.el$\\)"
diff --git a/lisp/follow.el b/lisp/follow.el
index 4893cad3fdc..1ec6ff30f26 100644
--- a/lisp/follow.el
+++ b/lisp/follow.el
@@ -416,6 +416,7 @@ This command runs the normal hook `follow-mode-hook'.
416 416
417Keys specific to Follow mode: 417Keys specific to Follow mode:
418\\{follow-mode-map}" 418\\{follow-mode-map}"
419 :lighter follow-mode-line-text
419 :keymap follow-mode-map 420 :keymap follow-mode-map
420 (if follow-mode 421 (if follow-mode
421 (progn 422 (progn
diff --git a/lisp/frame.el b/lisp/frame.el
index b6c066462b0..2e925325a9e 100644
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -1075,7 +1075,7 @@ is given and non-nil, the unwanted frames are iconified instead."
1075 (when mini (setq parms (delq mini parms))) 1075 (when mini (setq parms (delq mini parms)))
1076 ;; Leave name in iff it was set explicitly. 1076 ;; Leave name in iff it was set explicitly.
1077 ;; This should fix the behavior reported in 1077 ;; This should fix the behavior reported in
1078 ;; https://lists.gnu.org/archive/html/emacs-devel/2007-08/msg01632.html 1078 ;; https://lists.gnu.org/r/emacs-devel/2007-08/msg01632.html
1079 (when (and name (not explicit-name)) 1079 (when (and name (not explicit-name))
1080 (setq parms (delq name parms))) 1080 (setq parms (delq name parms)))
1081 parms)) 1081 parms))
diff --git a/lisp/gnus/ChangeLog.3 b/lisp/gnus/ChangeLog.3
index 43681f6eb7d..2d030b61b99 100644
--- a/lisp/gnus/ChangeLog.3
+++ b/lisp/gnus/ChangeLog.3
@@ -3819,7 +3819,7 @@
38192012-02-15 Paul Eggert <eggert@cs.ucla.edu> 38192012-02-15 Paul Eggert <eggert@cs.ucla.edu>
3820 3820
3821 * shr.el (shr-rescale-image): Undo previous change; see 3821 * shr.el (shr-rescale-image): Undo previous change; see
3822 <https://lists.gnu.org/archive/html/emacs-devel/2012-02/msg00540.html>. 3822 <https://lists.gnu.org/r/emacs-devel/2012-02/msg00540.html>.
3823 3823
38242012-02-13 Lars Ingebrigtsen <larsi@gnus.org> 38242012-02-13 Lars Ingebrigtsen <larsi@gnus.org>
3825 3825
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index f6777c5e884..445911fc6d5 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -4095,7 +4095,7 @@ Instead, just auto-save the buffer and then bury it."
4095 "Bury this mail BUFFER." 4095 "Bury this mail BUFFER."
4096 ;; Note that this is not quite the same as (bury-buffer buffer), 4096 ;; Note that this is not quite the same as (bury-buffer buffer),
4097 ;; since bury-buffer does extra stuff with a nil argument. 4097 ;; since bury-buffer does extra stuff with a nil argument.
4098 ;; Eg https://lists.gnu.org/archive/html/emacs-devel/2014-01/msg00539.html 4098 ;; Eg https://lists.gnu.org/r/emacs-devel/2014-01/msg00539.html
4099 (with-current-buffer buffer (bury-buffer)) 4099 (with-current-buffer buffer (bury-buffer))
4100 (if message-return-action 4100 (if message-return-action
4101 (apply (car message-return-action) (cdr message-return-action)))) 4101 (apply (car message-return-action) (cdr message-return-action))))
@@ -6679,7 +6679,7 @@ is a function used to switch to and display the mail buffer."
6679 ;; C-h f compose-mail says that headers should be specified as 6679 ;; C-h f compose-mail says that headers should be specified as
6680 ;; (string . value); however all the rest of message expects 6680 ;; (string . value); however all the rest of message expects
6681 ;; headers to be symbols, not strings (eg message-header-format-alist). 6681 ;; headers to be symbols, not strings (eg message-header-format-alist).
6682 ;; https://lists.gnu.org/archive/html/emacs-devel/2011-01/msg00337.html 6682 ;; https://lists.gnu.org/r/emacs-devel/2011-01/msg00337.html
6683 ;; We need to convert any string input, eg from rmail-start-mail. 6683 ;; We need to convert any string input, eg from rmail-start-mail.
6684 (dolist (h other-headers other-headers) 6684 (dolist (h other-headers other-headers)
6685 (if (stringp (car h)) (setcar h (intern (capitalize (car h))))))) 6685 (if (stringp (car h)) (setcar h (intern (capitalize (car h)))))))
diff --git a/lisp/htmlfontify.el b/lisp/htmlfontify.el
index 791b110bf49..a4c68d329b7 100644
--- a/lisp/htmlfontify.el
+++ b/lisp/htmlfontify.el
@@ -650,7 +650,7 @@ STYLE is the inline CSS stylesheet (or tag referring to an external sheet)."
650 var even = false; 650 var even = false;
651 651
652 // if arguments are provided to specify the colors 652 // if arguments are provided to specify the colors
653 // of the even & odd rows, then use the them; 653 // of the even & odd rows, then use them;
654 // otherwise use the following defaults: 654 // otherwise use the following defaults:
655 var evenColor = arguments[1] ? arguments[1] : \"#fff\"; 655 var evenColor = arguments[1] ? arguments[1] : \"#fff\";
656 var oddColor = arguments[2] ? arguments[2] : \"#ddd\"; 656 var oddColor = arguments[2] ? arguments[2] : \"#ddd\";
diff --git a/lisp/info.el b/lisp/info.el
index e2f9953f7c7..0a4f672b9f2 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -1347,7 +1347,7 @@ is non-nil)."
1347 ;; Shouldn't really happen, but sometimes does, 1347 ;; Shouldn't really happen, but sometimes does,
1348 ;; eg on Debian systems with buggy packages; 1348 ;; eg on Debian systems with buggy packages;
1349 ;; so may as well try it. 1349 ;; so may as well try it.
1350 ;; https://lists.gnu.org/archive/html/emacs-devel/2012-03/msg00005.html 1350 ;; https://lists.gnu.org/r/emacs-devel/2012-03/msg00005.html
1351 (progn (setq file (expand-file-name "dir.gz" truename)) 1351 (progn (setq file (expand-file-name "dir.gz" truename))
1352 (file-attributes file))))) 1352 (file-attributes file)))))
1353 (setq dirs-done 1353 (setq dirs-done
diff --git a/lisp/international/quail.el b/lisp/international/quail.el
index f2c7bcb1f77..1bbbb174d49 100644
--- a/lisp/international/quail.el
+++ b/lisp/international/quail.el
@@ -2513,7 +2513,7 @@ package to describe."
2513 (setq buffer-read-only nil) 2513 (setq buffer-read-only nil)
2514 ;; Without this, a keyboard layout with R2L characters might be 2514 ;; Without this, a keyboard layout with R2L characters might be
2515 ;; displayed reversed, right to left. See the thread starting at 2515 ;; displayed reversed, right to left. See the thread starting at
2516 ;; https://lists.gnu.org/archive/html/emacs-devel/2012-03/msg00062.html 2516 ;; https://lists.gnu.org/r/emacs-devel/2012-03/msg00062.html
2517 ;; for a description of one such situation. 2517 ;; for a description of one such situation.
2518 (setq bidi-paragraph-direction 'left-to-right) 2518 (setq bidi-paragraph-direction 'left-to-right)
2519 (insert "Input method: " (quail-name) 2519 (insert "Input method: " (quail-name)
diff --git a/lisp/ls-lisp.el b/lisp/ls-lisp.el
index caddc7f760b..ad2a770430f 100644
--- a/lisp/ls-lisp.el
+++ b/lisp/ls-lisp.el
@@ -713,23 +713,26 @@ SWITCHES is a list of characters. Default sorting is alphabetic."
713(defun ls-lisp-classify-file (filename fattr) 713(defun ls-lisp-classify-file (filename fattr)
714 "Append a character to FILENAME indicating the file type. 714 "Append a character to FILENAME indicating the file type.
715 715
716This function puts the `dired-filename' property on FILENAME, but
717not on the character indicator it appends.
716FATTR is the file attributes returned by `file-attributes' for the file. 718FATTR is the file attributes returned by `file-attributes' for the file.
717The file type indicators are `/' for directories, `@' for symbolic 719The file type indicators are `/' for directories, `@' for symbolic
718links, `|' for FIFOs, `=' for sockets, `*' for regular files that 720links, `|' for FIFOs, `=' for sockets, `*' for regular files that
719are executable, and nothing for other types of files." 721are executable, and nothing for other types of files."
720 (let* ((type (car fattr)) 722 (let* ((type (car fattr))
721 (modestr (nth 8 fattr)) 723 (modestr (nth 8 fattr))
722 (typestr (substring modestr 0 1))) 724 (typestr (substring modestr 0 1))
725 (file-name (propertize filename 'dired-filename t)))
723 (cond 726 (cond
724 (type 727 (type
725 (concat filename (if (eq type t) "/" "@"))) 728 (concat file-name (if (eq type t) "/" "@")))
726 ((string-match "x" modestr) 729 ((string-match "x" modestr)
727 (concat filename "*")) 730 (concat file-name "*"))
728 ((string= "p" typestr) 731 ((string= "p" typestr)
729 (concat filename "|")) 732 (concat file-name "|"))
730 ((string= "s" typestr) 733 ((string= "s" typestr)
731 (concat filename "=")) 734 (concat file-name "="))
732 (t filename)))) 735 (t file-name))))
733 736
734(defun ls-lisp-classify (filedata) 737(defun ls-lisp-classify (filedata)
735 "Append a character to file name in FILEDATA indicating the file type. 738 "Append a character to file name in FILEDATA indicating the file type.
@@ -742,7 +745,6 @@ links, `|' for FIFOs, `=' for sockets, `*' for regular files that
742are executable, and nothing for other types of files." 745are executable, and nothing for other types of files."
743 (let ((file-name (car filedata)) 746 (let ((file-name (car filedata))
744 (fattr (cdr filedata))) 747 (fattr (cdr filedata)))
745 (setq file-name (propertize file-name 'dired-filename t))
746 (cons (ls-lisp-classify-file file-name fattr) fattr))) 748 (cons (ls-lisp-classify-file file-name fattr) fattr)))
747 749
748(defun ls-lisp-extension (filename) 750(defun ls-lisp-extension (filename)
@@ -841,7 +843,7 @@ SWITCHES and TIME-INDEX give the full switch list and time data."
841 " " 843 " "
842 (ls-lisp-format-time file-attr time-index) 844 (ls-lisp-format-time file-attr time-index)
843 " " 845 " "
844 (if (not (memq ?F switches)) ; ls-lisp-classify already did that 846 (if (not (memq ?F switches)) ; ls-lisp-classify-file already did that
845 (propertize file-name 'dired-filename t) 847 (propertize file-name 'dired-filename t)
846 file-name) 848 file-name)
847 (if (stringp file-type) ; is a symbolic link 849 (if (stringp file-type) ; is a symbolic link
diff --git a/lisp/mail/emacsbug.el b/lisp/mail/emacsbug.el
index dc25e8005ce..92f39659360 100644
--- a/lisp/mail/emacsbug.el
+++ b/lisp/mail/emacsbug.el
@@ -179,7 +179,7 @@ Prompts for bug subject. Leaves you in a mail buffer."
179 'face 'link 179 'face 'link
180 'help-echo (concat "mouse-2, RET: Follow this link") 180 'help-echo (concat "mouse-2, RET: Follow this link")
181 'action (lambda (button) 181 'action (lambda (button)
182 (browse-url "https://lists.gnu.org/archive/html/bug-gnu-emacs/")) 182 (browse-url "https://lists.gnu.org/r/bug-gnu-emacs/"))
183 'follow-link t) 183 'follow-link t)
184 (insert " mailing list\nand the GNU bug tracker at ") 184 (insert " mailing list\nand the GNU bug tracker at ")
185 (insert-text-button 185 (insert-text-button
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 1a24d87addd..994570edcb2 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -278,7 +278,7 @@ Otherwise, look for `movemail' in the directories in
278 ;; rmail-insert-inbox-text before r1.439 fell back to using 278 ;; rmail-insert-inbox-text before r1.439 fell back to using
279 ;; (expand-file-name "movemail" exec-directory) and just 279 ;; (expand-file-name "movemail" exec-directory) and just
280 ;; assuming it would work. 280 ;; assuming it would work.
281 ;; https://lists.gnu.org/archive/html/bug-gnu-emacs/2008-02/msg00087.html 281 ;; https://lists.gnu.org/r/bug-gnu-emacs/2008-02/msg00087.html
282 (let ((progname (expand-file-name 282 (let ((progname (expand-file-name
283 (concat "movemail" 283 (concat "movemail"
284 (if (memq system-type '(ms-dos windows-nt)) 284 (if (memq system-type '(ms-dos windows-nt))
@@ -534,7 +534,7 @@ still the current message in the Rmail buffer.")
534;; It's not clear what it should do now, since there is nothing that 534;; It's not clear what it should do now, since there is nothing that
535;; records when a message is shown for the first time (unseen is not 535;; records when a message is shown for the first time (unseen is not
536;; necessarily the same thing). 536;; necessarily the same thing).
537;; See https://lists.gnu.org/archive/html/emacs-devel/2009-03/msg00013.html 537;; See https://lists.gnu.org/r/emacs-devel/2009-03/msg00013.html
538(defcustom rmail-message-filter nil 538(defcustom rmail-message-filter nil
539 "If non-nil, a filter function for new messages in RMAIL. 539 "If non-nil, a filter function for new messages in RMAIL.
540Called with region narrowed to the message, including headers, 540Called with region narrowed to the message, including headers,
diff --git a/lisp/mail/supercite.el b/lisp/mail/supercite.el
index 0cb8a1791ff..4a424ece0b1 100644
--- a/lisp/mail/supercite.el
+++ b/lisp/mail/supercite.el
@@ -713,7 +713,7 @@ the list should be unique."
713 713
714;; regi functions 714;; regi functions
715 715
716;; https://lists.gnu.org/archive/html/emacs-devel/2009-02/msg00691.html 716;; https://lists.gnu.org/r/emacs-devel/2009-02/msg00691.html
717;; When rmail replies to a message with full headers visible, the "From " 717;; When rmail replies to a message with full headers visible, the "From "
718;; line can be included. 718;; line can be included.
719(defun sc-mail-check-from () 719(defun sc-mail-check-from ()
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index 972f84ee6c7..2b38cb5f2b0 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -669,7 +669,8 @@ The selected font will be the default on both the existing and future frames."
669 (let ((need-save nil)) 669 (let ((need-save nil))
670 ;; These are set with menu-bar-make-mm-toggle, which does not 670 ;; These are set with menu-bar-make-mm-toggle, which does not
671 ;; put on a customized-value property. 671 ;; put on a customized-value property.
672 (dolist (elt '(line-number-mode column-number-mode size-indication-mode 672 (dolist (elt '(global-display-line-numbers-mode display-line-numbers-type
673 line-number-mode column-number-mode size-indication-mode
673 cua-mode show-paren-mode transient-mark-mode 674 cua-mode show-paren-mode transient-mark-mode
674 blink-cursor-mode display-time-mode display-battery-mode 675 blink-cursor-mode display-time-mode display-battery-mode
675 ;; These are set by other functions that don't set 676 ;; These are set by other functions that don't set
diff --git a/lisp/net/rlogin.el b/lisp/net/rlogin.el
index 297aa0230c8..2843833a27a 100644
--- a/lisp/net/rlogin.el
+++ b/lisp/net/rlogin.el
@@ -38,7 +38,7 @@
38 38
39;; FIXME? 39;; FIXME?
40;; Maybe this file should be obsolete. 40;; Maybe this file should be obsolete.
41;; https://lists.gnu.org/archive/html/emacs-devel/2013-02/msg00517.html 41;; https://lists.gnu.org/r/emacs-devel/2013-02/msg00517.html
42;; It only adds rlogin-directory-tracking-mode. Is that useful? 42;; It only adds rlogin-directory-tracking-mode. Is that useful?
43 43
44(require 'comint) 44(require 'comint)
diff --git a/lisp/net/shr.el b/lisp/net/shr.el
index 4ba452e4b94..ab7240c8c3d 100644
--- a/lisp/net/shr.el
+++ b/lisp/net/shr.el
@@ -2289,8 +2289,10 @@ flags that control whether to collect or render objects."
2289 (<= (car (cdr attr)) width)) 2289 (<= (car (cdr attr)) width))
2290 (setq result (cdr attr))))))) 2290 (setq result (cdr attr)))))))
2291 result)) 2291 result))
2292 (let ((result (shr-render-td-1 dom width fill))) 2292 (let* ((pt (point))
2293 (result (shr-render-td-1 dom width fill)))
2293 (dom-set-attribute dom cache result) 2294 (dom-set-attribute dom cache result)
2295 (goto-char pt)
2294 result)))) 2296 result))))
2295 2297
2296(defun shr-render-td-1 (dom width fill) 2298(defun shr-render-td-1 (dom width fill)
diff --git a/lisp/net/tramp-gvfs.el b/lisp/net/tramp-gvfs.el
index 424e77b0eba..404af983b50 100644
--- a/lisp/net/tramp-gvfs.el
+++ b/lisp/net/tramp-gvfs.el
@@ -1056,11 +1056,11 @@ If FILE-SYSTEM is non-nil, return file system attributes."
1056(defun tramp-gvfs-handle-file-local-copy (filename) 1056(defun tramp-gvfs-handle-file-local-copy (filename)
1057 "Like `file-local-copy' for Tramp files." 1057 "Like `file-local-copy' for Tramp files."
1058 (with-parsed-tramp-file-name filename nil 1058 (with-parsed-tramp-file-name filename nil
1059 (unless (file-exists-p filename)
1060 (tramp-error
1061 v tramp-file-missing
1062 "Cannot make local copy of non-existing file `%s'" filename))
1059 (let ((tmpfile (tramp-compat-make-temp-file filename))) 1063 (let ((tmpfile (tramp-compat-make-temp-file filename)))
1060 (unless (file-exists-p filename)
1061 (tramp-error
1062 v tramp-file-missing
1063 "Cannot make local copy of non-existing file `%s'" filename))
1064 (copy-file filename tmpfile 'ok-if-already-exists 'keep-time) 1064 (copy-file filename tmpfile 'ok-if-already-exists 'keep-time)
1065 tmpfile))) 1065 tmpfile)))
1066 1066
diff --git a/lisp/obsolete/complete.el b/lisp/obsolete/complete.el
index 40123ccacaf..1f154a4d2e9 100644
--- a/lisp/obsolete/complete.el
+++ b/lisp/obsolete/complete.el
@@ -924,7 +924,7 @@ or properties are considered."
924 (or (boundp sym) (fboundp sym) 924 (or (boundp sym) (fboundp sym)
925 (symbol-plist sym)))))) 925 (symbol-plist sym))))))
926 (PC-not-minibuffer t)) 926 (PC-not-minibuffer t))
927 ;; https://lists.gnu.org/archive/html/emacs-devel/2007-03/msg01211.html 927 ;; https://lists.gnu.org/r/emacs-devel/2007-03/msg01211.html
928 ;; 928 ;;
929 ;; This deals with cases like running PC-l-c-s on "M-: (n-f". 929 ;; This deals with cases like running PC-l-c-s on "M-: (n-f".
930 ;; The first call to PC-l-c-s expands this to "(ne-f", and moves 930 ;; The first call to PC-l-c-s expands this to "(ne-f", and moves
diff --git a/lisp/org/ChangeLog.1 b/lisp/org/ChangeLog.1
index ee5f01479a8..b7cfd1e4aa1 100644
--- a/lisp/org/ChangeLog.1
+++ b/lisp/org/ChangeLog.1
@@ -11560,7 +11560,7 @@
11560 break after the last footnote definition. This is an an implicit 11560 break after the last footnote definition. This is an an implicit
11561 assumption made by the org-lparse.el library. With this change, 11561 assumption made by the org-lparse.el library. With this change,
11562 footnote definitions can reliably be exported with ODT backend. 11562 footnote definitions can reliably be exported with ODT backend.
11563 See https://lists.gnu.org/archive/html/emacs-orgmode/2012-02/msg01013.html. 11563 See https://lists.gnu.org/r/emacs-orgmode/2012-02/msg01013.html.
11564 11564
115652012-04-01 Eric Schulte <eric.schulte@gmx.com> 115652012-04-01 Eric Schulte <eric.schulte@gmx.com>
11566 11566
@@ -13952,7 +13952,7 @@
13952 13952
13953 * org.el (org-mode): Force left-to-right paragraphs in Org 13953 * org.el (org-mode): Force left-to-right paragraphs in Org
13954 buffers. For a related discussions, see 13954 buffers. For a related discussions, see
13955 https://lists.gnu.org/archive/html/emacs-devel/2011-09/msg00349.html. 13955 https://lists.gnu.org/r/emacs-devel/2011-09/msg00349.html.
13956 13956
139572012-01-03 Nicolas Goaziou <n.goaziou@gmail.com> 139572012-01-03 Nicolas Goaziou <n.goaziou@gmail.com>
13958 13958
@@ -14933,7 +14933,7 @@
14933 14933
14934 * org.el (org-mode): Force left-to-right paragraphs in Org 14934 * org.el (org-mode): Force left-to-right paragraphs in Org
14935 buffers. For a related discussions, see 14935 buffers. For a related discussions, see
14936 https://lists.gnu.org/archive/html/emacs-devel/2011-09/msg00349.html. 14936 https://lists.gnu.org/r/emacs-devel/2011-09/msg00349.html.
14937 14937
149382011-09-17 Juanma Barranquero <lekktu@gmail.com> 149382011-09-17 Juanma Barranquero <lekktu@gmail.com>
14939 14939
diff --git a/lisp/org/ox-odt.el b/lisp/org/ox-odt.el
index f00fd99fc3e..7355eaab6de 100644
--- a/lisp/org/ox-odt.el
+++ b/lisp/org/ox-odt.el
@@ -3890,7 +3890,7 @@ contextual information."
3890;; themselves and the list can be arbitrarily deep. 3890;; themselves and the list can be arbitrarily deep.
3891;; 3891;;
3892;; Inspired by following thread: 3892;; Inspired by following thread:
3893;; https://lists.gnu.org/archive/html/emacs-orgmode/2011-03/msg01101.html 3893;; https://lists.gnu.org/r/emacs-orgmode/2011-03/msg01101.html
3894 3894
3895;; Translate lists to tables 3895;; Translate lists to tables
3896 3896
diff --git a/lisp/pixel-scroll.el b/lisp/pixel-scroll.el
index 2213a0239db..9bfe5c91f57 100644
--- a/lisp/pixel-scroll.el
+++ b/lisp/pixel-scroll.el
@@ -261,7 +261,7 @@ unseen line above the first line, respectively, is provided."
261 ;; obtain height by (line-pixel-height). This is based on 261 ;; obtain height by (line-pixel-height). This is based on
262 ;; expected response from display engine. See following 262 ;; expected response from display engine. See following
263 ;; discussion. 263 ;; discussion.
264 ;; https://lists.gnu.org/archive/html/emacs-devel/2017-10/msg00621.html 264 ;; https://lists.gnu.org/r/emacs-devel/2017-10/msg00621.html
265 ((equal (count-lines (window-start) (point)) 1) 265 ((equal (count-lines (window-start) (point)) 1)
266 (line-pixel-height)) 266 (line-pixel-height))
267 ;; No char of line is shown and the line is not at the top, 267 ;; No char of line is shown and the line is not at the top,
diff --git a/lisp/plstore.el b/lisp/plstore.el
index b49e3d40fc4..da260096eaf 100644
--- a/lisp/plstore.el
+++ b/lisp/plstore.el
@@ -521,7 +521,7 @@ If no one is selected, symmetric encryption will be performed. "
521 t))) 521 t)))
522 522
523(defun plstore-mode-original () 523(defun plstore-mode-original ()
524 "Show the original form of the this buffer." 524 "Show the original form of this buffer."
525 (interactive) 525 (interactive)
526 (when plstore-encoded 526 (when plstore-encoded
527 (if (and (buffer-modified-p) 527 (if (and (buffer-modified-p)
@@ -533,7 +533,7 @@ If no one is selected, symmetric encryption will be performed. "
533 (setq plstore-encoded nil))) 533 (setq plstore-encoded nil)))
534 534
535(defun plstore-mode-decoded () 535(defun plstore-mode-decoded ()
536 "Show the decoded form of the this buffer." 536 "Show the decoded form of this buffer."
537 (interactive) 537 (interactive)
538 (unless plstore-encoded 538 (unless plstore-encoded
539 (if (and (buffer-modified-p) 539 (if (and (buffer-modified-p)
diff --git a/lisp/proced.el b/lisp/proced.el
index aec54b59211..b4bdbb05f0d 100644
--- a/lisp/proced.el
+++ b/lisp/proced.el
@@ -1804,7 +1804,7 @@ supported but discouraged. It will be removed in a future version of Emacs."
1804 1804
1805 (let (failures) 1805 (let (failures)
1806 ;; Why not always use `signal-process'? See 1806 ;; Why not always use `signal-process'? See
1807 ;; https://lists.gnu.org/archive/html/emacs-devel/2008-03/msg02955.html 1807 ;; https://lists.gnu.org/r/emacs-devel/2008-03/msg02955.html
1808 (if (functionp proced-signal-function) 1808 (if (functionp proced-signal-function)
1809 ;; use built-in `signal-process' 1809 ;; use built-in `signal-process'
1810 (let ((signal (if (stringp signal) 1810 (let ((signal (if (stringp signal)
diff --git a/lisp/progmodes/cc-cmds.el b/lisp/progmodes/cc-cmds.el
index 2b663135932..471560e19d4 100644
--- a/lisp/progmodes/cc-cmds.el
+++ b/lisp/progmodes/cc-cmds.el
@@ -1849,7 +1849,15 @@ with a brace block."
1849 ;; Pick out the defun name, according to the type of defun. 1849 ;; Pick out the defun name, according to the type of defun.
1850 (cond 1850 (cond
1851 ;; struct, union, enum, or similar: 1851 ;; struct, union, enum, or similar:
1852 ((looking-at c-type-prefix-key) 1852 ((save-excursion
1853 (and
1854 (looking-at c-type-prefix-key)
1855 (consp (c-forward-decl-or-cast-1 (c-point 'bosws) 'top nil))
1856 (or (not (or (eq (char-after) ?{)
1857 (and c-recognize-knr-p
1858 (c-in-knr-argdecl))))
1859 (progn (c-backward-syntactic-ws)
1860 (not (eq (char-before) ?\)))))))
1853 (let ((key-pos (point))) 1861 (let ((key-pos (point)))
1854 (c-forward-over-token-and-ws) ; over "struct ". 1862 (c-forward-over-token-and-ws) ; over "struct ".
1855 (cond 1863 (cond
@@ -1897,8 +1905,16 @@ with a brace block."
1897 1905
1898 (t 1906 (t
1899 ;; Normal function or initializer. 1907 ;; Normal function or initializer.
1900 (when (c-syntactic-re-search-forward "[{(]" nil t) 1908 (when
1901 (backward-char) 1909 (and
1910 (consp (c-forward-decl-or-cast-1 (c-point 'bosws) 'top nil))
1911 (or (eq (char-after) ?{)
1912 (and c-recognize-knr-p
1913 (c-in-knr-argdecl)))
1914 (progn
1915 (c-backward-syntactic-ws)
1916 (eq (char-before) ?\)))
1917 (c-go-list-backward))
1902 (c-backward-syntactic-ws) 1918 (c-backward-syntactic-ws)
1903 (when (eq (char-before) ?\=) ; struct foo bar = {0, 0} ; 1919 (when (eq (char-before) ?\=) ; struct foo bar = {0, 0} ;
1904 (c-backward-token-2) 1920 (c-backward-token-2)
diff --git a/lisp/progmodes/cc-menus.el b/lisp/progmodes/cc-menus.el
index 9339dcd83cc..7dae8297fd3 100644
--- a/lisp/progmodes/cc-menus.el
+++ b/lisp/progmodes/cc-menus.el
@@ -117,7 +117,7 @@ A sample value might look like: `\\(_P\\|_PROTO\\)'.")
117 ,(concat 117 ,(concat
118 "^\\<" ; line MUST start with word char 118 "^\\<" ; line MUST start with word char
119 ;; \n added to prevent overflow in regexp matcher. 119 ;; \n added to prevent overflow in regexp matcher.
120 ;; https://lists.gnu.org/archive/html/emacs-pretest-bug/2007-02/msg00021.html 120 ;; https://lists.gnu.org/r/emacs-pretest-bug/2007-02/msg00021.html
121 "[^()\n]*" ; no parentheses before 121 "[^()\n]*" ; no parentheses before
122 "[^" c-alnum "_:<>~]" ; match any non-identifier char 122 "[^" c-alnum "_:<>~]" ; match any non-identifier char
123 "\\([" c-alpha "_][" c-alnum "_:<>~]*\\)" ; match function name 123 "\\([" c-alpha "_][" c-alnum "_:<>~]*\\)" ; match function name
diff --git a/lisp/progmodes/cc-vars.el b/lisp/progmodes/cc-vars.el
index df202e9cd2f..c4213797636 100644
--- a/lisp/progmodes/cc-vars.el
+++ b/lisp/progmodes/cc-vars.el
@@ -1227,8 +1227,8 @@ As described below, each cons cell in this list has the form:
1227 1227
1228When a line is indented, CC Mode first determines the syntactic 1228When a line is indented, CC Mode first determines the syntactic
1229context of it by generating a list of symbols called syntactic 1229context of it by generating a list of symbols called syntactic
1230elements. The global variable `c-syntactic-context' is bound to the 1230elements. The global variable `c-syntactic-context' is bound to that
1231that list. Each element in the list is in turn a list where the first 1231list. Each element in the list is in turn a list where the first
1232element is a syntactic symbol which tells what kind of construct the 1232element is a syntactic symbol which tells what kind of construct the
1233indentation point is located within. More elements in the syntactic 1233indentation point is located within. More elements in the syntactic
1234element lists are optional. If there is one more and it isn't nil, 1234element lists are optional. If there is one more and it isn't nil,
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index 0794830fcb8..4cce47e5d8c 100644
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -1740,7 +1740,7 @@ Returns the compilation buffer created."
1740 (setq thisdir default-directory)) 1740 (setq thisdir default-directory))
1741 (set-buffer-modified-p nil)) 1741 (set-buffer-modified-p nil))
1742 ;; Pop up the compilation buffer. 1742 ;; Pop up the compilation buffer.
1743 ;; https://lists.gnu.org/archive/html/emacs-devel/2007-11/msg01638.html 1743 ;; https://lists.gnu.org/r/emacs-devel/2007-11/msg01638.html
1744 (setq outwin (display-buffer outbuf '(nil (allow-no-window . t)))) 1744 (setq outwin (display-buffer outbuf '(nil (allow-no-window . t))))
1745 (with-current-buffer outbuf 1745 (with-current-buffer outbuf
1746 (let ((process-environment 1746 (let ((process-environment
@@ -2855,7 +2855,7 @@ TRUE-DIRNAME is the `file-truename' of DIRNAME, if given."
2855 ;; The gethash used to not use spec-directory, but 2855 ;; The gethash used to not use spec-directory, but
2856 ;; this leads to errors when files in different 2856 ;; this leads to errors when files in different
2857 ;; directories have the same name: 2857 ;; directories have the same name:
2858 ;; https://lists.gnu.org/archive/html/emacs-devel/2007-08/msg00463.html 2858 ;; https://lists.gnu.org/r/emacs-devel/2007-08/msg00463.html
2859 (or (gethash (cons filename spec-directory) compilation-locs) 2859 (or (gethash (cons filename spec-directory) compilation-locs)
2860 (puthash (cons filename spec-directory) 2860 (puthash (cons filename spec-directory)
2861 (compilation--make-file-struct 2861 (compilation--make-file-struct
diff --git a/lisp/progmodes/flymake-proc.el b/lisp/progmodes/flymake-proc.el
index e28451d9417..e207de5da6c 100644
--- a/lisp/progmodes/flymake-proc.el
+++ b/lisp/progmodes/flymake-proc.el
@@ -768,7 +768,7 @@ can also be executed interactively independently of
768 ;; trying if the directory is read-only (bug#8954). 768 ;; trying if the directory is read-only (bug#8954).
769 (file-writable-p (file-name-directory buffer-file-name)) 769 (file-writable-p (file-name-directory buffer-file-name))
770 (flymake-proc--get-init-function buffer-file-name)))) 770 (flymake-proc--get-init-function buffer-file-name))))
771 (unless init-f (error "Can find a suitable init function")) 771 (unless init-f (error "Can't find a suitable init function"))
772 (flymake-proc--clear-buildfile-cache) 772 (flymake-proc--clear-buildfile-cache)
773 (flymake-proc--clear-project-include-dirs-cache) 773 (flymake-proc--clear-project-include-dirs-cache)
774 774
diff --git a/lisp/progmodes/octave.el b/lisp/progmodes/octave.el
index 103b6ce7c51..dc6bba44f32 100644
--- a/lisp/progmodes/octave.el
+++ b/lisp/progmodes/octave.el
@@ -1497,7 +1497,7 @@ current buffer file unless called with a prefix arg \\[universal-argument]."
1497 (string (buffer-substring-no-properties beg end)) 1497 (string (buffer-substring-no-properties beg end))
1498 line) 1498 line)
1499 (with-current-buffer inferior-octave-buffer 1499 (with-current-buffer inferior-octave-buffer
1500 ;; https://lists.gnu.org/archive/html/emacs-devel/2013-10/msg00095.html 1500 ;; https://lists.gnu.org/r/emacs-devel/2013-10/msg00095.html
1501 (compilation-forget-errors) 1501 (compilation-forget-errors)
1502 (setq inferior-octave-output-list nil) 1502 (setq inferior-octave-output-list nil)
1503 (while (not (string-equal string "")) 1503 (while (not (string-equal string ""))
diff --git a/lisp/progmodes/ruby-mode.el b/lisp/progmodes/ruby-mode.el
index da08bb0788e..dc1b0f8e2da 100644
--- a/lisp/progmodes/ruby-mode.el
+++ b/lisp/progmodes/ruby-mode.el
@@ -2254,24 +2254,38 @@ See `font-lock-syntax-table'.")
2254 (ruby-match-expression-expansion limit))))) 2254 (ruby-match-expression-expansion limit)))))
2255 2255
2256;;; Flymake support 2256;;; Flymake support
2257(defcustom ruby-flymake-command '("ruby" "-w" "-c")
2258 "External tool used to check Ruby source code.
2259This is a non empty list of strings, the checker tool possibly
2260followed by required arguments. Once launched it will receive
2261the Ruby source to be checked as its standard input."
2262 :group 'ruby
2263 :type '(repeat string))
2264
2265(defvar-local ruby--flymake-proc nil) 2257(defvar-local ruby--flymake-proc nil)
2266 2258
2267(defun ruby-flymake (report-fn &rest _args) 2259(defun ruby-flymake-simple (report-fn &rest _args)
2268 "Ruby backend for Flymake. Launches 2260 "`ruby -wc' backend for Flymake."
2269`ruby-flymake-command' (which see) and passes to its standard 2261 (unless (executable-find "ruby")
2270input the contents of the current buffer. The output of this 2262 (error "Cannot find the ruby executable"))
2271command is analyzed for error and warning messages." 2263
2272 (unless (executable-find (car ruby-flymake-command)) 2264 (ruby-flymake--helper
2273 (error "Cannot find a suitable checker")) 2265 "ruby-flymake"
2274 2266 '("ruby" "-w" "-c")
2267 (lambda (_proc source)
2268 (goto-char (point-min))
2269 (cl-loop
2270 while (search-forward-regexp
2271 "^\\(?:.*.rb\\|-\\):\\([0-9]+\\): \\(.*\\)$"
2272 nil t)
2273 for msg = (match-string 2)
2274 for (beg . end) = (flymake-diag-region
2275 source
2276 (string-to-number (match-string 1)))
2277 for type = (if (string-match "^warning" msg)
2278 :warning
2279 :error)
2280 collect (flymake-make-diagnostic source
2281 beg
2282 end
2283 type
2284 msg)
2285 into diags
2286 finally (funcall report-fn diags)))))
2287
2288(defun ruby-flymake--helper (process-name command parser-fn)
2275 (when (process-live-p ruby--flymake-proc) 2289 (when (process-live-p ruby--flymake-proc)
2276 (kill-process ruby--flymake-proc)) 2290 (kill-process ruby--flymake-proc))
2277 2291
@@ -2281,40 +2295,97 @@ command is analyzed for error and warning messages."
2281 (setq 2295 (setq
2282 ruby--flymake-proc 2296 ruby--flymake-proc
2283 (make-process 2297 (make-process
2284 :name "ruby-flymake" :noquery t :connection-type 'pipe 2298 :name process-name :noquery t :connection-type 'pipe
2285 :buffer (generate-new-buffer " *ruby-flymake*") 2299 :buffer (generate-new-buffer (format " *%s*" process-name))
2286 :command ruby-flymake-command 2300 :command command
2287 :sentinel 2301 :sentinel
2288 (lambda (proc _event) 2302 (lambda (proc _event)
2289 (when (eq 'exit (process-status proc)) 2303 (when (eq 'exit (process-status proc))
2290 (unwind-protect 2304 (unwind-protect
2291 (if (with-current-buffer source (eq proc ruby--flymake-proc)) 2305 (if (with-current-buffer source (eq proc ruby--flymake-proc))
2292 (with-current-buffer (process-buffer proc) 2306 (with-current-buffer (process-buffer proc)
2293 (goto-char (point-min)) 2307 (funcall parser-fn proc source))
2294 (cl-loop
2295 while (search-forward-regexp
2296 "^\\(?:.*.rb\\|-\\):\\([0-9]+\\): \\(.*\\)$"
2297 nil t)
2298 for msg = (match-string 2)
2299 for (beg . end) = (flymake-diag-region
2300 source
2301 (string-to-number (match-string 1)))
2302 for type = (if (string-match "^warning" msg)
2303 :warning
2304 :error)
2305 collect (flymake-make-diagnostic source
2306 beg
2307 end
2308 type
2309 msg)
2310 into diags
2311 finally (funcall report-fn diags)))
2312 (flymake-log :debug "Canceling obsolete check %s" 2308 (flymake-log :debug "Canceling obsolete check %s"
2313 proc)) 2309 proc))
2314 (kill-buffer (process-buffer proc))))))) 2310 (kill-buffer (process-buffer proc)))))))
2315 (process-send-region ruby--flymake-proc (point-min) (point-max)) 2311 (process-send-region ruby--flymake-proc (point-min) (point-max))
2316 (process-send-eof ruby--flymake-proc)))) 2312 (process-send-eof ruby--flymake-proc))))
2317 2313
2314(defcustom ruby-flymake-use-rubocop-if-available t
2315 "Non-nil to use the Rubocop Flymake backend.
2316Only takes effect if Rubocop is installed."
2317 :type 'boolean
2318 :group 'ruby
2319 :safe 'booleanp)
2320
2321(defcustom ruby-rubocop-config ".rubocop.yml"
2322 "Configuration file for `ruby-flymake-rubocop'."
2323 :type 'string
2324 :group 'ruby
2325 :safe 'stringp)
2326
2327(defun ruby-flymake-rubocop (report-fn &rest _args)
2328 "Rubocop backend for Flymake."
2329 (unless (executable-find "rubocop")
2330 (error "Cannot find the rubocop executable"))
2331
2332 (let ((command (list "rubocop" "--stdin" buffer-file-name "--format" "emacs"
2333 "--cache" "false" ; Work around a bug in old version.
2334 "--display-cop-names"))
2335 config-dir)
2336 (when buffer-file-name
2337 (setq config-dir (locate-dominating-file buffer-file-name
2338 ruby-rubocop-config))
2339 (when config-dir
2340 (setq command (append command (list "--config"
2341 (expand-file-name ruby-rubocop-config
2342 config-dir)))))
2343
2344 (ruby-flymake--helper
2345 "rubocop-flymake"
2346 command
2347 (lambda (proc source)
2348 ;; Finding the executable is no guarantee of
2349 ;; rubocop working, especially in the presence
2350 ;; of rbenv shims (which cross ruby versions).
2351 (when (eq (process-exit-status proc) 127)
2352 ;; Not sure what to do in this case. Maybe ideally we'd
2353 ;; switch back to ruby-flymake-simple.
2354 (flymake-log :warning "Rubocop returned status 127: %s"
2355 (buffer-string)))
2356 (goto-char (point-min))
2357 (cl-loop
2358 while (search-forward-regexp
2359 "^\\(?:.*.rb\\|-\\):\\([0-9]+\\):\\([0-9]+\\): \\(.*\\)$"
2360 nil t)
2361 for msg = (match-string 3)
2362 for (beg . end) = (flymake-diag-region
2363 source
2364 (string-to-number (match-string 1))
2365 (string-to-number (match-string 2)))
2366 for type = (cond
2367 ((string-match "^[EF]: " msg)
2368 :error)
2369 ((string-match "^W: " msg)
2370 :warning)
2371 (t :note))
2372 collect (flymake-make-diagnostic source
2373 beg
2374 end
2375 type
2376 (substring msg 3))
2377 into diags
2378 finally (funcall report-fn diags)))))))
2379
2380(defun ruby-flymake-auto (report-fn &rest args)
2381 (apply
2382 (if (and ruby-flymake-use-rubocop-if-available
2383 (executable-find "rubocop"))
2384 #'ruby-flymake-rubocop
2385 #'ruby-flymake-simple)
2386 report-fn
2387 args))
2388
2318;;;###autoload 2389;;;###autoload
2319(define-derived-mode ruby-mode prog-mode "Ruby" 2390(define-derived-mode ruby-mode prog-mode "Ruby"
2320 "Major mode for editing Ruby code." 2391 "Major mode for editing Ruby code."
@@ -2327,7 +2398,7 @@ command is analyzed for error and warning messages."
2327 2398
2328 (add-hook 'after-save-hook 'ruby-mode-set-encoding nil 'local) 2399 (add-hook 'after-save-hook 'ruby-mode-set-encoding nil 'local)
2329 (add-hook 'electric-indent-functions 'ruby--electric-indent-p nil 'local) 2400 (add-hook 'electric-indent-functions 'ruby--electric-indent-p nil 'local)
2330 (add-hook 'flymake-diagnostic-functions 'ruby-flymake nil 'local) 2401 (add-hook 'flymake-diagnostic-functions 'ruby-flymake-auto nil 'local)
2331 2402
2332 (setq-local font-lock-defaults '((ruby-font-lock-keywords) nil nil)) 2403 (setq-local font-lock-defaults '((ruby-font-lock-keywords) nil nil))
2333 (setq-local font-lock-keywords ruby-font-lock-keywords) 2404 (setq-local font-lock-keywords ruby-font-lock-keywords)
diff --git a/lisp/progmodes/verilog-mode.el b/lisp/progmodes/verilog-mode.el
index a6e3ae54559..e2bd89ec46c 100644
--- a/lisp/progmodes/verilog-mode.el
+++ b/lisp/progmodes/verilog-mode.el
@@ -284,7 +284,7 @@ STRING should be given if the last search was by `string-match' on STRING."
284;; This function is lifted directly from emacs's subr.el 284;; This function is lifted directly from emacs's subr.el
285;; so that it can be used by xemacs. 285;; so that it can be used by xemacs.
286;; The idea for this was borrowed from org-mode via this link: 286;; The idea for this was borrowed from org-mode via this link:
287;; https://lists.gnu.org/archive/html/emacs-orgmode/2009-12/msg00032.html 287;; https://lists.gnu.org/r/emacs-orgmode/2009-12/msg00032.html
288(eval-and-compile 288(eval-and-compile
289 (cond 289 (cond
290 ((fboundp 'looking-back) 290 ((fboundp 'looking-back)
diff --git a/lisp/simple.el b/lisp/simple.el
index 41f22b2396d..24ecf6929d9 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -406,9 +406,18 @@ Other major modes are defined by comparison with this one."
406(defvar self-insert-uses-region-functions nil 406(defvar self-insert-uses-region-functions nil
407 "Special hook to tell if `self-insert-command' will use the region. 407 "Special hook to tell if `self-insert-command' will use the region.
408It must be called via `run-hook-with-args-until-success' with no arguments. 408It must be called via `run-hook-with-args-until-success' with no arguments.
409Any `post-self-insert-command' which consumes the region should 409
410register a function on this hook so that things like `delete-selection-mode' 410If any function on this hook returns a non-nil value, `delete-selection-mode'
411can refrain from consuming the region.") 411will act on that value (see `delete-selection-helper'), and will
412usually delete the region. If all the functions on this hook return
413nil, it is an indiction that `self-insert-command' needs the region
414untouched by `delete-selection-mode', and will itself do whatever is
415appropriate with the region.
416Any function on `post-self-insert-hook' which act on the region should
417add a function to this hook so that `delete-selection-mode' could
418refrain from deleting the region before `post-self-insert-hook'
419functions are called.
420This hook is run by `delete-selection-uses-region-p', which see.")
412 421
413(defvar hard-newline (propertize "\n" 'hard t 'rear-nonsticky '(hard)) 422(defvar hard-newline (propertize "\n" 'hard t 'rear-nonsticky '(hard))
414 "Propertized string representing a hard newline character.") 423 "Propertized string representing a hard newline character.")
@@ -8816,7 +8825,7 @@ If it does not exist, create and it switch it to `messages-buffer-mode'."
8816;; rms says this should be done by specifying symbols that define 8825;; rms says this should be done by specifying symbols that define
8817;; versions together with bad values. This is therefore not as 8826;; versions together with bad values. This is therefore not as
8818;; flexible as it could be. See the thread: 8827;; flexible as it could be. See the thread:
8819;; https://lists.gnu.org/archive/html/emacs-devel/2007-08/msg00300.html 8828;; https://lists.gnu.org/r/emacs-devel/2007-08/msg00300.html
8820(defconst bad-packages-alist 8829(defconst bad-packages-alist
8821 ;; Not sure exactly which semantic versions have problems. 8830 ;; Not sure exactly which semantic versions have problems.
8822 ;; Definitely 2.0pre3, probably all 2.0pre's before this. 8831 ;; Definitely 2.0pre3, probably all 2.0pre's before this.
diff --git a/lisp/startup.el b/lisp/startup.el
index 4b538d130e7..a39c8f0fe76 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -513,7 +513,7 @@ It is the default value of the variable `top-level'."
513 (let ((default-directory dir)) 513 (let ((default-directory dir))
514 (load (expand-file-name "subdirs.el") t t t)) 514 (load (expand-file-name "subdirs.el") t t t))
515 ;; Do not scan standard directories that won't contain a leim-list.el. 515 ;; Do not scan standard directories that won't contain a leim-list.el.
516 ;; https://lists.gnu.org/archive/html/emacs-devel/2009-10/msg00502.html 516 ;; https://lists.gnu.org/r/emacs-devel/2009-10/msg00502.html
517 ;; (Except the preloaded one in lisp/leim.) 517 ;; (Except the preloaded one in lisp/leim.)
518 (or (string-prefix-p lispdir dir) 518 (or (string-prefix-p lispdir dir)
519 (let ((default-directory dir)) 519 (let ((default-directory dir))
@@ -1371,7 +1371,7 @@ the `--debug-init' option to view a complete error backtrace."
1371 ;; trying to load gnus could load the wrong file. 1371 ;; trying to load gnus could load the wrong file.
1372 ;; OK, it would not matter if .emacs.d were at the end of load-path. 1372 ;; OK, it would not matter if .emacs.d were at the end of load-path.
1373 ;; but for the sake of simplicity, we discourage it full-stop. 1373 ;; but for the sake of simplicity, we discourage it full-stop.
1374 ;; Ref eg https://lists.gnu.org/archive/html/emacs-devel/2012-03/msg00056.html 1374 ;; Ref eg https://lists.gnu.org/r/emacs-devel/2012-03/msg00056.html
1375 ;; 1375 ;;
1376 ;; A bad element could come from user-emacs-file, the command line, 1376 ;; A bad element could come from user-emacs-file, the command line,
1377 ;; or EMACSLOADPATH, so we basically always have to check. 1377 ;; or EMACSLOADPATH, so we basically always have to check.
diff --git a/lisp/subr.el b/lisp/subr.el
index 01acc336262..7ec727ef19c 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -577,7 +577,7 @@ one is kept."
577 (setq tail (cdr tail)))))) 577 (setq tail (cdr tail))))))
578 list) 578 list)
579 579
580;; See https://lists.gnu.org/archive/html/emacs-devel/2013-05/msg00204.html 580;; See https://lists.gnu.org/r/emacs-devel/2013-05/msg00204.html
581(defun delete-consecutive-dups (list &optional circular) 581(defun delete-consecutive-dups (list &optional circular)
582 "Destructively remove `equal' consecutive duplicates from LIST. 582 "Destructively remove `equal' consecutive duplicates from LIST.
583First and last elements are considered consecutive if CIRCULAR is 583First and last elements are considered consecutive if CIRCULAR is
@@ -2426,7 +2426,7 @@ in milliseconds; this was useful when Emacs was built without
2426floating point support." 2426floating point support."
2427 (declare (advertised-calling-convention (seconds &optional nodisp) "22.1")) 2427 (declare (advertised-calling-convention (seconds &optional nodisp) "22.1"))
2428 ;; This used to be implemented in C until the following discussion: 2428 ;; This used to be implemented in C until the following discussion:
2429 ;; https://lists.gnu.org/archive/html/emacs-devel/2006-07/msg00401.html 2429 ;; https://lists.gnu.org/r/emacs-devel/2006-07/msg00401.html
2430 ;; Then it was moved here using an implementation based on an idle timer, 2430 ;; Then it was moved here using an implementation based on an idle timer,
2431 ;; which was then replaced by the use of read-event. 2431 ;; which was then replaced by the use of read-event.
2432 (if (numberp nodisp) 2432 (if (numberp nodisp)
@@ -2465,7 +2465,7 @@ floating point support."
2465 (read-event nil t seconds)))) 2465 (read-event nil t seconds))))
2466 (or (null read) 2466 (or (null read)
2467 (progn 2467 (progn
2468 ;; https://lists.gnu.org/archive/html/emacs-devel/2006-10/msg00394.html 2468 ;; https://lists.gnu.org/r/emacs-devel/2006-10/msg00394.html
2469 ;; We want `read' appear in the next command's this-command-event 2469 ;; We want `read' appear in the next command's this-command-event
2470 ;; but not in the current one. 2470 ;; but not in the current one.
2471 ;; By pushing (cons t read), we indicate that `read' has not 2471 ;; By pushing (cons t read), we indicate that `read' has not
@@ -3098,7 +3098,7 @@ Do nothing if FACE is nil."
3098 (put-text-property start end 'face face))) 3098 (put-text-property start end 'face face)))
3099 3099
3100;; This removes `mouse-face' properties in *Help* buffer buttons: 3100;; This removes `mouse-face' properties in *Help* buffer buttons:
3101;; https://lists.gnu.org/archive/html/emacs-devel/2002-04/msg00648.html 3101;; https://lists.gnu.org/r/emacs-devel/2002-04/msg00648.html
3102(defun yank-handle-category-property (category start end) 3102(defun yank-handle-category-property (category start end)
3103 "Apply property category CATEGORY's properties between START and END." 3103 "Apply property category CATEGORY's properties between START and END."
3104 (when category 3104 (when category
@@ -4213,7 +4213,7 @@ Used from `delayed-warnings-hook' (which see)."
4213 (setq delayed-warnings-list (nreverse collapsed)))) 4213 (setq delayed-warnings-list (nreverse collapsed))))
4214 4214
4215;; At present this is only used for Emacs internals. 4215;; At present this is only used for Emacs internals.
4216;; Ref https://lists.gnu.org/archive/html/emacs-devel/2012-02/msg00085.html 4216;; Ref https://lists.gnu.org/r/emacs-devel/2012-02/msg00085.html
4217(defvar delayed-warnings-hook '(collapse-delayed-warnings 4217(defvar delayed-warnings-hook '(collapse-delayed-warnings
4218 display-delayed-warnings) 4218 display-delayed-warnings)
4219 "Normal hook run to process and display delayed warnings. 4219 "Normal hook run to process and display delayed warnings.
@@ -5223,7 +5223,7 @@ or \"gnus-article-toto-\".")
5223 5223
5224;; The following statement ought to be in print.c, but `provide' can't 5224;; The following statement ought to be in print.c, but `provide' can't
5225;; be used there. 5225;; be used there.
5226;; https://lists.gnu.org/archive/html/emacs-devel/2009-08/msg00236.html 5226;; https://lists.gnu.org/r/emacs-devel/2009-08/msg00236.html
5227(when (hash-table-p (car (read-from-string 5227(when (hash-table-p (car (read-from-string
5228 (prin1-to-string (make-hash-table))))) 5228 (prin1-to-string (make-hash-table)))))
5229 (provide 'hashtable-print-readable)) 5229 (provide 'hashtable-print-readable))
diff --git a/lisp/term/ns-win.el b/lisp/term/ns-win.el
index b8d1a436909..e895d09bb4f 100644
--- a/lisp/term/ns-win.el
+++ b/lisp/term/ns-win.el
@@ -594,7 +594,7 @@ the last file dropped is selected."
594(declare-function tool-bar-mode "tool-bar" (&optional arg)) 594(declare-function tool-bar-mode "tool-bar" (&optional arg))
595 595
596;; Based on a function by David Reitter <dreitter@inf.ed.ac.uk> ; 596;; Based on a function by David Reitter <dreitter@inf.ed.ac.uk> ;
597;; see https://lists.gnu.org/archive/html/emacs-devel/2005-09/msg00681.html . 597;; see https://lists.gnu.org/r/emacs-devel/2005-09/msg00681.html .
598(defun ns-toggle-toolbar (&optional frame) 598(defun ns-toggle-toolbar (&optional frame)
599 "Switches the tool bar on and off in frame FRAME. 599 "Switches the tool bar on and off in frame FRAME.
600 If FRAME is nil, the change applies to the selected frame." 600 If FRAME is nil, the change applies to the selected frame."
@@ -878,7 +878,7 @@ See the documentation of `create-fontset-from-fontset-spec' for the format.")
878 878
879 ;; Mac OS X Lion introduces PressAndHold, which is unsupported by this port. 879 ;; Mac OS X Lion introduces PressAndHold, which is unsupported by this port.
880 ;; See this thread for more details: 880 ;; See this thread for more details:
881 ;; https://lists.gnu.org/archive/html/emacs-devel/2011-06/msg00505.html 881 ;; https://lists.gnu.org/r/emacs-devel/2011-06/msg00505.html
882 (ns-set-resource nil "ApplePressAndHoldEnabled" "NO") 882 (ns-set-resource nil "ApplePressAndHoldEnabled" "NO")
883 883
884 (x-apply-session-resources) 884 (x-apply-session-resources)
diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el
index 62200bf2cbd..e7b1e08b038 100644
--- a/lisp/term/x-win.el
+++ b/lisp/term/x-win.el
@@ -1287,7 +1287,7 @@ This returns an error if any Emacs frames are X frames."
1287 1287
1288 ;; During initialization, we defer sending size hints to the window 1288 ;; During initialization, we defer sending size hints to the window
1289 ;; manager, because that can induce a race condition: 1289 ;; manager, because that can induce a race condition:
1290 ;; https://lists.gnu.org/archive/html/emacs-devel/2008-10/msg00033.html 1290 ;; https://lists.gnu.org/r/emacs-devel/2008-10/msg00033.html
1291 ;; Send the size hints once initialization is done. 1291 ;; Send the size hints once initialization is done.
1292 (add-hook 'after-init-hook 'x-wm-set-size-hint) 1292 (add-hook 'after-init-hook 'x-wm-set-size-hint)
1293 1293
diff --git a/lisp/textmodes/mhtml-mode.el b/lisp/textmodes/mhtml-mode.el
index 8df251276b5..09da155f487 100644
--- a/lisp/textmodes/mhtml-mode.el
+++ b/lisp/textmodes/mhtml-mode.el
@@ -198,6 +198,12 @@ smallest."
198 (get-text-property orig-end 'mhtml-submode)) 198 (get-text-property orig-end 'mhtml-submode))
199 (cl-decf font-lock-end))) 199 (cl-decf font-lock-end)))
200 200
201 ;; Also handle the multiline property -- but handle it here, and
202 ;; not via font-lock-extend-region-functions, to avoid the
203 ;; situation where the two extension functions disagree.
204 ;; See bug#29159.
205 (font-lock-extend-region-multiline)
206
201 (or (/= font-lock-beg orig-beg) 207 (or (/= font-lock-beg orig-beg)
202 (/= font-lock-end orig-end)))) 208 (/= font-lock-end orig-end))))
203 209
@@ -365,8 +371,7 @@ the rules from `css-mode'."
365 (setq-local font-lock-fontify-region-function 371 (setq-local font-lock-fontify-region-function
366 #'mhtml--submode-fontify-region) 372 #'mhtml--submode-fontify-region)
367 (setq-local font-lock-extend-region-functions 373 (setq-local font-lock-extend-region-functions
368 '(mhtml--extend-font-lock-region 374 '(mhtml--extend-font-lock-region))
369 font-lock-extend-region-multiline))
370 375
371 ;; Attach this to both pre- and post- hooks just in case it ever 376 ;; Attach this to both pre- and post- hooks just in case it ever
372 ;; changes a key binding that might be accessed from the menu bar. 377 ;; changes a key binding that might be accessed from the menu bar.
diff --git a/lisp/textmodes/nroff-mode.el b/lisp/textmodes/nroff-mode.el
index eb7068f3d03..82cb2d4dc05 100644
--- a/lisp/textmodes/nroff-mode.el
+++ b/lisp/textmodes/nroff-mode.el
@@ -195,7 +195,7 @@ Puts a full-stop before comments on a line by themselves."
195 9) 8)))))) ; add 9 to ensure at least two blanks 195 9) 8)))))) ; add 9 to ensure at least two blanks
196 (goto-char pt)))) 196 (goto-char pt))))
197 197
198;; https://lists.gnu.org/archive/html/emacs-devel/2007-10/msg01869.html 198;; https://lists.gnu.org/r/emacs-devel/2007-10/msg01869.html
199(defun nroff-insert-comment-function () 199(defun nroff-insert-comment-function ()
200 "Function for `comment-insert-comment-function' in `nroff-mode'." 200 "Function for `comment-insert-comment-function' in `nroff-mode'."
201 (indent-to (nroff-comment-indent)) 201 (indent-to (nroff-comment-indent))
diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el
index 10ee10243ad..5c585ea46ca 100644
--- a/lisp/textmodes/tex-mode.el
+++ b/lisp/textmodes/tex-mode.el
@@ -1792,7 +1792,7 @@ Mark is left at original location."
1792;; Note this does not handle things like mismatched brackets inside 1792;; Note this does not handle things like mismatched brackets inside
1793;; begin/end blocks. 1793;; begin/end blocks.
1794;; Needs to handle escaped parens for tex-validate-*. 1794;; Needs to handle escaped parens for tex-validate-*.
1795;; https://lists.gnu.org/archive/html/bug-gnu-emacs/2007-09/msg00038.html 1795;; https://lists.gnu.org/r/bug-gnu-emacs/2007-09/msg00038.html
1796;; Does not handle escaped parens when latex-handle-escaped-parens is nil. 1796;; Does not handle escaped parens when latex-handle-escaped-parens is nil.
1797(defun latex-forward-sexp-1 () 1797(defun latex-forward-sexp-1 ()
1798 "Like (forward-sexp 1) but aware of multi-char elements and escaped parens." 1798 "Like (forward-sexp 1) but aware of multi-char elements and escaped parens."
diff --git a/lisp/vc/diff-mode.el b/lisp/vc/diff-mode.el
index 9d56ed256a2..df9627abdf0 100644
--- a/lisp/vc/diff-mode.el
+++ b/lisp/vc/diff-mode.el
@@ -432,7 +432,7 @@ and the face `diff-added' for added lines.")
432 "If non-nil, empty lines are valid in unified diffs. 432 "If non-nil, empty lines are valid in unified diffs.
433Some versions of diff replace all-blank context lines in unified format with 433Some versions of diff replace all-blank context lines in unified format with
434empty lines. This makes the format less robust, but is tolerated. 434empty lines. This makes the format less robust, but is tolerated.
435See https://lists.gnu.org/archive/html/emacs-devel/2007-11/msg01990.html") 435See https://lists.gnu.org/r/emacs-devel/2007-11/msg01990.html")
436 436
437(defconst diff-hunk-header-re 437(defconst diff-hunk-header-re
438 (concat "^\\(?:" diff-hunk-header-re-unified ".*\\|\\*\\{15\\}.*\n\\*\\*\\* .+ \\*\\*\\*\\*\\|[0-9]+\\(,[0-9]+\\)?[acd][0-9]+\\(,[0-9]+\\)?\\)$")) 438 (concat "^\\(?:" diff-hunk-header-re-unified ".*\\|\\*\\{15\\}.*\n\\*\\*\\* .+ \\*\\*\\*\\*\\|[0-9]+\\(,[0-9]+\\)?[acd][0-9]+\\(,[0-9]+\\)?\\)$"))
diff --git a/lisp/vc/smerge-mode.el b/lisp/vc/smerge-mode.el
index 34fea232feb..b988463de1e 100644
--- a/lisp/vc/smerge-mode.el
+++ b/lisp/vc/smerge-mode.el
@@ -1094,7 +1094,7 @@ used to replace chars to try and eliminate some spurious differences."
1094 ;; also and more importantly because otherwise it 1094 ;; also and more importantly because otherwise it
1095 ;; may happen that diff doesn't behave like 1095 ;; may happen that diff doesn't behave like
1096 ;; smerge-refine-weight-hack expects it to. 1096 ;; smerge-refine-weight-hack expects it to.
1097 ;; See https://lists.gnu.org/archive/html/emacs-devel/2007-11/msg00401.html 1097 ;; See https://lists.gnu.org/r/emacs-devel/2007-11/msg00401.html
1098 "-awd" "-ad") 1098 "-awd" "-ad")
1099 file1 file2)) 1099 file1 file2))
1100 ;; Process diff's output. 1100 ;; Process diff's output.
diff --git a/lisp/vc/vc-git.el b/lisp/vc/vc-git.el
index dff0fd1365c..2c807a38cd5 100644
--- a/lisp/vc/vc-git.el
+++ b/lisp/vc/vc-git.el
@@ -979,7 +979,7 @@ This prompts for a branch to merge from."
979 ;; FIXME 979 ;; FIXME
980 ;; 1) the net result is to call git twice per file. 980 ;; 1) the net result is to call git twice per file.
981 ;; 2) v-g-c-f is documented to take a directory. 981 ;; 2) v-g-c-f is documented to take a directory.
982 ;; https://lists.gnu.org/archive/html/emacs-devel/2014-01/msg01126.html 982 ;; https://lists.gnu.org/r/emacs-devel/2014-01/msg01126.html
983 (vc-git-conflicted-files buffer-file-name) 983 (vc-git-conflicted-files buffer-file-name)
984 (save-excursion 984 (save-excursion
985 (goto-char (point-min)) 985 (goto-char (point-min))
diff --git a/lisp/vc/vc-rcs.el b/lisp/vc/vc-rcs.el
index 84ab10b14fe..4634e76088f 100644
--- a/lisp/vc/vc-rcs.el
+++ b/lisp/vc/vc-rcs.el
@@ -851,7 +851,7 @@ and CVS."
851 851
852;; You might think that this should be distributed with RCS, but 852;; You might think that this should be distributed with RCS, but
853;; apparently not. CVS sometimes provides a version of it. 853;; apparently not. CVS sometimes provides a version of it.
854;; https://lists.gnu.org/archive/html/emacs-devel/2014-05/msg00288.html 854;; https://lists.gnu.org/r/emacs-devel/2014-05/msg00288.html
855(defvar vc-rcs-rcs2log-program 855(defvar vc-rcs-rcs2log-program
856 (let (exe) 856 (let (exe)
857 (cond ((file-executable-p 857 (cond ((file-executable-p
diff --git a/lisp/view.el b/lisp/view.el
index 8e40cffce2e..6a4705acd6f 100644
--- a/lisp/view.el
+++ b/lisp/view.el
@@ -982,7 +982,7 @@ for highlighting the match that is found."
982;; This is the dumb approach, looking at each line. The original 982;; This is the dumb approach, looking at each line. The original
983;; version of this function looked like it might have been trying to 983;; version of this function looked like it might have been trying to
984;; do something clever, but not succeeding: 984;; do something clever, but not succeeding:
985;; https://lists.gnu.org/archive/html/bug-gnu-emacs/2007-09/msg00073.html 985;; https://lists.gnu.org/r/bug-gnu-emacs/2007-09/msg00073.html
986(defun view-search-no-match-lines (times regexp) 986(defun view-search-no-match-lines (times regexp)
987 "Search for the TIMESth occurrence of a line with no match for REGEXP. 987 "Search for the TIMESth occurrence of a line with no match for REGEXP.
988If such a line is found, return non-nil and set the match-data to that line. 988If such a line is found, return non-nil and set the match-data to that line.
diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index dca06ca3595..4fa36edb9c6 100644
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -832,7 +832,7 @@ button end points."
832 832
833;; This alias exists only so that one can choose in doc-strings (e.g. 833;; This alias exists only so that one can choose in doc-strings (e.g.
834;; Custom-mode) which key-binding of widget-keymap one wants to refer to. 834;; Custom-mode) which key-binding of widget-keymap one wants to refer to.
835;; https://lists.gnu.org/archive/html/emacs-devel/2008-11/msg00480.html 835;; https://lists.gnu.org/r/emacs-devel/2008-11/msg00480.html
836(define-obsolete-function-alias 'advertised-widget-backward 836(define-obsolete-function-alias 'advertised-widget-backward
837 'widget-backward "23.2") 837 'widget-backward "23.2")
838 838
diff --git a/lisp/windmove.el b/lisp/windmove.el
index b573000fd7b..f8de303fffb 100644
--- a/lisp/windmove.el
+++ b/lisp/windmove.el
@@ -425,7 +425,7 @@ supplied, if ARG is greater or smaller than zero, respectively."
425 top-left 425 top-left
426 ;; Don't care whether window is horizontally scrolled - 426 ;; Don't care whether window is horizontally scrolled -
427 ;; `posn-at-point' handles that already. See also: 427 ;; `posn-at-point' handles that already. See also:
428 ;; https://lists.gnu.org/archive/html/emacs-devel/2012-01/msg00638.html 428 ;; https://lists.gnu.org/r/emacs-devel/2012-01/msg00638.html
429 (posn-col-row 429 (posn-col-row
430 (posn-at-point (window-point window) window)))))))) 430 (posn-at-point (window-point window) window))))))))
431 431
diff --git a/lisp/window.el b/lisp/window.el
index 8939e7d589b..b7736d85cd1 100644
--- a/lisp/window.el
+++ b/lisp/window.el
@@ -7655,10 +7655,11 @@ another window. In interactive use, if the selected window is
7655strongly dedicated to its buffer, the value of the option 7655strongly dedicated to its buffer, the value of the option
7656`switch-to-buffer-in-dedicated-window' specifies how to proceed. 7656`switch-to-buffer-in-dedicated-window' specifies how to proceed.
7657 7657
7658If called interactively, read the buffer name using the 7658If called interactively, read the buffer name using `read-buffer'.
7659minibuffer. The variable `confirm-nonexistent-file-or-buffer' 7659The variable `confirm-nonexistent-file-or-buffer' determines
7660determines whether to request confirmation before creating a new 7660whether to request confirmation before creating a new buffer.
7661buffer. 7661See `read-buffer' for features related to input and completion
7662of buffer names.
7662 7663
7663BUFFER-OR-NAME may be a buffer, a string (a buffer name), or nil. 7664BUFFER-OR-NAME may be a buffer, a string (a buffer name), or nil.
7664If BUFFER-OR-NAME is a string that does not identify an existing 7665If BUFFER-OR-NAME is a string that does not identify an existing
@@ -7735,10 +7736,11 @@ Return the buffer switched to."
7735BUFFER-OR-NAME may be a buffer, a string (a buffer name), or 7736BUFFER-OR-NAME may be a buffer, a string (a buffer name), or
7736nil. Return the buffer switched to. 7737nil. Return the buffer switched to.
7737 7738
7738If called interactively, prompt for the buffer name using the 7739If called interactively, read the buffer name using `read-buffer'.
7739minibuffer. The variable `confirm-nonexistent-file-or-buffer' 7740The variable `confirm-nonexistent-file-or-buffer' determines
7740determines whether to request confirmation before creating a new 7741whether to request confirmation before creating a new buffer.
7741buffer. 7742See `read-buffer' for features related to input and completion
7743of buffer names.
7742 7744
7743If BUFFER-OR-NAME is a string and does not identify an existing 7745If BUFFER-OR-NAME is a string and does not identify an existing
7744buffer, create a new buffer with that name. If BUFFER-OR-NAME is 7746buffer, create a new buffer with that name. If BUFFER-OR-NAME is
@@ -7759,10 +7761,11 @@ documentation for additional customization information."
7759BUFFER-OR-NAME may be a buffer, a string (a buffer name), or 7761BUFFER-OR-NAME may be a buffer, a string (a buffer name), or
7760nil. Return the buffer switched to. 7762nil. Return the buffer switched to.
7761 7763
7762If called interactively, prompt for the buffer name using the 7764If called interactively, read the buffer name using `read-buffer'.
7763minibuffer. The variable `confirm-nonexistent-file-or-buffer' 7765The variable `confirm-nonexistent-file-or-buffer' determines
7764determines whether to request confirmation before creating a new 7766whether to request confirmation before creating a new buffer.
7765buffer. 7767See `read-buffer' for features related to input and completion
7768of buffer names.
7766 7769
7767If BUFFER-OR-NAME is a string and does not identify an existing 7770If BUFFER-OR-NAME is a string and does not identify an existing
7768buffer, create a new buffer with that name. If BUFFER-OR-NAME is 7771buffer, create a new buffer with that name. If BUFFER-OR-NAME is