From f1093f7a7ccc8e56a7cbb932d1df53cc844f92b5 Mon Sep 17 00:00:00 2001 From: Jens Lechtenboerger Date: Mon, 4 Jan 2016 01:56:11 +0100 Subject: [PATCH 1/7] Do secure signed Bcc handling * lisp/gnus/message.el (message-send): Do secure signed Bcc handling (bug#18718). --- lisp/gnus/message.el | 3 +++ 1 file changed, 3 insertions(+) diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el index 7be2ff900d4..51dcc1a909f 100644 --- a/lisp/gnus/message.el +++ b/lisp/gnus/message.el @@ -4227,6 +4227,8 @@ Instead, just auto-save the buffer and then bury it." (if message-return-action (apply (car message-return-action) (cdr message-return-action)))) +(autoload 'mml-secure-bcc-is-safe "mml-sec") + (defun message-send (&optional arg) "Send the message in the current buffer. If `message-interactive' is non-nil, wait for success indication or @@ -4241,6 +4243,7 @@ It should typically alter the sending method in some way or other." (let ((inhibit-read-only t)) (put-text-property (point-min) (point-max) 'read-only nil)) (message-fix-before-sending) + (mml-secure-bcc-is-safe) (run-hooks 'message-send-hook) (when message-confirm-send (or (y-or-n-p "Send message? ") From 4bc5e0222ba7407378b8623b95903176ae14b2e5 Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Sun, 3 Jan 2016 23:51:44 -0800 Subject: [PATCH 2/7] Spelling fix --- lisp/progmodes/xref.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/progmodes/xref.el b/lisp/progmodes/xref.el index 26471b0df3f..ae5ec61520d 100644 --- a/lisp/progmodes/xref.el +++ b/lisp/progmodes/xref.el @@ -21,7 +21,7 @@ ;; NOTE: The xref API is still experimental and can change in major, ;; backward-incompatible ways. Everyone is encouraged to try it, and -;; report to us any problems or use cases we hadn't anticiated, by +;; report to us any problems or use cases we hadn't anticipated, by ;; sending an email to emacs-devel, or `M-x report-emacs-bug'. ;; ;; This file provides a somewhat generic infrastructure for cross From 0000ae508258b25a56aa9525646d316ec684b5a6 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Mon, 4 Jan 2016 18:25:21 +0200 Subject: [PATCH 3/7] MS-Windows followup to latest gnulib update * nt/gnulib.mk (EXTRA_DIST): Add ignore-value.h. --- nt/gnulib.mk | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/nt/gnulib.mk b/nt/gnulib.mk index 7c9cc199468..6884bf9f077 100644 --- a/nt/gnulib.mk +++ b/nt/gnulib.mk @@ -453,6 +453,13 @@ EXTRA_libgnu_a_SOURCES += group-member.c ## end gnulib module group-member +## begin gnulib module ignore-value + + +EXTRA_DIST += ignore-value.h + +## end gnulib module ignore-value + ## begin gnulib module intprops From 0d9e80d79dccf3f0811c630d91be0d170d56ee0c Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Mon, 4 Jan 2016 18:58:20 +0200 Subject: [PATCH 4/7] Fix a doc string of 'transient-mark-mode' * src/buffer.c (syms_of_buffer) : Prevent "lambda" in doc string from becoming a link to lambda expressions. --- src/buffer.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/buffer.c b/src/buffer.c index c07b2dc021e..51c36de0c6b 100644 --- a/src/buffer.c +++ b/src/buffer.c @@ -6201,7 +6201,7 @@ all windows or just the selected window. Lisp programs may give this variable certain special values: -- A value of `lambda' enables Transient Mark mode temporarily. +- A value of \\='lambda (literally) enables Transient Mark mode temporarily. It is disabled again after any subsequent action that would normally deactivate the mark (e.g. buffer modification). From 50575b1bdd7fcb4d1bf525fb5ca635fe7ab7d8c6 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Mon, 4 Jan 2016 19:08:37 +0200 Subject: [PATCH 5/7] Ensure redisplay when 'truncate-lines' is set * lisp/frame.el (redisplay--variables): Add 'truncate-lines'. (Bug#22303) --- lisp/frame.el | 1 + 1 file changed, 1 insertion(+) diff --git a/lisp/frame.el b/lisp/frame.el index 04dd4abdf03..09738d1e2ed 100644 --- a/lisp/frame.el +++ b/lisp/frame.el @@ -2239,6 +2239,7 @@ See also `toggle-frame-maximized'." overline-margin line-prefix wrap-prefix + truncate-lines bidi-paragraph-direction bidi-display-reordering)) From 6300655ec9286f3a259ee60536819a0056be4810 Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Mon, 4 Jan 2016 19:25:39 +0100 Subject: [PATCH 6/7] Minor fixes in tramp-tests.el * test/automated/tramp-tests.el (tramp-test26-process-file): Move point properly. (tramp-test29-vc-registered): Work with relative file names. --- test/automated/tramp-tests.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/test/automated/tramp-tests.el b/test/automated/tramp-tests.el index 5938ada8486..f0725847699 100644 --- a/test/automated/tramp-tests.el +++ b/test/automated/tramp-tests.el @@ -1424,6 +1424,7 @@ This tests also `make-symbolic-link', `file-truename' and `add-name-to-file'." (should-not (get-buffer-window (current-buffer) t)) ;; Second run. The output must be appended. + (goto-char (point-max)) (should (zerop (process-file "ls" nil t t fnnd))) ;; `ls' could produce colorized output. (goto-char (point-min)) @@ -1652,8 +1653,8 @@ This tests also `make-symbolic-link', `file-truename' and `add-name-to-file'." (error (vc-register nil (list (car vc-handled-backends) - (list (file-name-nondirectory tmp-name2))))))) - (should (vc-registered tmp-name2))) + (list (file-name-nondirectory tmp-name2)))))) + (should (vc-registered (file-name-nondirectory tmp-name2))))) ;; Cleanup. (ignore-errors (delete-directory tmp-name1 'recursive))))) From 9fb185aff7b1f36c30bd157ec446d9bad104d1ee Mon Sep 17 00:00:00 2001 From: Lars Magne Ingebrigtsen Date: Mon, 4 Jan 2016 23:03:16 +0100 Subject: [PATCH 7/7] shr-tag-video bug fix * shr.el (shr-tag-video): Protect against the `poster' being empty. --- lisp/net/shr.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/net/shr.el b/lisp/net/shr.el index 979b0caeea5..0703171a436 100644 --- a/lisp/net/shr.el +++ b/lisp/net/shr.el @@ -1361,7 +1361,7 @@ The preference is a float determined from `shr-prefer-media-type'." (start (point))) (unless url (setq url (car (shr--extract-best-source dom)))) - (if image + (if (> (length image) 0) (shr-tag-img nil image) (shr-insert " [video] ")) (shr-urlify start (shr-expand-url url))))