Commit cff4f506 authored by Carsten Dominik's avatar Carsten Dominik
Browse files

2008-12-22 Carsten Dominik <dominik@science.uva.nl>

	* org-table.el (org-table-get-formula): Only ask to overwrite
	field formula if there really is one.
parent 830334b1
......@@ -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))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment