Patch 674 (http://patchwork.newartisans.com/patch/674/) is now "Accepted".
Maintainer comment: none This relates to the following submission: http://mid.gmane.org/%3C19834.23619.813886.886825%40gargle.gargle.HOWL%3E Here is the original message containing the patch: > Content-Type: text/plain; charset="utf-8" > MIME-Version: 1.0 > Content-Transfer-Encoding: 7bit > Subject: [O] Fix for infinite loop in org-html-protect > Date: Fri, 11 Mar 2011 22:30:43 -0000 > From: Kim Rutherford <km...@cam.ac.uk> > X-Patchwork-Id: 674 > Message-Id: <19834.23619.813886.886...@gargle.gargle.howl> > To: emacs-orgmode@gnu.org > > When I export the following as HTML, emacs hangs in org-html-protect: > > #+begin_src org > & > #+end_src > > The attached patch fixes the problem for me. > > Thanks, > Kim. > >From cfb1ccb6f9cfd84530c73b7f72d686a2062b3c3b Mon Sep 17 00:00:00 2001 > From: Kim Rutherford <km...@cam.ac.uk> > Date: Fri, 11 Mar 2011 16:44:09 +0000 > Subject: [PATCH] Fix infinite loop in org-html-protect > > --- > lisp/org-html.el | 2 +- > 1 files changed, 1 insertions(+), 1 deletions(-) > > diff --git a/lisp/org-html.el b/lisp/org-html.el > index c60c90d..2312b21 100644 > --- a/lisp/org-html.el > +++ b/lisp/org-html.el > @@ -2186,7 +2186,7 @@ Possible conversions are set in > `org-export-html-protect-char-alist'." > (let ((start 0)) > (while (string-match (car c) s start) > (setq s (replace-match (cdr c) t t s) > - start (match-beginning 0))))) > + start (1+ (match-beginning 0)))))) > s)) > > (defun org-html-expand (string) >
