aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorGlenn Morris2018-07-13 09:28:15 -0700
committerGlenn Morris2018-07-13 09:28:15 -0700
commitcda7e1850f2f19a5025fd163ff2c6c6cba275acf (patch)
tree1fdb0014a632e936da813128ead6353051436cbd /lisp
parent1013e0392b78ee0e2199fb51859dc9e939315f9b (diff)
parent17ebb6e5ae9cdd2586d1b4d6f2347ae09c6f653f (diff)
downloademacs-cda7e1850f2f19a5025fd163ff2c6c6cba275acf.tar.gz
emacs-cda7e1850f2f19a5025fd163ff2c6c6cba275acf.zip
Merge from origin/emacs-26
17ebb6e (origin/emacs-26) Use consistent function names in thread-tes... 1c86229 Fix format error in Faccept_process_output b38b91a Lessen stack consumption in recursive read1 3eb4603 Match w32 paths in grep sans --null hits (Bug#32051) 5cc7c4b Fix previous make-network-process change d6a1b69 Another documentation improvement in flyspell.el 9b49a8e Improve documentation of Flyspell 3744fda Provide feature 'threads ef9025f Save the server alias on reconnect (Bug#29657) db3874b Refer to "proper lists" instead of "true lists" 35e0305 Avoid turning on the global-minor-mode recursively 51bf4e4 Fix Bug#32085
Diffstat (limited to 'lisp')
-rw-r--r--lisp/emacs-lisp/easy-mmode.el28
-rw-r--r--lisp/net/rcirc.el2
-rw-r--r--lisp/progmodes/grep.el4
-rw-r--r--lisp/textmodes/flyspell.el7
4 files changed, 24 insertions, 17 deletions
diff --git a/lisp/emacs-lisp/easy-mmode.el b/lisp/emacs-lisp/easy-mmode.el
index b83b53a8e52..4d8a5020267 100644
--- a/lisp/emacs-lisp/easy-mmode.el
+++ b/lisp/emacs-lisp/easy-mmode.el
@@ -474,22 +474,26 @@ See `%s' for more information on %s."
474 474
475 ;; The function that calls TURN-ON in each buffer. 475 ;; The function that calls TURN-ON in each buffer.
476 (defun ,MODE-enable-in-buffers () 476 (defun ,MODE-enable-in-buffers ()
477 (dolist (buf ,MODE-buffers) 477 (let ((buffers ,MODE-buffers))
478 (when (buffer-live-p buf) 478 ;; Clear MODE-buffers to avoid scanning the same list of
479 (with-current-buffer buf 479 ;; buffers in recursive calls to MODE-enable-in-buffers.
480 (unless ,MODE-set-explicitly 480 ;; Otherwise it could lead to infinite recursion.
481 (unless (eq ,MODE-major-mode major-mode) 481 (setq ,MODE-buffers nil)
482 (if ,mode 482 (dolist (buf buffers)
483 (progn 483 (when (buffer-live-p buf)
484 (,mode -1) 484 (with-current-buffer buf
485 (funcall #',turn-on)) 485 (unless ,MODE-set-explicitly
486 (funcall #',turn-on)))) 486 (unless (eq ,MODE-major-mode major-mode)
487 (setq ,MODE-major-mode major-mode))))) 487 (if ,mode
488 (progn
489 (,mode -1)
490 (funcall #',turn-on))
491 (funcall #',turn-on))))
492 (setq ,MODE-major-mode major-mode))))))
488 (put ',MODE-enable-in-buffers 'definition-name ',global-mode) 493 (put ',MODE-enable-in-buffers 'definition-name ',global-mode)
489 494
490 (defun ,MODE-check-buffers () 495 (defun ,MODE-check-buffers ()
491 (,MODE-enable-in-buffers) 496 (,MODE-enable-in-buffers)
492 (setq ,MODE-buffers nil)
493 (remove-hook 'post-command-hook ',MODE-check-buffers)) 497 (remove-hook 'post-command-hook ',MODE-check-buffers))
494 (put ',MODE-check-buffers 'definition-name ',global-mode) 498 (put ',MODE-check-buffers 'definition-name ',global-mode)
495 499
diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el
index 5b63e0c34df..108e368373f 100644
--- a/lisp/net/rcirc.el
+++ b/lisp/net/rcirc.el
@@ -583,7 +583,7 @@ If ARG is non-nil, instead prompt for connection parameters."
583 583
584 (setq-local rcirc-connection-info 584 (setq-local rcirc-connection-info
585 (list server port nick user-name full-name startup-channels 585 (list server port nick user-name full-name startup-channels
586 password encryption)) 586 password encryption server-alias))
587 (setq-local rcirc-process process) 587 (setq-local rcirc-process process)
588 (setq-local rcirc-server server) 588 (setq-local rcirc-server server)
589 (setq-local rcirc-server-name 589 (setq-local rcirc-server-name
diff --git a/lisp/progmodes/grep.el b/lisp/progmodes/grep.el
index 519b768ab40..0ededb1b155 100644
--- a/lisp/progmodes/grep.el
+++ b/lisp/progmodes/grep.el
@@ -374,7 +374,9 @@ Notice that using \\[next-error] or \\[compile-goto-error] modifies
374 ;; to handle weird file names (with colons in them) as 374 ;; to handle weird file names (with colons in them) as
375 ;; well as possible. E.g., use [1-9][0-9]* rather than 375 ;; well as possible. E.g., use [1-9][0-9]* rather than
376 ;; [0-9]+ so as to accept ":034:" in file names. 376 ;; [0-9]+ so as to accept ":034:" in file names.
377 "\\(?1:[^\n:]+?[^\n/:]\\):[\t ]*\\(?2:[1-9][0-9]*\\)[\t ]*:" 377 "\\(?1:"
378 "\\(?:[a-zA-Z]:\\)?" ; Allow "C:..." for w32.
379 "[^\n:]+?[^\n/:]\\):[\t ]*\\(?2:[1-9][0-9]*\\)[\t ]*:"
378 "\\)") 380 "\\)")
379 1 2 381 1 2
380 ;; Calculate column positions (col . end-col) of first grep match on a line 382 ;; Calculate column positions (col . end-col) of first grep match on a line
diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el
index 8ad6832880a..4d5b11cca89 100644
--- a/lisp/textmodes/flyspell.el
+++ b/lisp/textmodes/flyspell.el
@@ -31,10 +31,10 @@
31;; 31;;
32;; To enable Flyspell in text representing computer programs, type 32;; To enable Flyspell in text representing computer programs, type
33;; M-x flyspell-prog-mode. 33;; M-x flyspell-prog-mode.
34;; In that mode only text inside comments is checked. 34;; In that mode only text inside comments and strings is checked.
35;; 35;;
36;; Some user variables control the behavior of flyspell. They are 36;; Some user variables control the behavior of flyspell. They are
37;; those defined under the `User variables' comment. 37;; those defined under the `User configuration' comment.
38 38
39;;; Code: 39;;; Code:
40 40
@@ -137,7 +137,8 @@ This variable specifies how far to search to find such a duplicate.
137(defcustom flyspell-persistent-highlight t 137(defcustom flyspell-persistent-highlight t
138 "Non-nil means misspelled words remain highlighted until corrected. 138 "Non-nil means misspelled words remain highlighted until corrected.
139If this variable is nil, only the most recently detected misspelled word 139If this variable is nil, only the most recently detected misspelled word
140is highlighted." 140is highlighted, and the highlight is turned off as soon as point moves
141off the misspelled word."
141 :group 'flyspell 142 :group 'flyspell
142 :type 'boolean) 143 :type 'boolean)
143 144