Mercurial > emacs
comparison lisp/mh-e/mh-mime.el @ 66474:06ed4e88d849
* mh-customize.el (mh-compose-insertion, mh-x-face-file): Checkdoc
fixes.
* mh-mime.el (mh-mh-to-mime, mh-mml-attach-file)
(mh-mml-secure-message-sign, mh-mml-secure-message-encrypt)
(mh-mml-secure-message-signencrypt): Ditto
author | Bill Wohler <wohler@newt.com> |
---|---|
date | Thu, 27 Oct 2005 22:57:30 +0000 |
parents | 779be9915a30 |
children | bce5c0d2041c |
comparison
equal
deleted
inserted
replaced
66473:2aa1446214fe | 66474:06ed4e88d849 |
---|---|
427 how it builds your message, use the `mh-mh-to-mime-args' option. For example, | 427 how it builds your message, use the `mh-mh-to-mime-args' option. For example, |
428 you can build a consistency check into the message by setting | 428 you can build a consistency check into the message by setting |
429 `mh-mh-to-mime-args' to \"-check\". The recipient of your message can then run | 429 `mh-mh-to-mime-args' to \"-check\". The recipient of your message can then run |
430 \"mhbuild -check\" on the message--\"mhbuild\" (\"mhn\") will complain if the | 430 \"mhbuild -check\" on the message--\"mhbuild\" (\"mhn\") will complain if the |
431 message has been corrupted on the way. This command only consults this option | 431 message has been corrupted on the way. This command only consults this option |
432 when given a prefix argument. | 432 when given a prefix argument EXTRA-ARGS. |
433 | 433 |
434 The value of `mh-mh-to-mime-hook' is a list of functions to be called after | 434 The value of `mh-mh-to-mime-hook' is a list of functions to be called after |
435 the message has been formatted. | 435 the message has been formatted. |
436 | 436 |
437 The effects of this command can be undone by running \\[mh-mh-to-mime-undo]." | 437 The effects of this command can be undone by running \\[mh-mh-to-mime-undo]." |
580 | 580 |
581 ;;;###mh-autoload | 581 ;;;###mh-autoload |
582 (defun mh-mml-attach-file (&optional disposition) | 582 (defun mh-mml-attach-file (&optional disposition) |
583 "Add a tag to insert a MIME message part from a file. | 583 "Add a tag to insert a MIME message part from a file. |
584 You are prompted for the filename containing the object, the media type if it | 584 You are prompted for the filename containing the object, the media type if it |
585 cannot be determined automatically, a content description and the disposition | 585 cannot be determined automatically, a content description and the DISPOSITION |
586 of the attachment. | 586 of the attachment. |
587 | 587 |
588 This is basically `mml-attach-file' from Gnus, modified such that a prefix | 588 This is basically `mml-attach-file' from Gnus, modified such that a prefix |
589 argument yields an `inline' disposition and Content-Type is determined | 589 argument yields an `inline' disposition and Content-Type is determined |
590 automatically." | 590 automatically." |
635 (defun mh-mml-secure-message-sign (method) | 635 (defun mh-mml-secure-message-sign (method) |
636 "Add tag to sign the message. | 636 "Add tag to sign the message. |
637 A proper multipart message is created for you when you send the message. Use | 637 A proper multipart message is created for you when you send the message. Use |
638 the \\[mh-mml-unsecure-message] command to remove this tag. Use a prefix | 638 the \\[mh-mml-unsecure-message] command to remove this tag. Use a prefix |
639 argument METHOD to be prompted for one of the possible security methods | 639 argument METHOD to be prompted for one of the possible security methods |
640 (see `mh-mml-method-default')." | 640 \(see `mh-mml-method-default')." |
641 (interactive (list (mh-mml-query-cryptographic-method))) | 641 (interactive (list (mh-mml-query-cryptographic-method))) |
642 (mh-secure-message method "sign" mh-identity-pgg-default-user-id)) | 642 (mh-secure-message method "sign" mh-identity-pgg-default-user-id)) |
643 | 643 |
644 ;;;###mh-autoload | 644 ;;;###mh-autoload |
645 (defun mh-mml-secure-message-encrypt (method) | 645 (defun mh-mml-secure-message-encrypt (method) |
646 "Add tag to encrypt the message. | 646 "Add tag to encrypt the message. |
647 A proper multipart message is created for you when you send the message. Use | 647 A proper multipart message is created for you when you send the message. Use |
648 the \\[mh-mml-unsecure-message] command to remove this tag. Use a prefix | 648 the \\[mh-mml-unsecure-message] command to remove this tag. Use a prefix |
649 argument METHOD to be prompted for one of the possible security methods | 649 argument METHOD to be prompted for one of the possible security methods |
650 (see `mh-mml-method-default')." | 650 \(see `mh-mml-method-default')." |
651 (interactive (list (mh-mml-query-cryptographic-method))) | 651 (interactive (list (mh-mml-query-cryptographic-method))) |
652 (mh-secure-message method "encrypt" mh-identity-pgg-default-user-id)) | 652 (mh-secure-message method "encrypt" mh-identity-pgg-default-user-id)) |
653 | 653 |
654 ;;;###mh-autoload | 654 ;;;###mh-autoload |
655 (defun mh-mml-secure-message-signencrypt (method) | 655 (defun mh-mml-secure-message-signencrypt (method) |
656 "Add tag to encrypt and sign the message. | 656 "Add tag to encrypt and sign the message. |
657 A proper multipart message is created for you when you send the message. Use | 657 A proper multipart message is created for you when you send the message. Use |
658 the \\[mh-mml-unsecure-message] command to remove this tag. Use a prefix | 658 the \\[mh-mml-unsecure-message] command to remove this tag. Use a prefix |
659 argument METHOD to be prompted for one of the possible security methods | 659 argument METHOD to be prompted for one of the possible security methods |
660 (see `mh-mml-method-default')." | 660 \(see `mh-mml-method-default')." |
661 (interactive (list (mh-mml-query-cryptographic-method))) | 661 (interactive (list (mh-mml-query-cryptographic-method))) |
662 (mh-secure-message method "signencrypt" mh-identity-pgg-default-user-id)) | 662 (mh-secure-message method "signencrypt" mh-identity-pgg-default-user-id)) |
663 | 663 |
664 ;;;###mh-autoload | 664 ;;;###mh-autoload |
665 (defun mh-mml-tag-present-p () | 665 (defun mh-mml-tag-present-p () |