Mercurial > emacs
changeset 72081:1c3567a03964
2006-07-24 Daiki Ueno <ueno@unixuser.org>
* pgg-def.el (pgg-truncate-key-identifier): Truncate the key ID to 8
letters from the end. Thanks to "David Smith" <davidsmith@acm.org> and
andreas@altroot.de (Andreas V?e)
| author | Reiner Steib <Reiner.Steib@gmx.de> |
|---|---|
| date | Mon, 24 Jul 2006 07:32:16 +0000 |
| parents | 4f904c7a56f1 |
| children | b5cc98f000c1 |
| files | lisp/ChangeLog lisp/pgg-def.el |
| diffstat | 2 files changed, 7 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Sun Jul 23 21:21:37 2006 +0000 +++ b/lisp/ChangeLog Mon Jul 24 07:32:16 2006 +0000 @@ -1,3 +1,9 @@ +2006-07-24 Daiki Ueno <ueno@unixuser.org> + + * pgg-def.el (pgg-truncate-key-identifier): Truncate the key ID to 8 + letters from the end. Thanks to "David Smith" <davidsmith@acm.org> and + andreas@altroot.de (Andreas V,Av(Bgele) + 2006-07-23 Thien-Thi Nguyen <ttn@gnu.org> * mouse.el (mouse-on-link-p): Doc fix.
--- a/lisp/pgg-def.el Sun Jul 23 21:21:37 2006 +0000 +++ b/lisp/pgg-def.el Mon Jul 24 07:32:16 2006 +0000 @@ -87,7 +87,7 @@ "If t, inform the recipient that the input is text.") (defmacro pgg-truncate-key-identifier (key) - `(if (> (length ,key) 8) (substring ,key 8) ,key)) + `(if (> (length ,key) 8) (substring ,key -8) ,key)) (provide 'pgg-def)