[PATCH] Fix for infinite loop in org-html-protect

[Kim Rutherford <kmr44@cam.ac.uk>]

[-- Attachment #1: message body text --]
[-- Type: text/plain, Size: 161 bytes --]

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.



[-- Attachment #2: Patch for org mode --]
[-- Type: text/plain, Size: 737 bytes --]

From cfb1ccb6f9cfd84530c73b7f72d686a2062b3c3b Mon Sep 17 00:00:00 2001
From: Kim Rutherford <kmr44@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)
-- 
1.7.1