Mercurial > emacs
comparison lisp/progmodes/cc-defs.el @ 79934:225355012caa
(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 19:59:10 +0000 |
| parents | a1342e6e097a |
| children | d9dc3f33d70b |
comparison
equal
deleted
inserted
replaced
| 79933:01ddee5ce44d | 79934:225355012caa |
|---|---|
| 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) |