forked from mirrors/org-mode
org-e-ascii: Fix typo
* contrib/lisp/org-e-ascii.el (org-e-ascii-horizontal-rule): Fix typo.
This commit is contained in:
parent
c92913b5f9
commit
3a633732b7
|
@ -1097,10 +1097,10 @@ holding contextual information."
|
||||||
;;;; Horizontal Rule
|
;;;; Horizontal Rule
|
||||||
|
|
||||||
(defun org-e-ascii-horizontal-rule (horizontal-rule contents info)
|
(defun org-e-ascii-horizontal-rule (horizontal-rule contents info)
|
||||||
"Transcode an HORIZONTAL-RULE object from Org to ASCII.
|
"Transcode an HORIZONTAL-RULE object from Org to ASCII.
|
||||||
CONTENTS is nil. INFO is a plist holding contextual
|
CONTENTS is nil. INFO is a plist holding contextual
|
||||||
information."
|
information."
|
||||||
(let ((width (org-export-read-attribte :attr_ascii horizontal-rule :width)))
|
(let ((width (org-export-read-attribute :attr_ascii horizontal-rule :width)))
|
||||||
(make-string (or (and (wholenump width) width)
|
(make-string (or (and (wholenump width) width)
|
||||||
(org-e-ascii--current-text-width horizontal-rule info))
|
(org-e-ascii--current-text-width horizontal-rule info))
|
||||||
(if (eq (plist-get info :ascii-charset) 'utf-8) ?― ?-))))
|
(if (eq (plist-get info :ascii-charset) 'utf-8) ?― ?-))))
|
||||||
|
|
Loading…
Reference in a new issue