Fix after entry hooking.

* lisp/ses.el (ses-edit-cell): Run ses-after-entry-functions
when called interactively.
Fix after entry hooking.
* lisp/ses.el (ses-edit-cell): Run ses-after-entry-functions
when called interactively.
This commit is contained in:
Vincent Belaïche 2026-03-13 16:09:31 +01:00
parent 8050bee438
commit 51de35c9d8

View file

@ -2570,7 +2570,12 @@ Return nil if cell formula was unsafe and user declined confirmation."
(when (ses-warn-unsafe newval 'unsafep)
(ses-begin-change)
(ses-cell-set-formula row col newval)
t))
(if (called-interactively-p)
(let ((ses--row row)
(ses--col col))
(run-hook-with-args 'ses-after-entry-functions 1))
t)
))
(defun ses-read-cell (row col newval)
"Self-insert for initial character of cell function."