Переглянути джерело

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.
Marco Wahl 4 роки тому
батько
коміт
5dcf6d4af3
1 змінених файлів з 3 додано та 4 видалено
  1. 3 4
      lisp/org-table.el

+ 3 - 4
lisp/org-table.el

@@ -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