diff options
author | jao <jao@gnu.org> | 2024-04-12 20:16:28 +0100 |
---|---|---|
committer | jao <jao@gnu.org> | 2024-04-12 20:16:28 +0100 |
commit | f82eb0bc8504ad39184e711849e7bd951b50cf77 (patch) | |
tree | 532abf2b0ec1068377bc31a2e2065479a54ba26c /lib/eos/jao-ednc.el | |
parent | 9e551f916cf0f357b43e6be79f55a7173a0ffe2c (diff) | |
download | elibs-f82eb0bc8504ad39184e711849e7bd951b50cf77.tar.gz elibs-f82eb0bc8504ad39184e711849e7bd951b50cf77.tar.bz2 |
ednc nits
Diffstat (limited to 'lib/eos/jao-ednc.el')
-rw-r--r-- | lib/eos/jao-ednc.el | 20 |
1 files changed, 9 insertions, 11 deletions
diff --git a/lib/eos/jao-ednc.el b/lib/eos/jao-ednc.el index ccd098e..92ee21f 100644 --- a/lib/eos/jao-ednc.el +++ b/lib/eos/jao-ednc.el @@ -91,7 +91,6 @@ (when old (funcall (jao-ednc--handler old) old nil)) (when new (funcall (jao-ednc--handler new) new t))) -;;;###autoload (defun jao-ednc-setup (minibuffer-order) (setq jao-notify-use-messages t) (with-eval-after-load "tracking" @@ -104,19 +103,16 @@ (add-hook 'ednc-notification-presentation-functions #'jao-ednc--on-notify) (ednc-mode)) -;;;###autoload (defun jao-ednc-pop () (interactive) (pop-to-buffer-same-window ednc-log-name)) -;;;###autoload (defun jao-ednc-show () (interactive) (if (not (jao-ednc--last-notification)) (jao-ednc-pop) (jao-ednc--show-last))) -;;;###autoload (defun jao-ednc-invoke-last-action () (interactive) (if (jao-ednc--last-notification) @@ -124,18 +120,20 @@ (message "No active notifications")) (jao-ednc--clean)) -;;;###autoload (defun jao-ednc-dismiss () (interactive) + (when (jao-ednc--last-notification) + (ignore-errors + (with-current-buffer ednc-log-name + (ednc-dismiss-notification (jao-ednc--last-notification))))) + (jao-ednc--clean)) + +(defun jao-ednc-dismiss-and-show () + (interactive) (let ((m (jao-ednc--format-last))) - (when (jao-ednc--last-notification) - (ignore-errors - (with-current-buffer ednc-log-name - (ednc-dismiss-notification (jao-ednc--last-notification))))) - (jao-ednc--clean) + (jao-ednc-dismiss) (when m (message m)))) -;;;###autoload (defun jao-ednc-dismiss-all () (interactive) (while (jao-ednc--last-notification) |