5ddd3e5a75fe

--- a/stumpwmrc	Wed Jul 25 15:29:36 2018 +0000
+++ b/stumpwmrc	Thu Jul 26 15:10:24 2018 +0000
@@ -14,6 +14,8 @@
       *input-window-gravity* :center
       *debug-level* 0
       *resize-increment* 50
+      *window-format* "(%n%m%20t)"
+      *window-name-source* :title
       *shell-program* "/bin/bash")
 
 
@@ -262,6 +264,9 @@
   ("H-W" "kill")
   ("H-BackSpace" "remove"))
 
+(define-top-keys ;; naming
+  ("H-'" "title"))
+
 (define-top-keys ;; screen
   ("H-F5" "exec xbacklight -dec 10")
   ("H-F6" "rotate-brightness")
@@ -311,7 +316,6 @@
      ("s-v" . "C-v"))))
 
 
-
 ;;;; Modeline -----------------------------------------------------------------
 (defun ensure-mode-line ()
   (when (not (stumpwm::head-mode-line (current-head)))