[STUMP] [PATCH] Add set-frame-indicator-border-color for doing just that.

[John Li]

Also added a bit of docs on the frame indicator.
---

I've set all my stump colors to cyan, black, or grey - but my frame
indicator border was white. This clashed horribly and made me sad. Now
I can set it gray and life RULES.

 screen.lisp     |    8 +++++++-
 stumpwm.texi.in |   17 ++++++++++++++++-
 2 files changed, 23 insertions(+), 2 deletions(-)

diff --git a/screen.lisp b/screen.lisp
index 4be2598..64e3de3 100644
--- a/screen.lisp
+++ b/screen.lisp
@@ -36,7 +36,8 @@
           set-unfocus-color
           set-msg-border-width
           set-frame-outline-width
-          set-font))
+          set-font
+          set-frame-indicator-border-color))
 
 ;; Screen helper functions
 
@@ -320,6 +321,11 @@ (defun set-font (font)
             (sync-mode-line (head-mode-line h))))))
     t))
 
+(defun set-frame-indicator-border-color (color)
+  "Set the frame indicator border color."
+  (dolist (s *screen-list*)
+    (setf (xlib:window-border (screen-frame-window s)) (alloc-color s color))))
+
 (defmacro with-current-screen (screen &body body)
   "A macro to help us out with early set up."
   `(let ((*screen-list* (list ,screen)))
diff --git a/stumpwm.texi.in b/stumpwm.texi.in
index 4b622b4..8aaea87 100644
--- a/stumpwm.texi.in
+++ b/stumpwm.texi.in
@@ -835,6 +835,7 @@ window pool, where windows and frames are not so tightly 
connected.
 @menu
 * Interactively Resizing Frames::  
 * Frame Dumping::               
+* Frame Indicator::
 @end menu
 
 @node Interactively Resizing Frames, Frame Dumping, Frames, Frames
@@ -880,7 +881,7 @@ Select the highlighted option.
 
 ### *resize-increment*
 
address@hidden Frame Dumping,  , Interactively Resizing Frames, Frames
address@hidden Frame Dumping, Frame Indicator, Interactively Resizing Frames, 
Frames
 @section Frame Dumping
 The configuration of frames and groups can be saved and restored using
 the following commands.
@@ -894,6 +895,20 @@ the following commands.
 !!! restore-from-file
 !!! place-existing-windows
 
address@hidden Frame Indicator,  , Frame Dumping, Frames
address@hidden Frame Indicator
+The frame indicator is displayed when the user switches frames. It's
+handy for easily seeing what the newly focused frame is, especially if
+your window border is thin or the border color doesn't strongly
+contrast the window color.
+
+!!! curframe
+!!! set-frame-indicator-border-color
+
+### *timeout-frame-indicator-wait*
+### *suppress-frame-indicator*
+### *frame-indicator-text*
+
 @node Mode-line, Groups, Frames, Top
 @chapter The Mode Line
 The mode line is a bar that runs across either the top or bottom of
-- 
1.5.6.3