Re: [Emacs-diffs] master c5e89be: On C-y, stop some text property entries being written into buffer-undo-list

[Stefan Monnier]

> +  (with-silent-modifications
> +    (let ((inhibit-read-only t))
> +      (dolist (handler yank-handled-properties)
> +     (let ((prop (car handler))
> +           (fun  (cdr handler))
> +           (run-start start))
> +       (while (< run-start end)
> +         (let ((value (get-text-property run-start prop))
> +               (run-end (next-single-property-change
> +                         run-start prop nil end)))
> +           (funcall fun value run-start run-end)

Running the hook functions within with-silent-modifications sounds
dangerous since they may make modifications which shouldn't be ignored
(only the hooks can know).

> +      (if (eq yank-excluded-properties t)
> +       (set-text-properties start end nil)
> +     (remove-list-of-text-properties start end yank-excluded-properties)))))
 
This is the part that needs to be wrapped.


        Stefan