[Emacs-diffs] Changes to emacs/lisp/subr.el,v

[Chong Yidong]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Chong Yidong <cyd>      07/02/09 23:09:16

Index: subr.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/subr.el,v
retrieving revision 1.545
retrieving revision 1.546
diff -u -b -r1.545 -r1.546
--- subr.el     21 Jan 2007 03:53:10 -0000      1.545
+++ subr.el     9 Feb 2007 23:09:16 -0000       1.546
@@ -2171,6 +2171,7 @@
                       (get-text-property 0 'yank-handler string)))
         (param (or (nth 1 handler) string))
         (opoint (point))
+        (inhibit-read-only inhibit-read-only)
         end)
 
     (setq yank-undo-function t)
@@ -2179,6 +2180,10 @@
       (insert param))
     (setq end (point))
 
+    ;; Prevent read-only properties from interfering with the
+    ;; following text property changes.
+    (setq inhibit-read-only t)
+
     ;; What should we do with `font-lock-face' properties?
     (if font-lock-defaults
        ;; No, just wipe them.