diff options
| author | Vincent Belaïche | 2015-12-30 11:57:29 +0100 |
|---|---|---|
| committer | Vincent Belaïche | 2015-12-30 17:41:03 +0100 |
| commit | e8702794d46ae032803bf54ffbd71ebde215179c (patch) | |
| tree | 5dd457ad25e5fd1e6a08d64c32400921b6816935 | |
| parent | 36a0feb2971e6088cebb4a2fdc65862d395081ea (diff) | |
| download | emacs-e8702794d46ae032803bf54ffbd71ebde215179c.tar.gz emacs-e8702794d46ae032803bf54ffbd71ebde215179c.zip | |
Quick temporary hack to fix curcell refreshing.
The problem was caused by change: 2015-04-13 Deprecate `intangible'
and `point-entered' properties. The problem is that this change has
removed the (setq ses--curcell t) setting in the ses-command-hook
function.
* ses.el (ses-check-curcell): replace `(eq ses--curcell t)' by just `t' as
a condition to call function `ses-set-curcell'. Comment this as a quick
temporary hack to make it work, as I don't know yet whether a definite
correction would be to make the ses-set-curcell at every ses-check-curcell,
or to revert to the previous approach, ie marking ses--curcell as out-of-date
at every potentially cursor motion command.
| -rw-r--r-- | lisp/ses.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/ses.el b/lisp/ses.el index ec1359bbbcb..7347eb8f5fd 100644 --- a/lisp/ses.el +++ b/lisp/ses.el | |||
| @@ -1117,7 +1117,11 @@ region, or nil if cursor is not at a cell." | |||
| 1117 | The end marker is appropriate if some argument is 'end. | 1117 | The end marker is appropriate if some argument is 'end. |
| 1118 | A range is appropriate if some argument is 'range. | 1118 | A range is appropriate if some argument is 'range. |
| 1119 | A single cell is appropriate unless some argument is 'needrange." | 1119 | A single cell is appropriate unless some argument is 'needrange." |
| 1120 | (if (eq ses--curcell t) | 1120 | (if t;; Vincent B.: |
| 1121 | ;; previously (eq ses--curcell t) | ||
| 1122 | ;; this is a quick hack to temporary fix the bug implied by changes made by Stefan in | ||
| 1123 | ;; http://git.savannah.gnu.org/cgit/emacs.git/commit/lisp/ses.el?id=84e0b7dad6f1a8e53261f9b96f5a9080fea681a4 | ||
| 1124 | ;;------------------------------------------------------------------------- | ||
| 1121 | ;; curcell recalculation was postponed, but user typed ahead. | 1125 | ;; curcell recalculation was postponed, but user typed ahead. |
| 1122 | (ses-set-curcell)) | 1126 | (ses-set-curcell)) |
| 1123 | (cond | 1127 | (cond |