emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

scratch/pkg a0e61826a2c: Display a message for an unknown package during


From: Gerd Moellmann
Subject: scratch/pkg a0e61826a2c: Display a message for an unknown package during eval
Date: Tue, 19 Dec 2023 00:50:28 -0500 (EST)

branch: scratch/pkg
commit a0e61826a2c99afd394b30952633250f50abb25e
Author: Gerd Möllmann <gerd@gnu.org>
Commit: Gerd Möllmann <gerd@gnu.org>

    Display a message for an unknown package during eval
---
 lisp/progmodes/elisp-mode.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/lisp/progmodes/elisp-mode.el b/lisp/progmodes/elisp-mode.el
index deedaa64bd6..87e358863e5 100644
--- a/lisp/progmodes/elisp-mode.el
+++ b/lisp/progmodes/elisp-mode.el
@@ -1608,8 +1608,10 @@ POS specifies the starting position where EXP was found 
and defaults to point."
           (package (buffer-package (current-buffer))))
       (when (or (re-search-backward regexp nil t)
                 (re-search-forward regexp nil t))
-       (when-let (pkg (find-package (read (match-string 1))))
-         (setq package pkg)))
+        (let ((name (read (match-string 1))))
+         (if-let (pkg (find-package name))
+             (setq package pkg)
+            (message "in-package: unknown package %S" name))))
       package)))
 
 (defun eval-last-sexp (eval-last-sexp-arg-internal)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]