[Emacs-diffs] Changes to emacs/lisp/ffap.el,v

[Miles Bader]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Miles Bader <miles>     08/01/08 20:46:54

Index: lisp/ffap.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/ffap.el,v
retrieving revision 1.67
retrieving revision 1.68
diff -u -b -r1.67 -r1.68
--- lisp/ffap.el        29 Nov 2007 04:25:49 -0000      1.67
+++ lisp/ffap.el        8 Jan 2008 20:44:45 -0000       1.68
@@ -1,7 +1,7 @@
 ;;; ffap.el --- find file (or url) at point
 
 ;; Copyright (C) 1995, 1996, 1997, 2000, 2001, 2002, 2003, 2004,
-;;   2005, 2006, 2007 Free Software Foundation, Inc.
+;;   2005, 2006, 2007, 2008 Free Software Foundation, Inc.
 
 ;; Author: Michelangelo Grigni <address@hidden>
 ;; Maintainer: FSF
@@ -1262,7 +1262,11 @@
                    ))
          (setq dir (file-name-directory guess))))
     (let ((minibuffer-completing-file-name t)
-         (completion-ignore-case read-file-name-completion-ignore-case))
+         (completion-ignore-case read-file-name-completion-ignore-case)
+         ;; because of `rfn-eshadow-update-overlay'.
+         (file-name-handler-alist
+          (cons (cons ffap-url-regexp 'url-file-handler)
+                file-name-handler-alist)))
       (setq guess
            (completing-read
             prompt