From cff4f506ea99ab8b63f2e9aee7f6f5d24c9674f0 Mon Sep 17 00:00:00 2001 From: Carsten Dominik Date: Mon, 22 Dec 2008 22:14:50 +0000 Subject: [PATCH] 2008-12-22 Carsten Dominik * org-table.el (org-table-get-formula): Only ask to overwrite field formula if there really is one. --- lisp/org/org-table.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/org/org-table.el b/lisp/org/org-table.el index ad07a390a19..b1f143f283d 100644 --- a/lisp/org/org-table.el +++ b/lisp/org/org-table.el @@ -1722,12 +1722,13 @@ When NAMED is non-nil, look for a named equation." (ref (format "@%d$%d" (org-table-current-dline) (org-table-current-column))) (refass (assoc ref stored-list)) + (nameass (assoc name stored-list)) (scol (if named (if (and name (not (string-match "^LR[0-9]+$" name))) name ref) (int-to-string (org-table-current-column)))) - (dummy (and (or name refass) (not named) + (dummy (and (or nameass refass) (not named) (not (y-or-n-p "Replace field formula with column formula? " )) (error "Abort"))) (name (or name ref)) -- 2.39.2