summaryrefslogtreecommitdiff
path: root/lisp/org/ox-latex.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/org/ox-latex.el')
-rw-r--r--lisp/org/ox-latex.el15
1 files changed, 6 insertions, 9 deletions
diff --git a/lisp/org/ox-latex.el b/lisp/org/ox-latex.el
index 2dce7bc29bf..a656e065b94 100644
--- a/lisp/org/ox-latex.el
+++ b/lisp/org/ox-latex.el
@@ -2180,19 +2180,16 @@ contextual information."
(nth (1- level) '("i" "ii" "iii" "iv"))
(1- count)))))
(checkbox (cl-case (org-element-property :checkbox item)
- (on "$\\boxtimes$ ")
- (off "$\\square$ ")
- (trans "$\\boxminus$ ")))
+ (on "$\\boxtimes$")
+ (off "$\\square$")
+ (trans "$\\boxminus$")))
(tag (let ((tag (org-element-property :tag item)))
- ;; Check-boxes must belong to the tag.
- (and tag (format "[{%s}] "
- (concat checkbox
- (org-export-data tag info)))))))
+ (and tag (org-export-data tag info)))))
(concat counter
"\\item"
(cond
- (tag)
- (checkbox (concat " " checkbox))
+ ((and checkbox tag) (format "[{%s %s}] " checkbox tag))
+ ((or checkbox tag) (format "[{%s}] " (or checkbox tag)))
;; Without a tag or a check-box, if CONTENTS starts with
;; an opening square bracket, add "\relax" to "\item",
;; unless the brackets comes from an initial export