diff options
| author | Paul Eggert <eggert@cs.ucla.edu> | 2012-07-21 21:11:49 -0700 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2012-07-21 21:11:49 -0700 |
| commit | 494913d6debe4b2507d37a165a8be754ab64dbb4 (patch) | |
| tree | d92923ab73f3bbea0276b06766d8e9993cc897fb /lisp/ses.el | |
| parent | fb9ea40fc511eb7e42a512ada9e369cce1bfd932 (diff) | |
| download | emacs-494913d6debe4b2507d37a165a8be754ab64dbb4.tar.gz emacs-494913d6debe4b2507d37a165a8be754ab64dbb4.tar.bz2 emacs-494913d6debe4b2507d37a165a8be754ab64dbb4.zip | |
Spelling fixes.
Diffstat (limited to 'lisp/ses.el')
| -rw-r--r-- | lisp/ses.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/ses.el b/lisp/ses.el index 14294103d51..8181c6132a9 100644 --- a/lisp/ses.el +++ b/lisp/ses.el @@ -3213,7 +3213,7 @@ highlighted range in the spreadsheet." (col (cdr rowcol)) (cell (ses-get-cell row col))) (put new-name 'ses-cell rowcol) - ;; replace name by new name in formula of cells refering to renamed cell + ;; Replace name by new name in formula of cells referring to renamed cell. (dolist (ref (ses-cell-references cell)) (let* ((x (ses-sym-rowcol ref)) (xcell (ses-get-cell (car x) (cdr x)))) @@ -3228,8 +3228,8 @@ highlighted range in the spreadsheet." (let* ((x (ses-sym-rowcol ref)) (xrow (car x)) (xcol (cdr x))) - (ses-set-cell xrow xcol 'references - (cons new-name (delq ses--curcell + (ses-set-cell xrow xcol 'references + (cons new-name (delq ses--curcell (ses-cell-references xrow xcol)))))) (push new-name ses--renamed-cell-symb-list) (set new-name (symbol-value ses--curcell)) |