emacs-diffs
[Top][All Lists]
Advanced

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

emacs-29 dc3f85fd4b: Use proper types for Eshell warnings


From: Jim Porter
Subject: emacs-29 dc3f85fd4b: Use proper types for Eshell warnings
Date: Wed, 18 Jan 2023 12:15:50 -0500 (EST)

branch: emacs-29
commit dc3f85fd4b00b4f43d781eb5803a995019a57d57
Author: Jim Porter <jporterbugs@gmail.com>
Commit: Jim Porter <jporterbugs@gmail.com>

    Use proper types for Eshell warnings
    
    * lisp/eshell/esh-var.el (eshell-get-variable):
    * lisp/eshell/em-basic (eshell/echo): Don't use ':warning'; that's a
    warning level, not a warning type.
---
 lisp/eshell/em-basic.el | 3 ++-
 lisp/eshell/esh-var.el  | 7 ++++---
 2 files changed, 6 insertions(+), 4 deletions(-)

diff --git a/lisp/eshell/em-basic.el b/lisp/eshell/em-basic.el
index dfbe4db089..bfff3bdf56 100644
--- a/lisp/eshell/em-basic.el
+++ b/lisp/eshell/em-basic.el
@@ -132,7 +132,8 @@ or `eshell-printn' for display."
      ;; bug#27361.
      (when (equal output-newline '(nil))
        (display-warning
-        :warning "To terminate with a newline, you should use -N instead."))
+        '(eshell echo)
+        "To terminate with a newline, you should use -N instead."))
      (eshell-echo args output-newline))))
 
 (defun eshell/printnl (&rest args)
diff --git a/lisp/eshell/esh-var.el b/lisp/eshell/esh-var.el
index df1413c2de..dfc52083ac 100644
--- a/lisp/eshell/esh-var.el
+++ b/lisp/eshell/esh-var.el
@@ -613,9 +613,10 @@ If QUOTED is non-nil, this was invoked inside 
double-quotes."
               (if (or (eq max-arity 'many) (>= max-arity 2))
                   (funcall target indices quoted)
                 (display-warning
-                 :warning (concat "Function for `eshell-variable-aliases-list' 
"
-                                  "entry should accept two arguments: INDICES "
-                                  "and QUOTED.'"))
+                 '(eshell variable-alias)
+                 (concat "Function for `eshell-variable-aliases-list' "
+                         "entry should accept two arguments: INDICES "
+                         "and QUOTED.'"))
                 (funcall target indices)))))
          ((symbolp target)
           (eshell-apply-indices (symbol-value target) indices quoted))



reply via email to

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