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 #'.
This commit is contained in:
parent
2ea62d635d
commit
84ea61a838
2 changed files with 2 additions and 2 deletions
|
@ -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
|
||||
|
|
|
@ -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
|
||||
|
|
Loading…
Add table
Reference in a new issue