Merge branch 'bugfix'
This commit is contained in:
commit
c59d6d82e6
|
@ -4448,6 +4448,13 @@ FIELD is a string. WIDTH is a number. ALIGN is either \"c\",
|
|||
(defun org-table-justify-field-maybe (&optional new)
|
||||
"Justify the current field, text to left, number to right.
|
||||
Optional argument NEW may specify text to replace the current field content."
|
||||
;; FIXME: Prevent newlines inside field. They are currently not
|
||||
;; supported.
|
||||
(when (and (stringp new) (string-match-p "\n" new))
|
||||
(message "Removing newlines from formula result: %S" new)
|
||||
(setq new (replace-regexp-in-string
|
||||
"\n" " "
|
||||
(replace-regexp-in-string "\\(^\n+\\)\\|\\(\n+$\\)" "" new))))
|
||||
(cond
|
||||
((and (not new) org-table-may-need-update)) ; Realignment will happen anyway
|
||||
((org-at-table-hline-p))
|
||||
|
|
Loading…
Reference in New Issue