From mboxrd@z Thu Jan 1 00:00:00 1970 From: =?utf-8?Q?S=C3=A9bastien_Vauban?= Subject: Re: Enhancing the Org/Gnus experience Date: Thu, 04 Nov 2010 12:18:13 +0100 Message-ID: <8062wdcp6y.fsf@mundaneum.com> References: <80k4lj78ui.fsf@mundaneum.com> <87sk07fl3s.fsf@gmail.com> <80k4lf337a.fsf@mundaneum.com> <80vd4z9q2f.fsf@mundaneum.com> <874oc2z2uv.fsf@gmail.com> Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Return-path: 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-mXXj517/zsQ@public.gmane.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org-mXXj517/zsQ@public.gmane.org To: emacs-orgmode-mXXj517/zsQ@public.gmane.org Hi Eric (and Dan), "Eric Schulte" wrote: > This is really great. I finally folded it into my gnus setup, and while > it looks great when it works Great you love it. I'm *VERY* pleased. Moreover, having no reaction on that (and on some other posts[1]), I thought I'd been kill-filed=C2=A0;-)[2] > I was getting frequent errors throw by the org-mode fontification engine > recursing too deeply. I've changed it to the following which augments what > you sent with some simple error handling. I _never_ observed problems in my case. Anyway, adding such a protection is the code is a great addition. Thanks! I've just singed the FSF papers. Once received by the FSF, I'll propagate y= our update onto the Gnus newsgroup. > ** Org-mode code block fontification > Correctly fontify Org-mode attachments > #+begin_src emacs-lisp > (add-to-list 'mailcap-mime-extensions '(".org" . "text/org")) > (add-to-list 'mm-automatic-display "text/org") >=20=20=20=20=20 > (add-to-list 'mm-inline-media-tests > '("text/org" my-display-org-inline > (lambda (el) t))) >=20=20=20=20=20 > (defun my-display-org-inline (handle) > (condition-case nil > (mm-display-inline-fontify handle 'org-mode) > (error > (insert (with-temp-buffer (mm-insert-part handle) (buffer-string= )) > "\n")))) > #+end_src > > Update =3Dorg-src-lang-modes=3D to provide some leeway for posters > #+begin_src emacs-lisp > (add-to-list 'org-src-lang-modes > '("elisp" . emacs-lisp)) > (add-to-list 'org-src-lang-modes > '("emacs_lisp" . emacs-lisp)) > #+end_src > > Fontify code blocks in the text of messages > #+begin_src emacs-lisp > (defun my-mm-org-babel-src-extract () > (mm-make-handle (mm-uu-copy-to-buffer start-point end-point) '("text/= org"))) >=20=20=20 > (add-to-list 'mm-uu-type-alist > '(org-src-block > "^[ \t]*#\\+begin_" > "^[ \t]*#\\+end_" > my-mm-org-babel-src-extract > nil)) >=20=20=20 > (mm-uu-configure) > #+end_src When I have a bit of time (not directly=C2=A0;-(), I will try adding missin= g bits: - colorization of such =3Dorg-verbatim=3D strings, and - of the =3D:results=3D "blocks" or lines. A difficulty, maybe, for the latter is the absence of explicit marker. Not that true: it's a newline... When that will be done, we will have a real Org experience when reading mai= ls with Gnus. I love all this tools. Best regards, Seb Footnotes: [1] I will send an updated version on the one about sh session. [2] Just kidding. Using org-footnote BTW. --=20 S=C3=A9bastien Vauban _______________________________________________ Emacs-orgmode mailing list Please use `Reply All' to send replies to the list. Emacs-orgmode-mXXj517/zsQ@public.gmane.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode