diff options
author | Jonas Bernoulli <jonas@bernoul.li> | 2020-02-18 16:59:00 +0100 |
---|---|---|
committer | Jonas Bernoulli <jonas@bernoul.li> | 2020-07-15 18:06:03 +0200 |
commit | 0e2af5cc3726d6e661f0f396a843185326ed5e7d (patch) | |
tree | d9e0cc5aeed58edfe6aa53a7ad4aac8e74a771e3 /lisp/epa-hook.el | |
parent | da6edafcb138ade46358a8c24ece8f3fca6e801a (diff) | |
download | emacs-0e2af5cc3726d6e661f0f396a843185326ed5e7d.tar.gz |
Improve and add doc-strings
* lisp/epa-file.el (epa-file-select-keys):
lisp/epa-hook.el (epa-file-name-regexp):
lisp/epa.el (epa-exit-buffer): Improve doc-string.
* lisp/epa-hook.el (epa-file-name-regexp-update): Add doc-string.
Diffstat (limited to 'lisp/epa-hook.el')
-rw-r--r-- | lisp/epa-hook.el | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/lisp/epa-hook.el b/lisp/epa-hook.el index d424e7a9faf..a86f23eb688 100644 --- a/lisp/epa-hook.el +++ b/lisp/epa-hook.el @@ -35,10 +35,10 @@ (defcustom epa-file-name-regexp (purecopy "\\.gpg\\(~\\|\\.~[0-9]+~\\)?\\'") "Regexp which matches filenames to be encrypted with GnuPG. -If you set this outside Custom while epa-file is already enabled, you -have to call `epa-file-name-regexp-update' after setting it to -properly update file-name-handler-alist. Setting this through Custom -does that automatically." +If you set this outside Custom while epa-file is already enabled, +you have to call `epa-file-name-regexp-update' after setting it +to properly update `file-name-handler-alist'. Setting this +through Custom does that automatically." :type 'regexp :group 'epa-file :set 'epa-file--file-name-regexp-set) @@ -72,6 +72,9 @@ May either be a string or a list of strings.") (list epa-file-name-regexp nil 'epa-file)) (defun epa-file-name-regexp-update () + "Update `file-name-handler-alist' after configuring outside Custom. +After setting `epa-file-name-regexp-update' outside the Custom +interface, update `file-name-handler-alist'." (interactive) (unless (equal (car epa-file-handler) epa-file-name-regexp) (setcar epa-file-handler epa-file-name-regexp))) |