diff options
author | Nicolas Goaziou <n.goaziou@gmail.com> | 2014-04-28 16:48:07 +0200 |
---|---|---|
committer | Nicolas Goaziou <n.goaziou@gmail.com> | 2014-04-28 16:50:53 +0200 |
commit | ae8fd7a1391b3ffa54a981735cb091a266769c13 (patch) | |
tree | fe706e66c2daa379d3ede1064fd31dbeb8e26484 | |
parent | fc37d1020a928b69ecb02592d521faf84d0051ff (diff) | |
download | org-mode-ae8fd7a1391b3ffa54a981735cb091a266769c13.tar.gz |
ox-ascii: Tiny fix
* lisp/ox-ascii.el (org-ascii--indent-string): Fix regexp to avoid
stack overflow in regexp matcher on very long lines.
-rw-r--r-- | lisp/ox-ascii.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/ox-ascii.el b/lisp/ox-ascii.el index 6208cdb..a29b0b2 100644 --- a/lisp/ox-ascii.el +++ b/lisp/ox-ascii.el @@ -455,7 +455,7 @@ HOW determines the type of justification: it can be `left', Empty lines are not indented." (when (stringp s) (replace-regexp-in-string - "\\(^\\)\\(?:.*\\S-\\)" (make-string width ? ) s nil nil 1))) + "\\(^\\)[ \t]*\\S-" (make-string width ?\s) s nil nil 1))) (defun org-ascii--box-string (s info) "Return string S with a partial box to its left. |