[elpa] externals/urgrep 3052b8c191 049/115: Use #' read syntax for functions

[ELPA Syncer]

branch: externals/urgrep
commit 3052b8c19123a84c91803d5ebcfe2021e5e18f28
Author: Jim Porter <jporterbugs@gmail.com>
Commit: Jim Porter <jporterbugs@gmail.com>

    Use #' read syntax for functions
---
 urgrep.el | 38 +++++++++++++++++++-------------------
 1 file changed, 19 insertions(+), 19 deletions(-)

diff --git a/urgrep.el b/urgrep.el
index b0f9c43d28..1bc748adf2 100644
--- a/urgrep.el
+++ b/urgrep.el
@@ -469,23 +469,23 @@ If EDIT-COMMAND is non-nil, the search can be edited."
     ;; Don't inherit from `compilation-minor-mode-map',
     ;; because that introduces a menu bar item we don't want.
     (set-keymap-parent map special-mode-map)
-    (define-key map [mouse-2] 'compile-goto-error)
-    (define-key map [follow-link] 'mouse-face)
-    (define-key map "\C-c\C-c" 'compile-goto-error)
-    (define-key map "\C-m" 'compile-goto-error)
-    (define-key map "\C-o" 'compilation-display-error)
-    (define-key map "\C-c\C-k" 'kill-compilation)
-    (define-key map "\M-n" 'compilation-next-error)
-    (define-key map "\M-p" 'compilation-previous-error)
-    (define-key map "\M-{" 'compilation-previous-file)
-    (define-key map "\M-}" 'compilation-next-file)
-    (define-key map "n" 'next-error-no-select)
-    (define-key map "p" 'previous-error-no-select)
-    (define-key map "{" 'compilation-previous-file)
-    (define-key map "}" 'compilation-next-file)
-    (define-key map "\t" 'compilation-next-error)
-    (define-key map [backtab] 'compilation-previous-error)
-    (define-key map "g" 'urgrep-search-again)
+    (define-key map [mouse-2] #'compile-goto-error)
+    (define-key map [follow-link] #'mouse-face)
+    (define-key map "\C-c\C-c" #'compile-goto-error)
+    (define-key map "\C-m" #'compile-goto-error)
+    (define-key map "\C-o" #'compilation-display-error)
+    (define-key map "\C-c\C-k" #'kill-compilation)
+    (define-key map "\M-n" #'compilation-next-error)
+    (define-key map "\M-p" #'compilation-previous-error)
+    (define-key map "\M-{" #'compilation-previous-file)
+    (define-key map "\M-}" #'compilation-next-file)
+    (define-key map "n" #'next-error-no-select)
+    (define-key map "p" #'previous-error-no-select)
+    (define-key map "{" #'compilation-previous-file)
+    (define-key map "}" #'compilation-next-file)
+    (define-key map "\t" #'compilation-next-error)
+    (define-key map [backtab] #'compilation-previous-error)
+    (define-key map "g" #'urgrep-search-again)
     map)
   "Keymap for urgrep buffers.")
 
@@ -611,7 +611,7 @@ See `compilation-error-regexp-alist' for format details.")
   (when-let ((tool-setup (urgrep--get-prop 'process-setup 
urgrep-current-tool)))
     (funcall tool-setup))
   (setq-local urgrep-num-matches-found 0
-              compilation-exit-message-function 'urgrep-exit-message)
+              compilation-exit-message-function #'urgrep-exit-message)
   (run-hooks 'urgrep-setup-hook))
 
 (defun urgrep-exit-message (status code msg)
@@ -696,7 +696,7 @@ rerunning the search."
       ;; can consult it.
       (urgrep--with-killed-local-variable 'urgrep-current-tool
         (let ((urgrep-current-tool tool))
-          (compilation-start command 'urgrep-mode)))
+          (compilation-start command #'urgrep-mode)))
     (setq urgrep-current-query query
           urgrep-current-tool tool)
     (current-buffer)))