[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)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- scratch/pkg a0e61826a2c: Display a message for an unknown package during eval,
Gerd Moellmann <=