From: Glenn Morris <rgm@gnu.org>
Date: Mon, 26 Feb 2018 18:51:01 +0000 (-0500)
Subject: Remove compiler warnings due to #'
X-Git-Tag: emacs-27.0.90~5625
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=84ea61a838a4be33206c5b2e542d52355d79e187;p=emacs.git

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 #'.
---

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