b99b818e2725

More
[view raw] [browse files]
author Steve Losh <steve@stevelosh.com>
date Mon, 09 Sep 2019 10:08:13 -0400
parents 9d8af88da734
children b31a16ffe5a1
branches/tags (none)
files stumpwmrc

Changes

--- a/stumpwmrc	Mon Aug 26 18:29:46 2019 -0400
+++ b/stumpwmrc	Mon Sep 09 10:08:13 2019 -0400
@@ -59,12 +59,14 @@
   (stumpwm::tile-group-current-frame (current-group)))
 
 
-(defun debug-log (&rest args)
+(defun debug-log (string &rest args)
   (with-open-file (s "/home/sjl/stumpwm.debug.log"
                      :direction :output
                      :if-exists :append
                      :if-does-not-exist :create)
-    (apply #'format s args)))
+    (apply #'format s string args)
+    (fresh-line s))
+  (first args))
 
 
 (defun keywordize (string)
@@ -543,6 +545,7 @@
   ("F34" "prev-in-frame"))
 
 
+
 ;; (stumpwm::unbind-remapped-keys)
 (define-remapped-keys
   '(("st-256color"