[Emacs-diffs] Changes to emacs/lisp/font-lock.el

[Stefan Monnier]

Index: emacs/lisp/font-lock.el
diff -c emacs/lisp/font-lock.el:1.188 emacs/lisp/font-lock.el:1.189
*** emacs/lisp/font-lock.el:1.188       Mon Dec 31 15:16:46 2001
--- emacs/lisp/font-lock.el     Fri Feb  8 11:50:05 2002
***************
*** 683,690 ****
                      (inhibit-modification-hooks t)
                      deactivate-mark buffer-file-name buffer-file-truename))
         ,@body
!        (when (and (not modified) (buffer-modified-p))
!        (set-buffer-modified-p nil))))
    (put 'save-buffer-state 'lisp-indent-function 1)
    (def-edebug-spec save-buffer-state let)
    ;;
--- 683,690 ----
                      (inhibit-modification-hooks t)
                      deactivate-mark buffer-file-name buffer-file-truename))
         ,@body
!        (unless modified
!        (restore-buffer-modified-p nil))))
    (put 'save-buffer-state 'lisp-indent-function 1)
    (def-edebug-spec save-buffer-state let)
    ;;
***************
*** 2405,2411 ****
              font-lock-warning-face
            font-lock-string-face))
        (goto-char (nth 8 state))
!       (if (looking-at "/\\*\\*\n") font-lock-doc-face 
font-lock-comment-face))))
  
  (defvar c-font-lock-keywords c-font-lock-keywords-1
    "Default expressions to highlight in C mode.
--- 2405,2413 ----
              font-lock-warning-face
            font-lock-string-face))
        (goto-char (nth 8 state))
!       ;; `doxygen' uses /*! while others use /**.
!       (if (looking-at "/\\*[*!]\n")
!         font-lock-doc-face font-lock-comment-face))))
  
  (defvar c-font-lock-keywords c-font-lock-keywords-1
    "Default expressions to highlight in C mode.