diff options
| author | Gerd Moellmann <gerd@gnu.org> | 2001-04-30 14:57:35 +0000 |
|---|---|---|
| committer | Gerd Moellmann <gerd@gnu.org> | 2001-04-30 14:57:35 +0000 |
| commit | 38d56be353507d0b9aebbe63d5fb7f9a17b4b593 (patch) | |
| tree | 9e6492b08c1128dee33318ec224f76fb8c1d4d8c /src/undo.c | |
| parent | c95fc5f1b93d02b595eb7f3add9dffd692dcbc83 (diff) | |
| download | emacs-38d56be353507d0b9aebbe63d5fb7f9a17b4b593.tar.gz | |
(Fprimitive_undo): In a writable buffer, enable undoing
read-only text that is so because of text properties.
Diffstat (limited to 'src/undo.c')
| -rw-r--r-- | src/undo.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/undo.c b/src/undo.c index d2a5590a193..83c2327a8db 100644 --- a/src/undo.c +++ b/src/undo.c @@ -412,8 +412,9 @@ Return what remains of the list.") next = Qnil; GCPRO2 (next, list); - /* Don't let read-only properties interfere with undo. */ - if (!NILP (current_buffer->read_only)) + /* In a writable buffer, enable undoing read-only text that is so + because of text properties. */ + if (NILP (current_buffer->read_only)) specbind (Qinhibit_read_only, Qt); /* Don't let `intangible' properties interfere with undo. */ |