Mercurial > emacs

changeset 73722:ccbdd770cd62

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(read-feature): Don't complete features not loaded from a file (which make `unload-feature' to fail).
author Juanma Barranquero <lekktu@gmail.com>
date Sun, 05 Nov 2006 20:52:37 +0000
parents 4fd71901f11b
children 2154ac781f68
files lisp/loadhist.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/loadhist.el	Sun Nov 05 20:16:02 2006 +0000
+++ b/lisp/loadhist.el	Sun Nov 05 20:52:37 2006 +0000
@@ -119,7 +119,9 @@
 			   (mapcar (lambda (feature)
 				     (list (symbol-name feature)))
 				   features)
-			   nil t)))
+			   ;; Complete only features loaded from a file
+			   #'(lambda (f) (feature-file (intern (car f))))
+			   t)))
 
 (defvaralias 'loadhist-hook-functions 'unload-feature-special-hooks)
 (defvar unload-feature-special-hooks