From: Nicolas Goaziou Date: Fri, 1 Feb 2013 22:47:00 +0000 (+0100) Subject: org-e-ascii: Fix justification for lines looking like a fill-prefix X-Git-Tag: release_8.0-pre~465 X-Git-Url: https://repo.or.cz/w/org-mode.git/commitdiff_plain/cb1386ba39d4115a4fe05656bee2043272e8e3d8 org-e-ascii: Fix justification for lines looking like a fill-prefix * contrib/lisp/org-e-ascii.el (org-e-ascii--justify-string): Fill justification for lines looking-like a fill-prefix. --- diff --git a/contrib/lisp/org-e-ascii.el b/contrib/lisp/org-e-ascii.el index 7bfc4c2c9..c137fd77e 100644 --- a/contrib/lisp/org-e-ascii.el +++ b/contrib/lisp/org-e-ascii.el @@ -434,7 +434,10 @@ HOW determines the type of justification: it can be `left', (with-temp-buffer (insert s) (goto-char (point-min)) - (let ((fill-column text-width)) + (let ((fill-column text-width) + ;; Disable `adaptive-fill-mode' so it doesn't prevent + ;; filling lines matching `adaptive-fill-regexp'. + (adaptive-fill-mode nil)) (while (< (point) (point-max)) (justify-current-line how) (forward-line)))