[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 370a862 18/24: Repurpose `hydra--complain' for debugging
From: |
Oleh Krehel |
Subject: |
[elpa] master 370a862 18/24: Repurpose `hydra--complain' for debugging |
Date: |
Fri, 01 May 2015 14:27:20 +0000 |
branch: master
commit 370a862f10a8a4f877a7e922f023ba26dc638714
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>
Repurpose `hydra--complain' for debugging
hydra.el (hydra--complain): Forward to either `error' or `message'.
* lv.el (lv-use-separator): Fixup doc.
---
hydra.el | 7 ++++---
lv.el | 2 +-
2 files changed, 5 insertions(+), 4 deletions(-)
diff --git a/hydra.el b/hydra.el
index f94cdd4..edc24a2 100644
--- a/hydra.el
+++ b/hydra.el
@@ -519,8 +519,9 @@ The expressions can be auto-expanded according to NAME."
(defun hydra--complain (format-string &rest args)
"Forward to (`message' FORMAT-STRING ARGS) unless `hydra-verbose' is nil."
- (when hydra-verbose
- (apply #'warn format-string args)))
+ (if hydra-verbose
+ (apply #'error format-string args)
+ (apply #'message format-string args)))
(defun hydra--doc (body-key body-name heads)
"Generate a part of Hydra docstring.
@@ -961,7 +962,7 @@ result of `defhydra'."
(or body-body-pre body-pre) body-before-exit
'(setq prefix-arg current-prefix-arg)))))
(error
- (message "Error in defhydra %S: %s" name (cdr err))
+ (hydra--complain "Error in defhydra %S: %s" name (cdr err))
nil)))
(defmacro defhydradio (name _body &rest heads)
diff --git a/lv.el b/lv.el
index 4634757..a548d7d 100644
--- a/lv.el
+++ b/lv.el
@@ -39,7 +39,7 @@
:group 'hydra)
(defcustom lv-use-separator nil
- "Whether to draw a line between the lv window and the echo area."
+ "Whether to draw a line between the LV window and the Echo Area."
:group 'lv
:type 'boolean)
- [elpa] master 824f105 12/24: Optionally separate lv window and echo area using a thin line, (continued)
- [elpa] master 824f105 12/24: Optionally separate lv window and echo area using a thin line, Oleh Krehel, 2015/05/01
- [elpa] master dd02b16 13/24: .dir-locals.el: Add, Oleh Krehel, 2015/05/01
- [elpa] master bf48e63 14/24: lv.el (lv-force-update): Be nil by default, Oleh Krehel, 2015/05/01
- [elpa] master 0ae560a 15/24: lv.el (lv-message): Use `lv-use-separator', Oleh Krehel, 2015/05/01
- [elpa] master 270c38b 16/24: Add a work-around for pop-to-buffer / dedicated bug, Oleh Krehel, 2015/05/01
- [elpa] master 8db62bf 17/24: Make *LV* window fixed size, Oleh Krehel, 2015/05/01
- [elpa] master 6524a2c 19/24: hydra.el (hydra-fontify-head-default): Fixup, Oleh Krehel, 2015/05/01
- [elpa] master 319ac87 20/24: hydra.el (hydra-key-format-spec): Declare obsolete, Oleh Krehel, 2015/05/01
- [elpa] master c78367f 21/24: hydra.el (hydra-cell-format): Change to defvar, Oleh Krehel, 2015/05/01
- [elpa] master 2bc9146 22/24: hydra.el: Use add/remove-function. Fix warning., Oleh Krehel, 2015/05/01
- [elpa] master 370a862 18/24: Repurpose `hydra--complain' for debugging,
Oleh Krehel <=
- [elpa] master 1380f8c 23/24: hydra.el: Bump version, Oleh Krehel, 2015/05/01
- [elpa] master fddedd2 24/24: Merge commit '1380f8c1a51f31514125a08f632d017cdfb8e26e' from hydra, Oleh Krehel, 2015/05/01