about summary refs log tree commit diff
path: root/exwm-core.el
diff options
context:
space:
mode:
authorAdrián Medraño Calvo <adrian@medranocalvo.com>2018-08-13T12·00+0000
committerAdrián Medraño Calvo <adrian@medranocalvo.com>2018-08-13T12·00+0000
commitac600f091630480188932ad8d2ee315c8ee84c8e (patch)
tree9762e1f440317aca9051b2ee4bb0e2226aa23e11 /exwm-core.el
parent8d15a39c4d4928d9bc38bed63e2bb85e4536af45 (diff)
Commands for interacting with the log buffer remotely
* exwm-debug.el (exwm-debug--clear, exwm-debug--mark): New
functions.
Diffstat (limited to 'exwm-core.el')
-rw-r--r--exwm-core.el5
1 files changed, 5 insertions, 0 deletions
diff --git a/exwm-core.el b/exwm-core.el
index 66b79171f068..5c501e4e3fb7 100644
--- a/exwm-core.el
+++ b/exwm-core.el
@@ -290,6 +290,11 @@ least SECS seconds later."
                    (/= ,i exwm-workspace-current-index)])
                (number-sequence 0 (1- (exwm-workspace--count))))))))
 
+(exwm--debug
+  (let ((map exwm-mode-map))
+    (define-key map "\C-c\C-l" #'exwm-debug--clear)
+    (define-key map "\C-c\C-m" #'exwm-debug--mark)))
+
 (define-derived-mode exwm-mode nil "EXWM"
   "Major mode for managing X windows.