[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master a2f9da4: Remove left over code from when we used an
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] master a2f9da4: Remove left over code from when we used an obsolete/loaddefs.el file |
Date: |
Mon, 13 Apr 2015 14:41:38 +0000 |
branch: master
commit a2f9da45c4f49918d100627ce0198cd593a0bf15
Author: Stefan Monnier <address@hidden>
Commit: Stefan Monnier <address@hidden>
Remove left over code from when we used an obsolete/loaddefs.el file
* lisp/subr.el (do-after-load-evaluation): Remove left over code from when
we used an obsolete/loaddefs.el file.
---
lisp/subr.el | 4 +---
1 files changed, 1 insertions(+), 3 deletions(-)
diff --git a/lisp/subr.el b/lisp/subr.el
index 3b536f2..03d12fe 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -3943,9 +3943,7 @@ This function is called directly from the C code."
;; discard the file name regexp
(mapc #'funcall (cdr a-l-element))))
;; Complain when the user uses obsolete files.
- (when (save-match-data
- (and (string-match "/obsolete/\\([^/]*\\)\\'" abs-file)
- (not (equal "loaddefs.el" (match-string 1 abs-file)))))
+ (when (string-match-p "/obsolete/\\([^/]*\\)\\'" abs-file)
;; Maybe we should just use display-warning? This seems yucky...
(let* ((file (file-name-nondirectory abs-file))
(msg (format "Package %s is obsolete!"
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master a2f9da4: Remove left over code from when we used an obsolete/loaddefs.el file,
Stefan Monnier <=