From 84ea61a838a4be33206c5b2e542d52355d79e187 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Mon, 26 Feb 2018 13:51:01 -0500 Subject: [PATCH] Remove compiler warnings due to #' * lisp/gnus/mm-decode.el (mm-convert-shr-links): * lisp/ps-print.el (ps-print-region-function): Remove compiler warnings due to #'. --- lisp/gnus/mm-decode.el | 2 +- lisp/ps-print.el | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/gnus/mm-decode.el b/lisp/gnus/mm-decode.el index 87941b88450..e1a0435b55a 100644 --- a/lisp/gnus/mm-decode.el +++ b/lisp/gnus/mm-decode.el @@ -1865,7 +1865,7 @@ text/html;\\s-*charset=\\([^\t\n\r \"'>]+\\)[^>]*>" nil t) ;; Mask keys that launch `widget-button-click'. ;; Those bindings are provided by `widget-keymap' ;; that is a parent of `gnus-article-mode-map'. - (dolist (key (where-is-internal #'widget-button-click widget-keymap)) + (dolist (key (where-is-internal 'widget-button-click widget-keymap)) (unless (lookup-key keymap key) (define-key keymap key #'ignore))) ;; Avoid `shr-next-link' and `shr-previous-link' in `keymap' so diff --git a/lisp/ps-print.el b/lisp/ps-print.el index baf290f4be6..59b37dd0acf 100644 --- a/lisp/ps-print.el +++ b/lisp/ps-print.el @@ -1773,7 +1773,7 @@ See `ps-lpr-command'." (defcustom ps-print-region-function (if (memq system-type '(ms-dos windows-nt)) - #'w32-direct-ps-print-region-function + 'w32-direct-ps-print-region-function #'call-process-region) "Specify a function to print the region on a PostScript printer. See definition of `call-process-region' for calling conventions. The fourth -- 2.39.5