From 24602dde545e8b5ac7dc9666203db77af9d322d2 Mon Sep 17 00:00:00 2001
From: yoctocell <public@yoctocell.xyz>
Date: Sat, 9 Jan 2021 15:56:50 +0100
Subject: Use #' for referencing functions

* git-email.el:
---
 git-email.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

(limited to 'git-email.el')

diff --git a/git-email.el b/git-email.el
index e89fcef..7e9b09c 100644
--- a/git-email.el
+++ b/git-email.el
@@ -51,12 +51,12 @@
   "Work with git and email."
   :group 'convenience)
 
-(defcustom git-email-compose-email-function 'message-mail
+(defcustom git-email-compose-email-function #'message-mail
   "The function used to compose patch mail."
   :group 'git-email
   :type 'symbol)
 
-(defcustom git-email-send-email-function 'message-send-and-exit
+(defcustom git-email-send-email-function #'message-send-and-exit
   "The function used to send mail."
   :type 'symbol
   :group 'git-email)
@@ -99,7 +99,7 @@ in you git config.  If the variable is not set, the 'to' address will be empty."
   :group 'git-email)
 
 (defcustom git-email-apply-patch-function
-  'git-email--shell-command-on-body
+  #'git-email--shell-command-on-body
   "Function that executes a shell command on the body of the message.
 This function should take one argument, it should be the shell command to
 execute.  By default it is determined by the `git-email-apply-patch-command'
@@ -189,7 +189,7 @@ If no marks are found, return the filename at point."
 			       (funcall fn))
 			     git-email-get-files-functions)
 		   (git-email--minibuffer-file))))
-    (when (mapcar 'git-email--check-file files)
+    (when (mapcar #'git-email--check-file files)
       files)))
 
 ;;;; Get contents from patch
@@ -227,7 +227,7 @@ If the header is not found, return an empty string."
     (erase-buffer)
     (insert text)
     (delay-mode-hooks (diff-mode))
-    (font-lock-default-function 'diff-mode)
+    (font-lock-default-function #'diff-mode)
     (font-lock-default-fontify-region (point-min)
 				      (point-max)
 				      nil)
@@ -268,7 +268,7 @@ them into the message buffer."
 	     ;; Remove 'subject' header, otherwise two subject headers will be
 	     ;; inserted.
 	     (cadr (assoc 'subject used-headers))
-	     (seq-filter 'git-email--remove-subject used-headers))
+	     (seq-filter #'git-email--remove-subject used-headers))
     ;; Insert diff at the beginning of the body
     (let ((body (or (re-search-forward
 		     "<#part \\(encrypt\\|sign\\)=.*mime>"
-- 
cgit v1.2.3