Show message about debug level to be sure without reading documentation.
authorOleksandr Gavenko <gavenkoa@gmail.com>
Wed, 15 Feb 2017 00:01:59 +0200
changeset 1481 31b541b9ce3e
parent 1480 34b763cbc5cf
child 1482 d74af7d75f19
Show message about debug level to be sure without reading documentation.
.emacs-my
--- a/.emacs-my	Mon Feb 13 10:25:59 2017 +0200
+++ b/.emacs-my	Wed Feb 15 00:01:59 2017 +0200
@@ -79,7 +79,11 @@
     ;; Get trace when press C-g.
     (setq debug-on-quit lvl1)
     (setq debug-on-event lvl2)
-    (setq debug-on-signal lvl2)))
+    (setq debug-on-signal lvl2)
+    (cond
+     (lvl2 (message "Debugging on quit/event/signal..."))
+     (lvl1 (message "Debugging on quit..."))
+     (t (message "Debugging disabled...")))))
 
 (defun my/eval-buffer ()
   "Evaluate entire buffer with re-assigning values to `defvar' / `defcustom'.