eb02b7270d28

--- a/stumpwmrc	Wed Jul 25 20:33:35 2018 +0000
+++ b/stumpwmrc	Thu Jul 26 15:10:41 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")
 
 
@@ -263,6 +265,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")
@@ -312,7 +317,6 @@
      ("s-v" . "C-v"))))
 
 
-
 ;;;; Modeline -----------------------------------------------------------------
 (defun ensure-mode-line ()
   (when (not (stumpwm::head-mode-line (current-head)))