Mercurial > emacs
comparison lisp/progmodes/cc-defs.el @ 88011:670e666fb738
(c-save-buffer-state): Bind buffer-file-name and buffer-file-truename to
nil, to prevent primitives generating "buffer is read only" messages.
author | Alan Mackenzie <acm@muc.de> |
---|---|
date | Sat, 26 Jan 2008 20:28:46 +0000 |
parents | 107ccd98fa12 |
children | 6261d56c5984 |
comparison
equal
deleted
inserted
replaced
88010:9d2588ddfc8d | 88011:670e666fb738 |
---|---|
423 The return value is the value of the last form in BODY." | 423 The return value is the value of the last form in BODY." |
424 `(let* ((modified (buffer-modified-p)) (buffer-undo-list t) | 424 `(let* ((modified (buffer-modified-p)) (buffer-undo-list t) |
425 (inhibit-read-only t) (inhibit-point-motion-hooks t) | 425 (inhibit-read-only t) (inhibit-point-motion-hooks t) |
426 before-change-functions after-change-functions | 426 before-change-functions after-change-functions |
427 deactivate-mark | 427 deactivate-mark |
428 buffer-file-name buffer-file-truename ; Prevent primitives checking | |
429 ; for file modification | |
428 ,@varlist) | 430 ,@varlist) |
429 (unwind-protect | 431 (unwind-protect |
430 (progn ,@body) | 432 (progn ,@body) |
431 (and (not modified) | 433 (and (not modified) |
432 (buffer-modified-p) | 434 (buffer-modified-p) |