# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 988724039 0
# Node ID e71362bfa6953e20fb38a04b6c76ec5b9b4199e9
# Parent  d4b1acaf82b0f71001ed13b7eaa559c40aa9be8e
(diff-nonexistant-face): New face.
(diff-font-lock-keywords): Use it.

diff -r d4b1acaf82b0 -r e71362bfa695 lisp/diff-mode.el
--- a/lisp/diff-mode.el	Tue May 01 10:57:11 2001 +0000
+++ b/lisp/diff-mode.el	Tue May 01 13:33:59 2001 +0000
@@ -4,7 +4,6 @@
 
 ;; Author: Stefan Monnier <monnier@cs.yale.edu>
 ;; Keywords: patch diff
-;; Revision: $Id: diff-mode.el,v 1.35 2000/11/14 18:09:21 fx Exp $
 
 ;; This file is part of GNU Emacs.
 
@@ -250,12 +249,17 @@
   :group 'diff-mode)
 (defvar diff-context-face 'diff-context-face)
 
+(defface diff-nonexistant-face
+  '((t (:inherit diff-file-header-face)))
+  "`diff-mode' face used to highlight nonexistant files in recursive diffs."
+  :group 'diff-mode)
+(defvar diff-nonexistant-face 'diff-nonexistant-face)
+
 (defvar diff-font-lock-keywords
   '(("^\\(@@ -[0-9,]+ \\+[0-9,]+ @@\\)\\(.*\\)$" ;unified
      (1 diff-hunk-header-face)
      (2 diff-function-face))
-    ("^--- .+ ----$"		;context
-     . diff-hunk-header-face)
+    ("^--- .+ ----$" . diff-hunk-header-face) ;context
     ("\\(\\*\\{15\\}\\)\\(.*\\)$"	;context
      (1 diff-hunk-header-face)
      (2 diff-function-face))
@@ -267,6 +271,7 @@
     ("^[+>].*\n" . diff-added-face)
     ("^[-<].*\n" . diff-removed-face)
     ("^Index: \\(.+\\).*\n" (0 diff-header-face) (1 diff-index-face prepend))
+    ("^Only in .*\n" . diff-nonexistant-face)
     ("^#.*" . font-lock-string-face)
     ("^[^-=+*!<>].*\n" . diff-context-face)))