diff options
author | Xinglu Chen <public@yoctocell.xyz> | 2021-01-29 20:30:23 +0100 |
---|---|---|
committer | Xinglu Chen <public@yoctocell.xyz> | 2021-01-29 20:30:23 +0100 |
commit | 78c8b1d932743413c5df871da994dfc947144849 (patch) | |
tree | e0d678a3be7d3652764bccfbbd820b88d735c9f7 | |
parent | d179f9c2529e9e3152bcf5ac6e8be491dfce2260 (diff) |
Use appropriate types for defcustoms
Use more appropriate types for `defcustom` variables.
-rw-r--r-- | git-email.el | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/git-email.el b/git-email.el index 2c90fd3..210a6de 100644 --- a/git-email.el +++ b/git-email.el @@ -46,22 +46,22 @@ (defcustom git-email-compose-email-function #'message-mail "The function used to compose patch mail." - :group 'git-email - :type 'symbol) + :type 'function + :group 'git-email) (defcustom git-email-send-email-function #'message-send-and-exit "The function used to send mail." - :type 'symbol + :type 'function :group 'git-email) (defcustom git-email-pre-compose-email-hook nil "A list of functions called before running `git-email--compose-email'." - :type '(hook) + :type 'hook :group 'git-email) (defcustom git-email-post-compose-email-hook nil "A list of functions called after running `git-email--compose-email'." - :type '(hook) + :type 'hook :group 'git-email) (defcustom git-email-headers @@ -71,21 +71,21 @@ The 'to' address will always be inserted based on the 'sendemail.to' variable in you git config. If the variable is not set, the 'to' address will be empty." - :group 'git-email - :type '(symbol)) + :type '(symbol) + :group 'git-email) (defcustom git-email-get-files-functions '(git-email--dired-files git-email--ibuffer-files git-email--vc-dir-files) "An list of functions to for getting a list of patches to send." - :type '(list symbol) + :type 'hook :group 'git-email) (defcustom git-email-get-to-address-function - 'git-email--get-to-address + '(git-email--get-to-address) "Function to run to get the \“to\" address of a message." - :type 'symbol + :type 'hook :group 'git-email) (defcustom git-email-format-patch-default-args "" @@ -112,14 +112,14 @@ not set, the 'to' address will be empty." (defcustom git-email-revision-parser #'git-email--parse-revision "Function for parsing the output of ‘git-email-revision-command’." - :type 'symbol + :type 'hook :group 'git-email) (defcustom git-email-get-revision-functions '(git-email--log-get-revision) "List of functions to get the base commit for 'git format-patch'. If none of the functions return non-nil value, `git-email--minibuffer-get-revision' will be used as a fallback." - :type '(symbol) + :type 'hook :group 'git-email) ;;;; Remove Compiler warnings |