683 |
(inhibit-modification-hooks t) |
(inhibit-modification-hooks t) |
684 |
deactivate-mark buffer-file-name buffer-file-truename)) |
deactivate-mark buffer-file-name buffer-file-truename)) |
685 |
,@body |
,@body |
686 |
(when (and (not modified) (buffer-modified-p)) |
(unless modified |
687 |
(set-buffer-modified-p nil)))) |
(restore-buffer-modified-p nil)))) |
688 |
(put 'save-buffer-state 'lisp-indent-function 1) |
(put 'save-buffer-state 'lisp-indent-function 1) |
689 |
(def-edebug-spec save-buffer-state let) |
(def-edebug-spec save-buffer-state let) |
690 |
;; |
;; |
2405 |
font-lock-warning-face |
font-lock-warning-face |
2406 |
font-lock-string-face)) |
font-lock-string-face)) |
2407 |
(goto-char (nth 8 state)) |
(goto-char (nth 8 state)) |
2408 |
(if (looking-at "/\\*\\*\n") font-lock-doc-face font-lock-comment-face)))) |
;; `doxygen' uses /*! while others use /**. |
2409 |
|
(if (looking-at "/\\*[*!]\n") |
2410 |
|
font-lock-doc-face font-lock-comment-face)))) |
2411 |
|
|
2412 |
(defvar c-font-lock-keywords c-font-lock-keywords-1 |
(defvar c-font-lock-keywords c-font-lock-keywords-1 |
2413 |
"Default expressions to highlight in C mode. |
"Default expressions to highlight in C mode. |