Avoid negative numbers

This commit is contained in:
Masanao Igarashi
2025-04-28 14:07:24 +09:00
parent 17bebbbc9b
commit 7b75c18774

View File

@@ -1482,8 +1482,9 @@ a communication channel."
(org-rst--justify-lines (org-rst--justify-lines
contents width contents width
(org-export-table-cell-alignment table-cell info)) "\\"))) (org-export-table-cell-alignment table-cell info)) "\\")))
(setq contents (concat data (setq contents
(make-string (- width (string-width data)) ? )))) (concat data
(make-string (max 0 (- width (string-width data))) ? ))))
;; Return cell. ;; Return cell.
(concat (format " %s " contents) (concat (format " %s " contents)
(when (org-export-get-next-element table-cell info) "|")))) (when (org-export-get-next-element table-cell info) "|"))))