pgg-def.el doc string

Yoshiki Hayashi t90553 @ mail.ecc.u-tokyo.ac.jp
2000年 2月 7日 (月) 16:43:29 JST


EMY を EMIKO 1.13.11 相当のものと sync したのですが、そのと
き眺めていて気になったので、patch です。

後、pgg-* に doc string の最初の行が文で終わってないのがあっ
て、checkdoc に文句を言われそうなのですが、修正した方が良い
でしょうか?

-------------- next part --------------
--- /src/emiko-1_13/pgg-def.el	Fri Nov 26 19:17:27 1999
+++ pgg-def.el	Sun Feb  6 21:40:22 2000
@@ -32,9 +32,11 @@
   :group 'mime)
 
 (defcustom pgg-default-scheme 'gpg
-  "Default PGP scheme"
-  :group 'symbol
-  :type 'string)
+  "Default PGP scheme."
+  :group 'pgg
+  :type '(choice (const :tag "GnuPG" gpg)
+		 (const :tag "PGP 5" pgp5)
+		 (const :tag "PGP" pgp)))
 
 (defcustom pgg-default-user-id (user-login-name)
   "User ID of your default identity."
@@ -47,12 +49,12 @@
   :type 'string)
 
 (defcustom pgg-encrypt-for-me nil
-  "Encrypt all outgoing messages with user's public key."
+  "If t, encrypt all outgoing messages with user's public key."
   :group 'pgg
   :type 'boolean)
 
 (defcustom pgg-cache-passphrase t
-  "Cache passphrase"
+  "If t, cache passphrase."
   :group 'pgg
   :type 'boolean)
 
@@ -63,7 +65,7 @@
 (defvar pgg-echo-buffer "*PGG-echo*")
 
 (defvar pgg-scheme nil
-  "Current scheme of PGP implementation")
+  "Current scheme of PGP implementation.")
 
 (defmacro pgg-truncate-key-identifier (key)
   `(if (> (length ,key) 8) (substring ,key 8) ,key))
-------------- next part --------------

-- 
Yoshiki Hayashi


More information about the Emacs-mime-ja mailing list