From mboxrd@z Thu Jan 1 00:00:00 1970 From: niels giesen Subject: Property inheritance for MAIL_FMT, MAIL_TO, MAIL_CC and MAIL_BCC Date: Thu, 13 Jan 2011 23:47:54 +0100 Message-ID: <877he8xvxh.fsf@gmail.com> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="===============0639708764==" Return-path: Received: from [140.186.70.92] (port=45145 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1PdVxs-0002kI-M6 for emacs-orgmode@gnu.org; Thu, 13 Jan 2011 17:48:21 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1PdVxr-0000ic-0c for emacs-orgmode@gnu.org; Thu, 13 Jan 2011 17:48:20 -0500 Received: from mail-ew0-f41.google.com ([209.85.215.41]:59092) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1PdVxq-0000iY-SV for emacs-orgmode@gnu.org; Thu, 13 Jan 2011 17:48:18 -0500 Received: by ewy27 with SMTP id 27so1128192ewy.0 for ; Thu, 13 Jan 2011 14:48:17 -0800 (PST) List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: Eric Schulte Cc: emacs-orgmode@gnu.org --===============0639708764== Content-Type: multipart/signed; boundary="=-=-="; micalg=pgp-sha1; protocol="application/pgp-signature" --=-=-= Content-Type: text/plain Content-Transfer-Encoding: quoted-printable Hi Eric, Please see the patch below, it adds property inheritance for all MAIL_* properties, based on the value of `org-use-property-inheritance'. #+begin_src diff diff --git a/contrib/lisp/org-mime.el b/contrib/lisp/org-mime.el index 68a3498..ae430fb 100644 --- a/contrib/lisp/org-mime.el +++ b/contrib/lisp/org-mime.el @@ -232,9 +232,9 @@ export that region, otherwise export the entire body." (run-hooks 'org-mime-send-subtree-hook) (let* ((file (buffer-file-name (current-buffer))) (subject (nth 4 (org-heading-components))) - (to (org-entry-get nil "MAIL_TO")) - (cc (org-entry-get nil "MAIL_CC")) - (bcc (org-entry-get nil "MAIL_BCC")) + (to (org-entry-get nil "MAIL_TO" org-use-property-inheritance)) + (cc (org-entry-get nil "MAIL_CC" org-use-property-inheritance)) + (bcc (org-entry-get nil "MAIL_BCC" org-use-property-inheritance)) (body (buffer-substring (save-excursion (goto-char (point-min)) (forward-line 1) @@ -311,6 +311,8 @@ export that region, otherwise export the entire body." exported to a org format or to the format specified by the MAIL_FMT property of the subtree." (interactive) - (org-mime-send-subtree (or (org-entry-get nil "MAIL_FMT") 'org))) + (org-mime-send-subtree (or (org-entry-get nil "MAIL_FMT" + org-use-property-inheritance) + 'org))) =20=20=20 (provide 'org-mime) #+end_src=20=20=20=20 The current mail was sent with it, where some parent tree has the mail_cc set to this list, but the mail_to set to your email address in the subtree. I believe this functionality can be quite handy. niels =2D- http://pft.github.com --=-=-= Content-Type: application/pgp-signature -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.9 (GNU/Linux) iEYEARECAAYFAk0vgRoACgkQaDYruO90Vs2KBACfZB0x6wbNAlXb68DoDQ6vw3x/ 9JMAn3ZUJqzITAlaQNNn5K7eTCwBTupf =QG6r -----END PGP SIGNATURE----- --=-=-=-- --===============0639708764== Content-Type: text/plain; charset="us-ascii" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Content-Disposition: inline _______________________________________________ Emacs-orgmode mailing list Please use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode --===============0639708764==--