Mercurial > hg > xemacs-beta
comparison lisp/mailcrypt/mc-toplev.el @ 2:ac2d302a0011 r19-15b2
Import from CVS: tag r19-15b2
author | cvs |
---|---|
date | Mon, 13 Aug 2007 08:46:35 +0200 |
parents | 376386a54a3c |
children |
comparison
equal
deleted
inserted
replaced
1:c0c6a60d29db | 2:ac2d302a0011 |
---|---|
548 | 548 |
549 ;;;###autoload | 549 ;;;###autoload |
550 (defun mc-gnus-verify-signature () | 550 (defun mc-gnus-verify-signature () |
551 (interactive) | 551 (interactive) |
552 (gnus-summary-select-article) | 552 (gnus-summary-select-article) |
553 (gnus-eval-in-buffer-window gnus-article-buffer | 553 (save-excursion |
554 (set-buffer gnus-original-article-buffer) | |
554 (save-restriction (widen) (mc-verify-signature)))) | 555 (save-restriction (widen) (mc-verify-signature)))) |
555 | 556 |
556 ;;;###autoload | 557 ;;;###autoload |
557 (defun mc-gnus-snarf-keys () | 558 (defun mc-gnus-snarf-keys () |
558 (interactive) | 559 (interactive) |