diff options
| author | yoctocell <public@yoctocell.xyz> | 2021-01-09 15:56:50 +0100 |
|---|---|---|
| committer | yoctocell <public@yoctocell.xyz> | 2021-01-09 15:56:50 +0100 |
| commit | 24602dde545e8b5ac7dc9666203db77af9d322d2 (patch) | |
| tree | 3bb76ad911a5d4f8f335d8b20d791343ff1b0218 /git-email.el | |
| parent | b98b46466ada12b42c5060ecea3f605a3cb14332 (diff) | |
Use #' for referencing functions
* git-email.el:
Diffstat (limited to 'git-email.el')
| -rw-r--r-- | git-email.el | 12 |
1 files changed, 6 insertions, 6 deletions
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>" |