From efb06ee42fb85b93facc52a197e6df3de2af9080 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Tue, 21 May 2019 17:17:23 -0400 Subject: [PATCH] Improve deprecation warnings for modules Hopefully makes them easier to understand. --- core/core-modules.el | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/core/core-modules.el b/core/core-modules.el index 087bd7783..a00587b23 100644 --- a/core/core-modules.el +++ b/core/core-modules.el @@ -349,9 +349,12 @@ to least)." (new (assq module obsolete))) (let ((newkeys (cdr new))) (if (null newkeys) - (message "WARNING %s is deprecated" key) - (message "WARNING %s is deprecated, enabling %s instead" - (list category module) newkeys) + (message "WARNING %s module was removed" key) + (if (cdr newkeys) + (message "WARNING %s module was removed and split into the %s modules" + (list category module) (mapconcat #'prin1-to-string newkeys ", ")) + (message "WARNING %s module was moved to %s" + (list category module) (car newkeys))) (push category modules) (dolist (key newkeys) (push (if flags