[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#41276: [PATCH v2 4/8] Improve and add doc-strings
From: |
Jonas Bernoulli |
Subject: |
bug#41276: [PATCH v2 4/8] Improve and add doc-strings |
Date: |
Tue, 7 Jul 2020 17:47:35 +0200 |
* 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.
---
lisp/epa-file.el | 4 ++--
lisp/epa-hook.el | 11 +++++++----
lisp/epa.el | 3 +--
3 files changed, 10 insertions(+), 8 deletions(-)
diff --git a/lisp/epa-file.el b/lisp/epa-file.el
index dedf20b0d7..22c3dc1146 100644
--- a/lisp/epa-file.el
+++ b/lisp/epa-file.el
@@ -40,9 +40,9 @@ epa-file-cache-passphrase-for-symmetric-encryption
(defcustom epa-file-select-keys nil
"Control whether or not to pop up the key selection dialog.
-If t, always asks user to select recipients.
+If t, always ask user to select recipients.
If nil, query user only when `epa-file-encrypt-to' is not set.
-If neither t nor nil, doesn't ask user. In this case, symmetric
+If neither t nor nil, don't ask user. In this case, symmetric
encryption is used."
:type '(choice (const :tag "Ask always" t)
(const :tag "Ask when recipients are not set" nil)
diff --git a/lisp/epa-hook.el b/lisp/epa-hook.el
index d424e7a9fa..a86f23eb68 100644
--- a/lisp/epa-hook.el
+++ b/lisp/epa-hook.el
@@ -35,10 +35,10 @@ epa-file--file-name-regexp-set
(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 @@ epa-file-auto-mode-alist-entry
(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)))
diff --git a/lisp/epa.el b/lisp/epa.el
index 40b3861ea8..e4d1e5b414 100644
--- a/lisp/epa.el
+++ b/lisp/epa.el
@@ -335,8 +335,7 @@ epa-unmark-key
(epa-mark-key (not arg)))
(defun epa-exit-buffer ()
- "Exit the current buffer.
-`epa-exit-buffer-function' is called if it is set."
+ "Exit the current buffer using `epa-exit-buffer-function'."
(interactive)
(funcall epa-exit-buffer-function))
--
2.26.0
- bug#41276: [PATCH v2 0/8] Various small improvements to EasyPG, Jonas Bernoulli, 2020/07/07
- bug#41276: [PATCH v2 1/8] * lisp/epa.el (epa-faces): Move definition., Jonas Bernoulli, 2020/07/07
- bug#41276: [PATCH v2 2/8] Add all epa faces to epa-faces Custom group, Jonas Bernoulli, 2020/07/07
- bug#41276: [PATCH v2 3/8] * lisp/epg-config.el (epg-config--make-gpg-configuration): Fix indentation., Jonas Bernoulli, 2020/07/07
- bug#41276: [PATCH v2 4/8] Improve and add doc-strings,
Jonas Bernoulli <=
- bug#41276: [PATCH v2 5/8] Drop unnecessary backward compatibility aliases, Jonas Bernoulli, 2020/07/07
- bug#41276: [PATCH v2 6/8] Cosmetic changes to epa libraries, Jonas Bernoulli, 2020/07/07
- bug#41276: [PATCH v2 7/8] epa-key-list-mode-map: Use widget-keymap as parent keymap, Jonas Bernoulli, 2020/07/07
- bug#41276: [PATCH v2 8/8] * lisp/epa.el (epa-show-key): New command., Jonas Bernoulli, 2020/07/07
bug#41276: [PATCH v2 0/8] Various small improvements to EasyPG, Eli Zaretskii, 2020/07/07