Mercurial > emacs

changeset 29117:9906c04b247b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(ffap-highlight): Use facep rather than internal-find-face.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Tue, 23 May 2000 19:57:48 +0000
parents 194ae2469256
children cbc6a64048ee
files lisp/ffap.el
diffstat 1 files changed, 2 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ffap.el	Tue May 23 15:39:40 2000 +0000
+++ b/lisp/ffap.el	Tue May 23 19:57:48 2000 +0000
@@ -1,6 +1,6 @@
 ;;; ffap.el --- find file (or url) at point
 ;;
-;; Copyright (C) 1995, 1996, 1997 Free Software Foundation, Inc.
+;; Copyright (C) 1995, 96, 97, 2000  Free Software Foundation, Inc.
 ;;
 ;; Author: Michelangelo Grigni <mic@mathcs.emory.edu>
 ;; Created: 29 Mar 1993
@@ -1284,8 +1284,7 @@
     (setq ffap-highlight-overlay
 	  (apply 'make-overlay ffap-string-at-point-region))
     (overlay-put ffap-highlight-overlay 'face
-		      (if (internal-find-face 'ffap)
-			  'ffap 'highlight)))))
+		      (if (facep 'ffap) 'ffap 'highlight)))))
 
 
 ;;; Main Entrance (`find-file-at-point' == `ffap'):