Function: ses-setter-with-undo

ses-setter-with-undo is a byte-compiled function defined in ses.el.gz.

Signature

(ses-setter-with-undo ACCESSORS NEWVAL &rest ARGS)

Documentation

Set a field/variable and record it so it can be undone.

Result is non-nil if field/variable has changed.

Source Code

;; Defined in /usr/src/emacs/lisp/ses.el.gz
(defun ses-setter-with-undo (accessors newval &rest args)
  "Set a field/variable and record it so it can be undone.
Result is non-nil if field/variable has changed."
  (let ((oldval (apply (car accessors) args)))
    (unless (equal-including-properties oldval newval)
      (push `(apply ses-setter-with-undo ,accessors ,oldval ,@args)
            buffer-undo-list)
      (apply (cdr accessors) newval args)
      t)))