tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

org-table: Decrease the amount of redundant messages 

* lisp/org-table.el (org-table-fix-formulas): Only one message per
tblfm instead of an update message for every line.
This commit is contained in:
Marco Wahl 2020-04-18 01:03:15 +02:00
parent 0e5be8a656
commit 5dcf6d4af3
1 changed files with 3 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lisp/org-table.el
View File

@ -2272,11 +2272,10 @@ For all numbers larger than LIMIT, shift them by DELTA."
(setq s (match-string 1) n (string-to-number s))
(cond
((setq a (assoc s replace))
(replace-match (concat key (cdr a)) t t)
(message msg))
(replace-match (concat key (cdr a)) t t))
((and limit (> n limit))
(replace-match (concat key (number-to-string (+ n delta))) t t)
(message msg))))))
(replace-match (concat key (number-to-string (+ n delta))) t t)))))
(message msg))
(forward-line))))
;;;###autoload