mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-16 17:24:23 +00:00
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.
This commit is contained in:
parent
2a72ae286d
commit
a2f9da45c4
1 changed files with 1 additions and 3 deletions
|
|
@ -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!"
|
||||
|
|
|
|||
Loading…
Reference in a new issue