[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals-release/org cd967ce006: org-odt-plain-text: Fix `fill-c
From: |
ELPA Syncer |
Subject: |
[elpa] externals-release/org cd967ce006: org-odt-plain-text: Fix `fill-column' value |
Date: |
Fri, 13 Jan 2023 03:58:03 -0500 (EST) |
branch: externals-release/org
commit cd967ce006726a56df49885c83b27e9bf4bd7c4c
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>
org-odt-plain-text: Fix `fill-column' value
* lisp/ox-odt.el (org-odt-plain-text): Use `most-positive-fixnum' to
unfill plain text elements. `point-max' is not a safe large value
because, for example, Han script symbols often occupy two columns.
Reported-by: Cantoraz Chou <cantoraz@gmail.com>
Link:
https://orgmode.org/list/CAJg5Zf00e+A_kuBmRh+h68u+3g_Cb_bLqRhR4rpFH=nenXvTdw@mail.gmail.com
---
lisp/ox-odt.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lisp/ox-odt.el b/lisp/ox-odt.el
index 1c233a266a..949c8f9b5b 100644
--- a/lisp/ox-odt.el
+++ b/lisp/ox-odt.el
@@ -2935,7 +2935,7 @@ contextual information."
(trailing (and (string-match (rx (1+ blank) eos) output)
(match-string 0 output))))
;; Unfill, retaining leading/trailing space.
- (let ((fill-column (point-max)))
+ (let ((fill-column most-positive-fixnum))
(fill-region (point-min) (point-max)))
(concat leading (buffer-string) trailing))))))
;; Return value.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals-release/org cd967ce006: org-odt-plain-text: Fix `fill-column' value,
ELPA Syncer <=