[clfswm-cvs] r435 - in clfswm: . doc src

Philippe Brochard pbrochard at common-lisp.net
Fri Mar 18 21:28:07 UTC 2011


Author: pbrochard
Date: Fri Mar 18 17:28:07 2011
New Revision: 435

Log:
src/clfswm-autodoc.lisp (produce-conf-var-doc-html): Produce a documentation for all configurable variables in CLFSWM - HTML version.

Added:
   clfswm/doc/variables.html
Modified:
   clfswm/ChangeLog
   clfswm/doc/corner.html
   clfswm/doc/corner.txt
   clfswm/doc/keys.html
   clfswm/doc/keys.txt
   clfswm/doc/menu.html
   clfswm/doc/menu.txt
   clfswm/doc/variables.txt
   clfswm/src/clfswm-autodoc.lisp
   clfswm/src/clfswm-internal.lisp
   clfswm/src/my-html.lisp
   clfswm/src/tools.lisp

Modified: clfswm/ChangeLog
==============================================================================
--- clfswm/ChangeLog	(original)
+++ clfswm/ChangeLog	Fri Mar 18 17:28:07 2011
@@ -1,3 +1,12 @@
+2011-03-18  Philippe Brochard  <pbrochard at common-lisp.net>
+
+	* src/clfswm-autodoc.lisp (produce-conf-var-doc-html): Produce a
+	documentation for all configurable variables in CLFSWM -
+	HTML version.
+
+	* src/clfswm-internal.lisp (leave-frame): Hide all children except
+	the current window.
+
 2011-03-16  Philippe Brochard  <pbrochard at common-lisp.net>
 
 	* src/clfswm-autodoc.lisp (produce-all-docs): Produce a

Modified: clfswm/doc/corner.html
==============================================================================
--- clfswm/doc/corner.html	(original)
+++ clfswm/doc/corner.html	Fri Mar 18 17:28:07 2011
@@ -120,7 +120,7 @@
           Bottom-Left:
         </td>
         <td style="color:#0000ff" nowrap>
-          Start the file manager
+          ---
         </td>
       </tr>
     </table>

Modified: clfswm/doc/corner.txt
==============================================================================
--- clfswm/doc/corner.txt	(original)
+++ clfswm/doc/corner.txt	Fri Mar 18 17:28:07 2011
@@ -16,7 +16,7 @@
   Top-Left: Hide/Unhide a terminal
   Top-Right: Close or kill the current window (ask before doing anything)
   Bottom-Right: Present all windows in all frames (An expose like)
-  Bottom-Left: Start the file manager
+  Bottom-Left: ---
 
 *Corner-Second-Mode-Left-Button*:
   Top-Left: ---
@@ -38,7 +38,7 @@
 
 
 This documentation was produced with the CLFSWM auto-doc functions.
-To reproduce it, use the produce-menu-doc-in-file or
+To reproduce it, use the produce-corner-doc-in-file or
 the produce-all-docs function from the Lisp REPL.
 
 Something like this:

Modified: clfswm/doc/keys.html
==============================================================================
--- clfswm/doc/keys.html	(original)
+++ clfswm/doc/keys.html	Fri Mar 18 17:28:07 2011
@@ -365,7 +365,7 @@
            Mod-1 
         </td>
         <td align="center" nowrap>
-          Ccedilla
+          1
         </td>
         <td style="color:#0000ff" nowrap>
           Bind or jump to a slot (a frame or a window)
@@ -376,7 +376,7 @@
            Mod-1 
         </td>
         <td align="center" nowrap>
-          Underscore
+          2
         </td>
         <td style="color:#0000ff" nowrap>
           Bind or jump to a slot (a frame or a window)
@@ -387,7 +387,7 @@
            Mod-1 
         </td>
         <td align="center" nowrap>
-          Egrave
+          3
         </td>
         <td style="color:#0000ff" nowrap>
           Bind or jump to a slot (a frame or a window)
@@ -398,7 +398,7 @@
            Mod-1 
         </td>
         <td align="center" nowrap>
-          Minus
+          4
         </td>
         <td style="color:#0000ff" nowrap>
           Bind or jump to a slot (a frame or a window)
@@ -409,7 +409,7 @@
            Mod-1 
         </td>
         <td align="center" nowrap>
-          Parenleft
+          5
         </td>
         <td style="color:#0000ff" nowrap>
           Bind or jump to a slot (a frame or a window)
@@ -420,7 +420,7 @@
            Mod-1 
         </td>
         <td align="center" nowrap>
-          Quoteright
+          6
         </td>
         <td style="color:#0000ff" nowrap>
           Bind or jump to a slot (a frame or a window)
@@ -431,7 +431,7 @@
            Mod-1 
         </td>
         <td align="center" nowrap>
-          Quotedbl
+          7
         </td>
         <td style="color:#0000ff" nowrap>
           Bind or jump to a slot (a frame or a window)
@@ -442,7 +442,7 @@
            Mod-1 
         </td>
         <td align="center" nowrap>
-          Eacute
+          8
         </td>
         <td style="color:#0000ff" nowrap>
           Bind or jump to a slot (a frame or a window)
@@ -453,7 +453,7 @@
            Mod-1 
         </td>
         <td align="center" nowrap>
-          Ampersand
+          9
         </td>
         <td style="color:#0000ff" nowrap>
           Bind or jump to a slot (a frame or a window)
@@ -464,111 +464,12 @@
            Mod-1 
         </td>
         <td align="center" nowrap>
-          F2
-        </td>
-        <td style="color:#0000ff" nowrap>
-          Open the Music Player Daemon (MPD) menu
-        </td>
-      </tr>
-      <tr>
-        <td align="right" style="color:#ff0000" nowrap>
-           Mod-1 
-        </td>
-        <td align="center" nowrap>
-          Agrave
+          0
         </td>
         <td style="color:#0000ff" nowrap>
           Bind or jump to a slot (a frame or a window)
         </td>
       </tr>
-      <tr>
-        <td align="right" style="color:#ff0000" nowrap>
-          
-        </td>
-        <td align="center" nowrap>
-          Pause
-        </td>
-        <td style="color:#0000ff" nowrap>
-          Open the Reboot/Halt menu
-        </td>
-      </tr>
-      <tr>
-        <td align="right" style="color:#ff0000" nowrap>
-          
-        </td>
-        <td align="center" nowrap>
-          Xf86audiomute
-        </td>
-        <td style="color:#0000ff" nowrap>
-          Toggle mute.
-        </td>
-      </tr>
-      <tr>
-        <td align="right" style="color:#ff0000" nowrap>
-          
-        </td>
-        <td align="center" nowrap>
-          Xf86audiolowervolume
-        </td>
-        <td style="color:#0000ff" nowrap>
-          Lower volume.
-        </td>
-      </tr>
-      <tr>
-        <td align="right" style="color:#ff0000" nowrap>
-          
-        </td>
-        <td align="center" nowrap>
-          Xf86audioraisevolume
-        </td>
-        <td style="color:#0000ff" nowrap>
-          Raise volume.
-        </td>
-      </tr>
-      <tr>
-        <td align="right" style="color:#ff0000" nowrap>
-          
-        </td>
-        <td align="center" nowrap>
-          Control_r
-        </td>
-        <td style="color:#0000ff" nowrap>
-          Move the pointer to the lower right corner of the screen
-        </td>
-      </tr>
-      <tr>
-        <td align="right" style="color:#ff0000" nowrap>
-           Control 
-        </td>
-        <td align="center" nowrap>
-          66
-        </td>
-        <td style="color:#0000ff" nowrap>
-          Present all windows in the current child (An expose like)
-        </td>
-      </tr>
-      <tr>
-        <td align="right" style="color:#ff0000" nowrap>
-           Mod-1  Control 
-        </td>
-        <td align="center" nowrap>
-          66
-        </td>
-        <td style="color:#0000ff" nowrap>
-          Present all windows in the current frame (An expose like)
-        </td>
-      </tr>
-      <tr>
-        <td align="right" style="color:#ff0000" nowrap>
-           Control  Shift 
-        </td>
-        <td align="center" nowrap>
-          66
-        </td>
-        <td style="color:#0000ff" nowrap>
-          Present all windows in all frames (An expose like)
-        </td>
-      </tr>
     </table>
     <h3>
       <u>
@@ -747,7 +648,7 @@
           Less
         </td>
         <td style="color:#0000ff" nowrap>
-          Lower 1% volume.
+          Open the main menu
         </td>
       </tr>
       <tr>
@@ -1426,7 +1327,7 @@
            Mod-1 
         </td>
         <td align="center" nowrap>
-          Ccedilla
+          1
         </td>
         <td style="color:#0000ff" nowrap>
           Bind or jump to a slot (a frame or a window)
@@ -1437,7 +1338,7 @@
            Mod-1 
         </td>
         <td align="center" nowrap>
-          Underscore
+          2
         </td>
         <td style="color:#0000ff" nowrap>
           Bind or jump to a slot (a frame or a window)
@@ -1448,7 +1349,7 @@
            Mod-1 
         </td>
         <td align="center" nowrap>
-          Egrave
+          3
         </td>
         <td style="color:#0000ff" nowrap>
           Bind or jump to a slot (a frame or a window)
@@ -1459,7 +1360,7 @@
            Mod-1 
         </td>
         <td align="center" nowrap>
-          Minus
+          4
         </td>
         <td style="color:#0000ff" nowrap>
           Bind or jump to a slot (a frame or a window)
@@ -1470,7 +1371,7 @@
            Mod-1 
         </td>
         <td align="center" nowrap>
-          Parenleft
+          5
         </td>
         <td style="color:#0000ff" nowrap>
           Bind or jump to a slot (a frame or a window)
@@ -1481,7 +1382,7 @@
            Mod-1 
         </td>
         <td align="center" nowrap>
-          Quoteright
+          6
         </td>
         <td style="color:#0000ff" nowrap>
           Bind or jump to a slot (a frame or a window)
@@ -1492,7 +1393,7 @@
            Mod-1 
         </td>
         <td align="center" nowrap>
-          Quotedbl
+          7
         </td>
         <td style="color:#0000ff" nowrap>
           Bind or jump to a slot (a frame or a window)
@@ -1503,7 +1404,7 @@
            Mod-1 
         </td>
         <td align="center" nowrap>
-          Eacute
+          8
         </td>
         <td style="color:#0000ff" nowrap>
           Bind or jump to a slot (a frame or a window)
@@ -1514,7 +1415,7 @@
            Mod-1 
         </td>
         <td align="center" nowrap>
-          Ampersand
+          9
         </td>
         <td style="color:#0000ff" nowrap>
           Bind or jump to a slot (a frame or a window)
@@ -1522,148 +1423,15 @@
       </tr>
       <tr>
         <td align="right" style="color:#ff0000" nowrap>
-          
-        </td>
-        <td align="center" nowrap>
-          Twosuperior
-        </td>
-        <td style="color:#0000ff" nowrap>
-          Move the pointer to the lower right corner of the screen
-        </td>
-      </tr>
-      <tr>
-        <td align="right" style="color:#ff0000" nowrap>
            Mod-1 
         </td>
         <td align="center" nowrap>
-          Agrave
+          0
         </td>
         <td style="color:#0000ff" nowrap>
           Bind or jump to a slot (a frame or a window)
         </td>
       </tr>
-      <tr>
-        <td align="right" style="color:#ff0000" nowrap>
-          
-        </td>
-        <td align="center" nowrap>
-          Xf86audiomute
-        </td>
-        <td style="color:#0000ff" nowrap>
-          Toggle mute.
-        </td>
-      </tr>
-      <tr>
-        <td align="right" style="color:#ff0000" nowrap>
-          
-        </td>
-        <td align="center" nowrap>
-          Xf86audiolowervolume
-        </td>
-        <td style="color:#0000ff" nowrap>
-          Lower volume.
-        </td>
-      </tr>
-      <tr>
-        <td align="right" style="color:#ff0000" nowrap>
-          
-        </td>
-        <td align="center" nowrap>
-          Xf86audioraisevolume
-        </td>
-        <td style="color:#0000ff" nowrap>
-          Raise volume.
-        </td>
-      </tr>
-      <tr>
-        <td align="right" style="color:#ff0000" nowrap>
-          
-        </td>
-        <td align="center" nowrap>
-          Greater
-        </td>
-        <td style="color:#0000ff" nowrap>
-          Raise 1% volume.
-        </td>
-      </tr>
-      <tr>
-        <td align="right" style="color:#ff0000" nowrap>
-          
-        </td>
-        <td align="center" nowrap>
-          Space
-        </td>
-        <td style="color:#0000ff" nowrap>
-          start the file manager
-        </td>
-      </tr>
-      <tr>
-        <td align="right" style="color:#ff0000" nowrap>
-          
-        </td>
-        <td align="center" nowrap>
-          Z
-        </td>
-        <td style="color:#0000ff" nowrap>
-          start the web browser
-        </td>
-      </tr>
-      <tr>
-        <td align="right" style="color:#ff0000" nowrap>
-           Shift 
-        </td>
-        <td align="center" nowrap>
-          Z
-        </td>
-        <td style="color:#0000ff" nowrap>
-          start the Konqueror web browser
-        </td>
-      </tr>
-      <tr>
-        <td align="right" style="color:#ff0000" nowrap>
-          
-        </td>
-        <td align="center" nowrap>
-          S
-        </td>
-        <td style="color:#0000ff" nowrap>
-          start the web browser on the search page
-        </td>
-      </tr>
-      <tr>
-        <td align="right" style="color:#ff0000" nowrap>
-           Control 
-        </td>
-        <td align="center" nowrap>
-          S
-        </td>
-        <td style="color:#0000ff" nowrap>
-          start the web browser on the search page with google
-        </td>
-      </tr>
-      <tr>
-        <td align="right" style="color:#ff0000" nowrap>
-           Shift 
-        </td>
-        <td align="center" nowrap>
-          S
-        </td>
-        <td style="color:#0000ff" nowrap>
-          Ask an URL to be opened in the Surf browser
-        </td>
-      </tr>
-      <tr>
-        <td align="right" style="color:#ff0000" nowrap>
-          
-        </td>
-        <td align="center" nowrap>
-          Q
-        </td>
-        <td style="color:#0000ff" nowrap>
-          <nil>
-          </nil>
-        </td>
-      </tr>
     </table>
     <h3>
       <u>

Modified: clfswm/doc/keys.txt
==============================================================================
--- clfswm/doc/keys.txt	(original)
+++ clfswm/doc/keys.txt	Fri Mar 18 17:28:07 2011
@@ -36,25 +36,16 @@
   Control              Escape          Close or kill the current window (ask before doing anything)
   Mod-1                T               Switch to editing mode (second mode)
   Control              Less            Switch to editing mode (second mode)
-  Mod-1                Ccedilla        Bind or jump to a slot (a frame or a window)
-  Mod-1                Underscore      Bind or jump to a slot (a frame or a window)
-  Mod-1                Egrave          Bind or jump to a slot (a frame or a window)
-  Mod-1                Minus           Bind or jump to a slot (a frame or a window)
-  Mod-1                Parenleft       Bind or jump to a slot (a frame or a window)
-  Mod-1                Quoteright      Bind or jump to a slot (a frame or a window)
-  Mod-1                Quotedbl        Bind or jump to a slot (a frame or a window)
-  Mod-1                Eacute          Bind or jump to a slot (a frame or a window)
-  Mod-1                Ampersand       Bind or jump to a slot (a frame or a window)
-  Mod-1                F2              Open the Music Player Daemon (MPD) menu
-  Mod-1                Agrave          Bind or jump to a slot (a frame or a window)
-                       Pause           Open the Reboot/Halt menu
-                       Xf86audiomute   Toggle mute.
-                       Xf86audiolowervolume   Lower volume.
-                       Xf86audioraisevolume   Raise volume.
-                       Control_r       Move the pointer to the lower right corner of the screen
-  Control              66              Present all windows in the current child (An expose like)
-  Mod-1 Control        66              Present all windows in the current frame (An expose like)
-  Control Shift        66              Present all windows in all frames (An expose like)
+  Mod-1                1               Bind or jump to a slot (a frame or a window)
+  Mod-1                2               Bind or jump to a slot (a frame or a window)
+  Mod-1                3               Bind or jump to a slot (a frame or a window)
+  Mod-1                4               Bind or jump to a slot (a frame or a window)
+  Mod-1                5               Bind or jump to a slot (a frame or a window)
+  Mod-1                6               Bind or jump to a slot (a frame or a window)
+  Mod-1                7               Bind or jump to a slot (a frame or a window)
+  Mod-1                8               Bind or jump to a slot (a frame or a window)
+  Mod-1                9               Bind or jump to a slot (a frame or a window)
+  Mod-1                0               Bind or jump to a slot (a frame or a window)
 
 
 Mouse buttons actions in main mode:
@@ -79,7 +70,7 @@
 
   Mod-1                F1              Open the help and info window
                        M               Open the main menu
-                       Less            Lower 1% volume.
+                       Less            Open the main menu
   Control              Less            Open the main menu
                        F               Open the frame menu
                        W               Open the window menu
@@ -141,28 +132,16 @@
   Control              F10             Present all windows in the current frame (An expose like)
   Shift                L2              Show all frames info windows until a key is release
   Mod-1 Shift          L2              Show all frames info windows
-  Mod-1                Ccedilla        Bind or jump to a slot (a frame or a window)
-  Mod-1                Underscore      Bind or jump to a slot (a frame or a window)
-  Mod-1                Egrave          Bind or jump to a slot (a frame or a window)
-  Mod-1                Minus           Bind or jump to a slot (a frame or a window)
-  Mod-1                Parenleft       Bind or jump to a slot (a frame or a window)
-  Mod-1                Quoteright      Bind or jump to a slot (a frame or a window)
-  Mod-1                Quotedbl        Bind or jump to a slot (a frame or a window)
-  Mod-1                Eacute          Bind or jump to a slot (a frame or a window)
-  Mod-1                Ampersand       Bind or jump to a slot (a frame or a window)
-                       Twosuperior     Move the pointer to the lower right corner of the screen
-  Mod-1                Agrave          Bind or jump to a slot (a frame or a window)
-                       Xf86audiomute   Toggle mute.
-                       Xf86audiolowervolume   Lower volume.
-                       Xf86audioraisevolume   Raise volume.
-                       Greater         Raise 1% volume.
-                       Space           start the file manager
-                       Z               start the web browser
-  Shift                Z               start the Konqueror web browser
-                       S               start the web browser on the search page
-  Control              S               start the web browser on the search page with google
-  Shift                S               Ask an URL to be opened in the Surf browser
-                       Q               NIL
+  Mod-1                1               Bind or jump to a slot (a frame or a window)
+  Mod-1                2               Bind or jump to a slot (a frame or a window)
+  Mod-1                3               Bind or jump to a slot (a frame or a window)
+  Mod-1                4               Bind or jump to a slot (a frame or a window)
+  Mod-1                5               Bind or jump to a slot (a frame or a window)
+  Mod-1                6               Bind or jump to a slot (a frame or a window)
+  Mod-1                7               Bind or jump to a slot (a frame or a window)
+  Mod-1                8               Bind or jump to a slot (a frame or a window)
+  Mod-1                9               Bind or jump to a slot (a frame or a window)
+  Mod-1                0               Bind or jump to a slot (a frame or a window)
 
 
 Mouse buttons actions in second mode:

Modified: clfswm/doc/menu.html
==============================================================================
--- clfswm/doc/menu.html	(original)
+++ clfswm/doc/menu.html	Fri Mar 18 17:28:07 2011
@@ -90,105 +90,6 @@
     <p>
       v: Show the current CLFSWM version
     </p>
-    <p>
-      F2: <a href="#MPD-MENU">< Music Player Daemon (MPD) menu ></a>
-    </p>
-    <p>
-      x: <a href="#XMMS-MENU">< XMMS menu ></a>
-    </p>
-    <p>
-      i: <a href="#CDPLAYER-MENU">< CDPLAYER menu ></a>
-    </p>
-    <hr>
-    <h3>
-      <a name="MPD-MENU"></a><a href="#HELP-MENU">Mpd-Menu</a>
-    </h3>
-    <p>
-      i: Show MPD informations
-    </p>
-    <p>
-      p: Play the previous song in the current playlist
-    </p>
-    <p>
-      n: Play the next song in the current playlist
-    </p>
-    <p>
-      t: Toggles Play/Pause, plays if stopped
-    </p>
-    <p>
-      y: Start playing
-    </p>
-    <p>
-      k: Stop the currently playing playlists
-    </p>
-    <p>
-      x: Seeks to +5%
-    </p>
-    <p>
-      w: Seeks to -5%
-    </p>
-    <p>
-      l: Show the current MPD playlist
-    </p>
-    <p>
-      s: Start sonata
-    </p>
-    <p>
-      g: Start gmpc
-    </p>
-    <hr>
-    <h3>
-      <a name="XMMS-MENU"></a><a href="#HELP-MENU">Xmms-Menu</a>
-    </h3>
-    <p>
-      r: Lanch XMMS
-    </p>
-    <p>
-      s: Show the current xmms status
-    </p>
-    <p>
-      l: Show the current xmms playlist
-    </p>
-    <p>
-      n: Play the next XMMS track
-    </p>
-    <p>
-      p: Play the previous XMMS track
-    </p>
-    <p>
-      e: open xmms "Load file(s)" dialog window.
-    </p>
-    <hr>
-    <h3>
-      <a name="CDPLAYER-MENU"></a><a href="#HELP-MENU">Cdplayer-Menu</a>
-    </h3>
-    <p>
-      y: Start playing CD
-    </p>
-    <p>
-      k: Stop playing CD
-    </p>
-    <p>
-      t: Toggle pause
-    </p>
-    <p>
-      s: Show the current CD status
-    </p>
-    <p>
-      l: Show the current CD playlist
-    </p>
-    <p>
-      n: Play the next CD track
-    </p>
-    <p>
-      p: Play the previous CD track
-    </p>
-    <p>
-      e: Eject CD
-    </p>
-    <p>
-      c: Close CD
-    </p>
     <hr>
     <h3>
       <a name="STANDARD-MENU"></a><a href="#MAIN">Standard-Menu</a>
@@ -957,61 +858,61 @@
       <a name="GRAPHICS"></a><a href="#STANDARD-MENU">Graphics</a>
     </h3>
     <p>
-      a: Image Viewer
+      a: LibreOffice Draw
     </p>
     <p>
-      b: Document Viewer - View multi-page documents
+      b: Image Viewer
     </p>
     <p>
-      c: Gcolor2 - Choose colours from palette or screen
+      c: Document Viewer - View multi-page documents
     </p>
     <p>
-      d: Geeqie - View and manage images
+      d: Gcolor2 - Choose colours from palette or screen
     </p>
     <p>
-      e: PostScript Viewer - View PostScript files
+      e: Geeqie - View and manage images
     </p>
     <p>
-      f: GNU Image Manipulation Program - Create images and edit photographs
+      f: PostScript Viewer - View PostScript files
     </p>
     <p>
-      g: Image Viewer
+      g: GNU Image Manipulation Program - Create images and edit photographs
     </p>
     <p>
-      h: GQview - View and manage images
+      h: Image Viewer
     </p>
     <p>
-      i: gThumb - View and organize your images
+      i: GQview - View and manage images
     </p>
     <p>
       j: gThumb - View and organize your images
     </p>
     <p>
-      k: GV
+      k: gThumb - View and organize your images
     </p>
     <p>
-      l: Inkscape - Create and edit Scalable Vector Graphics images
+      l: GV
     </p>
     <p>
-      m: digiKam
+      m: Inkscape - Create and edit Scalable Vector Graphics images
     </p>
     <p>
-      n: Gwenview - A simple image viewer
+      n: digiKam
     </p>
     <p>
-      o: KColorChooser
+      o: Gwenview - A simple image viewer
     </p>
     <p>
-      p: KolourPaint
+      p: KColorChooser
     </p>
     <p>
-      q: KRuler
+      q: KolourPaint
     </p>
     <p>
-      r: KSnapshot
+      r: KRuler
     </p>
     <p>
-      s: Okular
+      s: KSnapshot
     </p>
     <p>
       t: Okular
@@ -1059,6 +960,9 @@
       |: Okular
     </p>
     <p>
+      |: Okular
+    </p>
+    <p>
       |: showFoto - Manage your photographs like a professional with the power of open source
     </p>
     <p>
@@ -1226,85 +1130,82 @@
       <a name="OFFICE"></a><a href="#STANDARD-MENU">Office</a>
     </h3>
     <p>
-      a: LibreOffice 3.3 Base
+      a: AbiWord
     </p>
     <p>
-      b: LibreOffice 3.3 Calc
+      b: LibreOffice Base
     </p>
     <p>
-      c: LibreOffice 3.3 Draw
+      c: LibreOffice Calc
     </p>
     <p>
-      d: LibreOffice 3.3 Impress
+      d: ePDFViewer - Lightweight PDF document viewer
     </p>
     <p>
-      e: LibreOffice 3.3 Math
+      e: Evolution - Manage your email, contacts and schedule
     </p>
     <p>
-      f: LibreOffice 3.3 Printer Administration
+      f: FreeMind
     </p>
     <p>
-      g: LibreOffice 3.3 
+      g: Orage Globaltime - Show clocks from different countries
     </p>
     <p>
-      h: LibreOffice 3.3 Writer
+      h: Gnumeric - Calculation, Analysis, and Visualization of Information
     </p>
     <p>
-      i: AbiWord
+      i: GV
     </p>
     <p>
-      j: ePDFViewer - Lightweight PDF document viewer
+      j: LibreOffice Impress
     </p>
     <p>
-      k: Evolution - Manage your email, contacts and schedule
+      k: Kontact
     </p>
     <p>
-      l: FreeMind
+      l: KAddressBook
     </p>
     <p>
-      m: Orage Globaltime - Show clocks from different countries
+      m: KOrganizer - Calendar and Scheduling Program
     </p>
     <p>
-      n: Gnumeric - Calculation, Analysis, and Visualization of Information
+      n: KTimeTracker
     </p>
     <p>
-      o: GV
+      o: KWord - Write text documents
     </p>
     <p>
-      p: Kontact
+      p: Lokalize
     </p>
     <p>
-      q: KAddressBook
+      q: Okular
     </p>
     <p>
-      r: KOrganizer - Calendar and Scheduling Program
+      r: LibreOffice 3.3 Math
     </p>
     <p>
-      s: KTimeTracker
+      s: LibreOffice 3.3 Printer Administration
     </p>
     <p>
-      t: KWord - Write text documents
+      t: LibreOffice 3.3 
     </p>
     <p>
-      u: Lokalize
-    </p>
-    <p>
-      v: Okular
+      u: LibreOffice 3.3 Writer
     </p>
     <p>
-      w: Lyx - Latex WYSIWYM Editor
+      v: Lyx - Latex WYSIWYM Editor
     </p>
     <p>
-      x: LibreOffice Extension Manager
+      w: LibreOffice Extension Manager
     </p>
     <p>
-      y: OOo4Kids 1.2 Calc
+      x: OOo4Kids 1.2 Calc
     </p>
     <p>
-      z: OOo4Kids 1.2 Draw
+      y: OOo4Kids 1.2 Draw
     </p>
     <p>
-      |: OOo4Kids 1.2 Impress
+      z: OOo4Kids 1.2 Impress
     </p>
     <p>
       |: OOo4Kids 1.2 Math
@@ -2790,12 +2691,6 @@
     <p>
       i: Open the window in this frame if it match absorb-nw-test
     </p>
-    <p>
-      z: Open the window in the UZBL frame if it match uzbl absorb-nw-test
-    </p>
-    <p>
-      s: Open the window in the Surf frame if it match surf absorb-nw-test
-    </p>
     <hr>
     <h3>
       <a name="FRAME-MOVEMENT-MENU"></a><a href="#FRAME-MENU">Frame-Movement-Menu</a>
@@ -3118,52 +3013,49 @@
       <a name="CONFIGURATION-MENU"></a><a href="#MAIN">Configuration-Menu</a>
     </h3>
     <p>
-      a: <a href="#CONF-VOLUME-MODE">< Volume Mode Group ></a>
+      a: <a href="#CONF-GIMP-LAYOUT">< Gimp Layout Group ></a>
     </p>
     <p>
-      b: <a href="#CONF-GIMP-LAYOUT">< Gimp Layout Group ></a>
+      b: <a href="#CONF-NOTIFY-WINDOW">< Notify Window Group ></a>
     </p>
     <p>
-      c: <a href="#CONF-NOTIFY-WINDOW">< Notify Window Group ></a>
+      c: <a href="#CONF-MENU">< Menu Group ></a>
     </p>
     <p>
-      d: <a href="#CONF-MENU">< Menu Group ></a>
+      d: <a href="#CONF-EXPOSE-MODE">< Expose Mode Group ></a>
     </p>
     <p>
-      e: <a href="#CONF-EXPOSE-MODE">< Expose Mode Group ></a>
+      e: <a href="#CONF-CIRCULATE-MODE">< Circulate Mode Group ></a>
     </p>
     <p>
-      f: <a href="#CONF-CIRCULATE-MODE">< Circulate Mode Group ></a>
+      f: <a href="#CONF-INFO-MODE">< Info Mode Group ></a>
     </p>
     <p>
-      g: <a href="#CONF-INFO-MODE">< Info Mode Group ></a>
+      g: <a href="#CONF-QUERY-STRING">< Query String Group ></a>
     </p>
     <p>
-      h: <a href="#CONF-QUERY-STRING">< Query String Group ></a>
+      h: <a href="#CONF-IDENTIFY-KEY">< Identify Key Group ></a>
     </p>
     <p>
-      i: <a href="#CONF-IDENTIFY-KEY">< Identify Key Group ></a>
+      i: <a href="#CONF-SECOND-MODE">< Second Mode Group ></a>
     </p>
     <p>
-      j: <a href="#CONF-SECOND-MODE">< Second Mode Group ></a>
+      j: <a href="#CONF-FRAME-COLORS">< Frame Colors Group ></a>
     </p>
     <p>
-      k: <a href="#CONF-FRAME-COLORS">< Frame Colors Group ></a>
+      k: <a href="#CONF-CORNER">< Corner Group ></a>
     </p>
     <p>
-      l: <a href="#CONF-CORNER">< Corner Group ></a>
+      l: <a href="#CONF-PLACEMENT">< Placement Group ></a>
     </p>
     <p>
-      m: <a href="#CONF-PLACEMENT">< Placement Group ></a>
+      m: <a href="#CONF-HOOK">< Hook Group ></a>
     </p>
     <p>
-      n: <a href="#CONF-HOOK">< Hook Group ></a>
+      n: <a href="#CONF-MAIN-MODE">< Main Mode Group ></a>
     </p>
     <p>
-      o: <a href="#CONF-MAIN-MODE">< Main Mode Group ></a>
-    </p>
-    <p>
-      p: <a href="#CONF-MISCELLANEOUS">< Miscellaneous Group ></a>
+      o: <a href="#CONF-MISCELLANEOUS">< Miscellaneous Group ></a>
     </p>
     <p>
       F2: Save all configuration variables in clfswmrc
@@ -3173,34 +3065,6 @@
     </p>
     <hr>
     <h3>
-      <a name="CONF-VOLUME-MODE"></a><a href="#CONFIGURATION-MENU">Conf-Volume-Mode</a>
-    </h3>
-    <p>
-      a: Configure VOLUME-EXTERNAL-MIXER-CMD
-    </p>
-    <p>
-      b: Configure VOLUME-TEXT-LIMIT
-    </p>
-    <p>
-      c: Configure VOLUME-HEIGHT
-    </p>
-    <p>
-      d: Configure VOLUME-WIDTH
-    </p>
-    <p>
-      e: Configure VOLUME-BORDER
-    </p>
-    <p>
-      f: Configure VOLUME-FOREGROUND
-    </p>
-    <p>
-      g: Configure VOLUME-BACKGROUND
-    </p>
-    <p>
-      h: Configure VOLUME-FONT-STRING
-    </p>
-    <hr>
-    <h3>
       <a name="CONF-GIMP-LAYOUT"></a><a href="#CONFIGURATION-MENU">Conf-Gimp-Layout</a>
     </h3>
     <p>
@@ -3449,28 +3313,25 @@
       <a name="CONF-PLACEMENT"></a><a href="#CONFIGURATION-MENU">Conf-Placement</a>
     </h3>
     <p>
-      a: Configure VOLUME-MODE-PLACEMENT
+      a: Configure NOTIFY-WINDOW-PLACEMENT
     </p>
     <p>
-      b: Configure NOTIFY-WINDOW-PLACEMENT
+      b: Configure EXPOSE-MODE-PLACEMENT
     </p>
     <p>
-      c: Configure EXPOSE-MODE-PLACEMENT
+      c: Configure CIRCULATE-MODE-PLACEMENT
     </p>
     <p>
-      d: Configure CIRCULATE-MODE-PLACEMENT
+      d: Configure QUERY-MODE-PLACEMENT
     </p>
     <p>
-      e: Configure QUERY-MODE-PLACEMENT
+      e: Configure INFO-MODE-PLACEMENT
     </p>
     <p>
-      f: Configure INFO-MODE-PLACEMENT
+      f: Configure SECOND-MODE-PLACEMENT
     </p>
     <p>
-      g: Configure SECOND-MODE-PLACEMENT
-    </p>
-    <p>
-      h: Configure BANISH-POINTER-PLACEMENT
+      g: Configure BANISH-POINTER-PLACEMENT
     </p>
     <hr>
     <h3>
@@ -3569,28 +3430,6 @@
     <p>
       x: Exit clfswm
     </p>
-    <p>
-      Pause: <a href="#REBOOT-HALT-MENU">< Suspend/Reboot/Halt menu ></a>
-    </p>
-    <hr>
-    <h3>
-      <a name="REBOOT-HALT-MENU"></a><a href="#CLFSWM-MENU">Reboot-Halt-Menu</a>
-    </h3>
-    <p>
-      -: Do nothing
-    </p>
-    <p>
-      s: Suspend the computer to RAM
-    </p>
-    <p>
-      d: Suspend the computer to DISK
-    </p>
-    <p>
-      r: Reboot the computer
-    </p>
-    <p>
-      h: Halt the computer
-    </p>
     <hr>
     <p>
       <small>

Modified: clfswm/doc/menu.txt
==============================================================================
--- clfswm/doc/menu.txt	(original)
+++ clfswm/doc/menu.txt	Fri Mar 18 17:28:07 2011
@@ -27,41 +27,6 @@
 p: Show current processes sorted by CPU usage
 m: Show current processes sorted by memory usage
 v: Show the current CLFSWM version
-F2: < Music Player Daemon (MPD) menu >
-x: < XMMS menu >
-i: < CDPLAYER menu >
-
-Mpd-Menu
-i: Show MPD informations
-p: Play the previous song in the current playlist
-n: Play the next song in the current playlist
-t: Toggles Play/Pause, plays if stopped
-y: Start playing
-k: Stop the currently playing playlists
-x: Seeks to +5%
-w: Seeks to -5%
-l: Show the current MPD playlist
-s: Start sonata
-g: Start gmpc
-
-Xmms-Menu
-r: Lanch XMMS
-s: Show the current xmms status
-l: Show the current xmms playlist
-n: Play the next XMMS track
-p: Play the previous XMMS track
-e: open xmms "Load file(s)" dialog window.
-
-Cdplayer-Menu
-y: Start playing CD
-k: Stop playing CD
-t: Toggle pause
-s: Show the current CD status
-l: Show the current CD playlist
-n: Play the next CD track
-p: Play the previous CD track
-e: Eject CD
-c: Close CD
 
 Standard-Menu
 a: < TEXTEDITOR >
@@ -325,25 +290,25 @@
 |: XSpaceWarp - Live long and prosper!
 
 Graphics
-a: Image Viewer
-b: Document Viewer - View multi-page documents
-c: Gcolor2 - Choose colours from palette or screen
-d: Geeqie - View and manage images
-e: PostScript Viewer - View PostScript files
-f: GNU Image Manipulation Program - Create images and edit photographs
-g: Image Viewer
-h: GQview - View and manage images
-i: gThumb - View and organize your images
+a: LibreOffice Draw
+b: Image Viewer
+c: Document Viewer - View multi-page documents
+d: Gcolor2 - Choose colours from palette or screen
+e: Geeqie - View and manage images
+f: PostScript Viewer - View PostScript files
+g: GNU Image Manipulation Program - Create images and edit photographs
+h: Image Viewer
+i: GQview - View and manage images
 j: gThumb - View and organize your images
-k: GV
-l: Inkscape - Create and edit Scalable Vector Graphics images
-m: digiKam
-n: Gwenview - A simple image viewer
-o: KColorChooser
-p: KolourPaint
-q: KRuler
-r: KSnapshot
-s: Okular
+k: gThumb - View and organize your images
+l: GV
+m: Inkscape - Create and edit Scalable Vector Graphics images
+n: digiKam
+o: Gwenview - A simple image viewer
+p: KColorChooser
+q: KolourPaint
+r: KRuler
+s: KSnapshot
 t: Okular
 u: Okular
 v: Okular
@@ -359,6 +324,7 @@
 |: Okular
 |: Okular
 |: Okular
+|: Okular
 |: showFoto - Manage your photographs like a professional with the power of open source
 |: MuPDF - PDF file viewer
 |: Xfig
@@ -416,33 +382,32 @@
 |: Zenmap
 
 Office
-a: LibreOffice 3.3 Base
-b: LibreOffice 3.3 Calc
-c: LibreOffice 3.3 Draw
-d: LibreOffice 3.3 Impress
-e: LibreOffice 3.3 Math
-f: LibreOffice 3.3 Printer Administration
-g: LibreOffice 3.3 
-h: LibreOffice 3.3 Writer
-i: AbiWord
-j: ePDFViewer - Lightweight PDF document viewer
-k: Evolution - Manage your email, contacts and schedule
-l: FreeMind
-m: Orage Globaltime - Show clocks from different countries
-n: Gnumeric - Calculation, Analysis, and Visualization of Information
-o: GV
-p: Kontact
-q: KAddressBook
-r: KOrganizer - Calendar and Scheduling Program
-s: KTimeTracker
-t: KWord - Write text documents
-u: Lokalize
-v: Okular
-w: Lyx - Latex WYSIWYM Editor
-x: LibreOffice Extension Manager
-y: OOo4Kids 1.2 Calc
-z: OOo4Kids 1.2 Draw
-|: OOo4Kids 1.2 Impress
+a: AbiWord
+b: LibreOffice Base
+c: LibreOffice Calc
+d: ePDFViewer - Lightweight PDF document viewer
+e: Evolution - Manage your email, contacts and schedule
+f: FreeMind
+g: Orage Globaltime - Show clocks from different countries
+h: Gnumeric - Calculation, Analysis, and Visualization of Information
+i: GV
+j: LibreOffice Impress
+k: Kontact
+l: KAddressBook
+m: KOrganizer - Calendar and Scheduling Program
+n: KTimeTracker
+o: KWord - Write text documents
+p: Lokalize
+q: Okular
+r: LibreOffice 3.3 Math
+s: LibreOffice 3.3 Printer Administration
+t: LibreOffice 3.3 
+u: LibreOffice 3.3 Writer
+v: Lyx - Latex WYSIWYM Editor
+w: LibreOffice Extension Manager
+x: OOo4Kids 1.2 Calc
+y: OOo4Kids 1.2 Draw
+z: OOo4Kids 1.2 Impress
 |: OOo4Kids 1.2 Math
 |: OOo4Kids 1.2
 |: OOo4Kids 1.2 Printer Administration
@@ -949,8 +914,6 @@
 g: Open the next window in a named frame
 h: Open the next window in a numbered frame
 i: Open the window in this frame if it match absorb-nw-test
-z: Open the window in the UZBL frame if it match uzbl absorb-nw-test
-s: Open the window in the Surf frame if it match surf absorb-nw-test
 
 Frame-Movement-Menu
 p: < Frame pack menu >
@@ -1068,35 +1031,24 @@
 p: Prompt for an other window manager
 
 Configuration-Menu
-a: < Volume Mode Group >
-b: < Gimp Layout Group >
-c: < Notify Window Group >
-d: < Menu Group >
-e: < Expose Mode Group >
-f: < Circulate Mode Group >
-g: < Info Mode Group >
-h: < Query String Group >
-i: < Identify Key Group >
-j: < Second Mode Group >
-k: < Frame Colors Group >
-l: < Corner Group >
-m: < Placement Group >
-n: < Hook Group >
-o: < Main Mode Group >
-p: < Miscellaneous Group >
+a: < Gimp Layout Group >
+b: < Notify Window Group >
+c: < Menu Group >
+d: < Expose Mode Group >
+e: < Circulate Mode Group >
+f: < Info Mode Group >
+g: < Query String Group >
+h: < Identify Key Group >
+i: < Second Mode Group >
+j: < Frame Colors Group >
+k: < Corner Group >
+l: < Placement Group >
+m: < Hook Group >
+n: < Main Mode Group >
+o: < Miscellaneous Group >
 F2: Save all configuration variables in clfswmrc
 F3: Reset all configuration variables to there default values
 
-Conf-Volume-Mode
-a: Configure VOLUME-EXTERNAL-MIXER-CMD
-b: Configure VOLUME-TEXT-LIMIT
-c: Configure VOLUME-HEIGHT
-d: Configure VOLUME-WIDTH
-e: Configure VOLUME-BORDER
-f: Configure VOLUME-FOREGROUND
-g: Configure VOLUME-BACKGROUND
-h: Configure VOLUME-FONT-STRING
-
 Conf-Gimp-Layout
 a: Configure GIMP-LAYOUT-NOTIFY-WINDOW-DELAY
 
@@ -1187,14 +1139,13 @@
 j: Configure CORNER-SIZE
 
 Conf-Placement
-a: Configure VOLUME-MODE-PLACEMENT
-b: Configure NOTIFY-WINDOW-PLACEMENT
-c: Configure EXPOSE-MODE-PLACEMENT
-d: Configure CIRCULATE-MODE-PLACEMENT
-e: Configure QUERY-MODE-PLACEMENT
-f: Configure INFO-MODE-PLACEMENT
-g: Configure SECOND-MODE-PLACEMENT
-h: Configure BANISH-POINTER-PLACEMENT
+a: Configure NOTIFY-WINDOW-PLACEMENT
+b: Configure EXPOSE-MODE-PLACEMENT
+c: Configure CIRCULATE-MODE-PLACEMENT
+d: Configure QUERY-MODE-PLACEMENT
+e: Configure INFO-MODE-PLACEMENT
+f: Configure SECOND-MODE-PLACEMENT
+g: Configure BANISH-POINTER-PLACEMENT
 
 Conf-Hook
 a: Configure DEFAULT-NW-HOOK
@@ -1230,14 +1181,6 @@
 r: Reset clfswm
 l: Reload clfswm
 x: Exit clfswm
-Pause: < Suspend/Reboot/Halt menu >
-
-Reboot-Halt-Menu
--: Do nothing
-s: Suspend the computer to RAM
-d: Suspend the computer to DISK
-r: Reboot the computer
-h: Halt the computer
 
 
 This documentation was produced with the CLFSWM auto-doc functions. To reproduce it, use the produce-menu-doc-in-file or

Added: clfswm/doc/variables.html
==============================================================================
--- (empty file)
+++ clfswm/doc/variables.html	Fri Mar 18 17:28:07 2011
@@ -0,0 +1,1076 @@
+<html>
+  <head>
+    <title>
+      CLFSWM - Configuration variables
+    </title>
+  </head>
+  <body>
+    <h1>
+      <a name='top'>
+        CLFSWM - Configuration variables
+      </a>
+    </h1>
+    <p>
+      Here are the variables you can configure in CLFSWM with the configuration file or the configuration menu:
+    </p>
+    <h3>
+      <a name='top'>
+        Configuration variables groups:
+      </a>
+    </h3>
+    <ul>
+      <li>
+        <a href='#circulate-mode'>
+          Circulate Mode Group
+        </a>
+      </li>
+      <li>
+        <a href='#corner'>
+          Corner Group
+        </a>
+      </li>
+      <li>
+        <a href='#expose-mode'>
+          Expose Mode Group
+        </a>
+      </li>
+      <li>
+        <a href='#frame-colors'>
+          Frame Colors Group
+        </a>
+      </li>
+      <li>
+        <a href='#gimp-layout'>
+          Gimp Layout Group
+        </a>
+      </li>
+      <li>
+        <a href='#hook'>
+          Hook Group
+        </a>
+      </li>
+      <li>
+        <a href='#identify-key'>
+          Identify Key Group
+        </a>
+      </li>
+      <li>
+        <a href='#info-mode'>
+          Info Mode Group
+        </a>
+      </li>
+      <li>
+        <a href='#main-mode'>
+          Main Mode Group
+        </a>
+      </li>
+      <li>
+        <a href='#menu'>
+          Menu Group
+        </a>
+      </li>
+      <li>
+        <a href='#miscellaneous'>
+          Miscellaneous Group
+        </a>
+      </li>
+      <li>
+        <a href='#notify-window'>
+          Notify Window Group
+        </a>
+      </li>
+      <li>
+        <a href='#placement'>
+          Placement Group
+        </a>
+      </li>
+      <li>
+        <a href='#query-string'>
+          Query String Group
+        </a>
+      </li>
+      <li>
+        <a href='#second-mode'>
+          Second Mode Group
+        </a>
+      </li>
+    </ul>
+    <p>
+      <a name='circulate-mode' href='#top'>
+        <= Circulate Mode Group => 
+      </a>
+    </p>
+    <font color='#ff0000'>
+          *circulate-font-string*
+    </font>
+    <font color='#0000ff'>
+       = "fixed" <br>
+    </font>
+                Circulate string window font string <br>
+
+    <font color='#ff0000'>
+          *circulate-background*
+    </font>
+    <font color='#0000ff'>
+       = "black" <br>
+    </font>
+                Circulate string window background color <br>
+
+    <font color='#ff0000'>
+          *circulate-foreground*
+    </font>
+    <font color='#0000ff'>
+       = "green" <br>
+    </font>
+                Circulate string window foreground color <br>
+
+    <font color='#ff0000'>
+          *circulate-border*
+    </font>
+    <font color='#0000ff'>
+       = "red" <br>
+    </font>
+                Circulate string window border color <br>
+
+    <font color='#ff0000'>
+          *circulate-width*
+    </font>
+    <font color='#0000ff'>
+       = 400 <br>
+    </font>
+                Circulate mode window width <br>
+
+    <font color='#ff0000'>
+          *circulate-height*
+    </font>
+    <font color='#0000ff'>
+       = 15 <br>
+    </font>
+                Circulate mode window height <br>
+
+    <font color='#ff0000'>
+          *circulate-text-limite*
+    </font>
+    <font color='#0000ff'>
+       = 30 <br>
+    </font>
+                Maximum text limite in the circulate window <br>
+
+    <p>
+      <a name='corner' href='#top'>
+        <= Corner Group => 
+      </a>
+    </p>
+    <font color='#ff0000'>
+          *corner-size*
+    </font>
+    <font color='#0000ff'>
+       = 3 <br>
+    </font>
+                The size of the corner square <br>
+
+    <font color='#ff0000'>
+          *corner-main-mode-left-button*
+    </font>
+    <font color='#0000ff'>
+       = ((:TOP-LEFT OPEN-MENU) <br>
+    </font>
+                                                (:TOP-RIGHT PRESENT-VIRTUAL-KEYBOARD) <br>
+
+                                                (:BOTTOM-RIGHT EXPOSE-WINDOWS-MODE) <br>
+
+                                                (:BOTTOM-LEFT NIL)) <br>
+
+                Actions on corners in the main mode with the left mouse button <br>
+
+    <font color='#ff0000'>
+          *corner-main-mode-middle-button*
+    </font>
+    <font color='#0000ff'>
+       = ((:TOP-LEFT HELP-ON-CLFSWM) <br>
+    </font>
+                                                  (:TOP-RIGHT <br>
+
+                                                   ASK-CLOSE/KILL-CURRENT-WINDOW) <br>
+
+                                                  (:BOTTOM-RIGHT NIL) (:BOTTOM-LEFT NIL)) <br>
+
+                Actions on corners in the main mode with the middle mouse button <br>
+
+    <font color='#ff0000'>
+          *corner-main-mode-right-button*
+    </font>
+    <font color='#0000ff'>
+       = ((:TOP-LEFT PRESENT-CLFSWM-TERMINAL) <br>
+    </font>
+                                                 (:TOP-RIGHT ASK-CLOSE/KILL-CURRENT-WINDOW) <br>
+
+                                                 (:BOTTOM-RIGHT EXPOSE-ALL-WINDOWS-MODE) <br>
+
+                                                 (:BOTTOM-LEFT NIL)) <br>
+
+                Actions on corners in the main mode with the right mouse button <br>
+
+    <font color='#ff0000'>
+          *corner-second-mode-left-button*
+    </font>
+    <font color='#0000ff'>
+       = ((:TOP-LEFT NIL) (:TOP-RIGHT NIL) <br>
+    </font>
+                                                  (:BOTTOM-RIGHT EXPOSE-WINDOWS-MODE) <br>
+
+                                                  (:BOTTOM-LEFT NIL)) <br>
+
+                Actions on corners in the second mode with the left mouse button <br>
+
+    <font color='#ff0000'>
+          *corner-second-mode-middle-button*
+    </font>
+    <font color='#0000ff'>
+       = ((:TOP-LEFT HELP-ON-CLFSWM) <br>
+    </font>
+                                                    (:TOP-RIGHT NIL) (:BOTTOM-RIGHT NIL) <br>
+
+                                                    (:BOTTOM-LEFT NIL)) <br>
+
+                Actions on corners in the second mode with the middle mouse button <br>
+
+    <font color='#ff0000'>
+          *corner-second-mode-right-button*
+    </font>
+    <font color='#0000ff'>
+       = ((:TOP-LEFT NIL) (:TOP-RIGHT NIL) <br>
+    </font>
+                                                   (:BOTTOM-RIGHT EXPOSE-ALL-WINDOWS-MODE) <br>
+
+                                                   (:BOTTOM-LEFT NIL)) <br>
+
+                Actions on corners in the second mode with the right mouse button <br>
+
+    <font color='#ff0000'>
+          *virtual-keyboard-cmd*
+    </font>
+    <font color='#0000ff'>
+       = "xvkbd" <br>
+    </font>
+                The command to display the virtual keybaord <br>
+
+              Here is an ~/.Xresources example for xvkbd: <br>
+
+                xvkbd.windowGeometry: 300x100-0-0 <br>
+
+                xvkbd*Font: 6x12 <br>
+
+                xvkbd.modalKeytop: true <br>
+
+                xvkbd.customization: -french <br>
+
+                xvkbd.keypad: false <br>
+
+              And make it always on top <br>
+
+    <font color='#ff0000'>
+          *clfswm-terminal-name*
+    </font>
+    <font color='#0000ff'>
+       = "clfswm-terminal" <br>
+    </font>
+                The clfswm terminal name <br>
+
+    <font color='#ff0000'>
+          *clfswm-terminal-cmd*
+    </font>
+    <font color='#0000ff'>
+       = "xterm -T clfswm-terminal" <br>
+    </font>
+                The clfswm terminal command. <br>
+
+            This command must set the window title to *clfswm-terminal-name* <br>
+
+    <p>
+      <a name='expose-mode' href='#top'>
+        <= Expose Mode Group => 
+      </a>
+    </p>
+    <font color='#ff0000'>
+          *expose-font-string*
+    </font>
+    <font color='#0000ff'>
+       = "fixed" <br>
+    </font>
+                Expose string window font string <br>
+
+    <font color='#ff0000'>
+          *expose-background*
+    </font>
+    <font color='#0000ff'>
+       = "black" <br>
+    </font>
+                Expose string window background color <br>
+
+    <font color='#ff0000'>
+          *expose-foreground*
+    </font>
+    <font color='#0000ff'>
+       = "green" <br>
+    </font>
+                Expose string window foreground color <br>
+
+    <font color='#ff0000'>
+          *expose-border*
+    </font>
+    <font color='#0000ff'>
+       = "red" <br>
+    </font>
+                Expose string window border color <br>
+
+    <font color='#ff0000'>
+          *expose-valid-on-key*
+    </font>
+    <font color='#0000ff'>
+       = T <br>
+    </font>
+                Valid expose mode when an accel key is pressed <br>
+
+    <font color='#ff0000'>
+          *expose-show-window-title*
+    </font>
+    <font color='#0000ff'>
+       = T <br>
+    </font>
+                Show the window title on accel window <br>
+
+    <p>
+      <a name='frame-colors' href='#top'>
+        <= Frame Colors Group => 
+      </a>
+    </p>
+    <font color='#ff0000'>
+          *frame-background*
+    </font>
+    <font color='#0000ff'>
+       = "Black" <br>
+    </font>
+                Frame background <br>
+
+    <font color='#ff0000'>
+          *frame-foreground*
+    </font>
+    <font color='#0000ff'>
+       = "Green" <br>
+    </font>
+                Frame foreground <br>
+
+    <font color='#ff0000'>
+          *frame-foreground-root*
+    </font>
+    <font color='#0000ff'>
+       = "Red" <br>
+    </font>
+                Frame foreground when the frame is the root frame <br>
+
+    <font color='#ff0000'>
+          *frame-foreground-hidden*
+    </font>
+    <font color='#0000ff'>
+       = "Darkgreen" <br>
+    </font>
+                Frame foreground for hidden windows <br>
+
+    <p>
+      <a name='gimp-layout' href='#top'>
+        <= Gimp Layout Group => 
+      </a>
+    </p>
+    <font color='#ff0000'>
+          *gimp-layout-notify-window-delay*
+    </font>
+    <font color='#0000ff'>
+       = 30 <br>
+    </font>
+                Time to display the GIMP layout notify window help <br>
+
+    <p>
+      <a name='hook' href='#top'>
+        <= Hook Group => 
+      </a>
+    </p>
+    <font color='#ff0000'>
+          *binding-hook*
+    </font>
+    <font color='#0000ff'>
+       = (SET-DEFAULT-CIRCULATE-KEYS SET-DEFAULT-EXPOSE-KEYS <br>
+    </font>
+                                                           INIT-*INFO-KEYS* <br>
+
+                                                           INIT-*INFO-MOUSE* <br>
+
+                                                           SET-DEFAULT-INFO-KEYS <br>
+
+                                                           SET-DEFAULT-INFO-MOUSE <br>
+
+                                                           INIT-*QUERY-KEYS* <br>
+
+                                                           SET-DEFAULT-QUERY-KEYS <br>
+
+                                                           INIT-*MAIN-KEYS* <br>
+
+                                                           INIT-*MAIN-MOUSE* <br>
+
+                                                           SET-DEFAULT-MAIN-KEYS <br>
+
+                                                           SET-DEFAULT-MAIN-MOUSE <br>
+
+                                                           INIT-*SECOND-KEYS* <br>
+
+                                                           INIT-*SECOND-MOUSE* <br>
+
+                                                           SET-DEFAULT-SECOND-KEYS <br>
+
+                                                           SET-DEFAULT-SECOND-MOUSE) <br>
+
+                Hook executed when keys/buttons are bounds <br>
+
+    <font color='#ff0000'>
+          *loop-hook*
+    </font>
+    <font color='#0000ff'>
+       = NIL <br>
+    </font>
+                Hook executed on each event loop <br>
+
+    <font color='#ff0000'>
+          *main-entrance-hook*
+    </font>
+    <font color='#0000ff'>
+       = NIL <br>
+    </font>
+                Hook executed on the main function entrance after <br>
+
+            loading configuration file and before opening the display. <br>
+
+    <font color='#ff0000'>
+          *init-hook*
+    </font>
+    <font color='#0000ff'>
+       = (DEFAULT-INIT-HOOK DISPLAY-HELLO-WINDOW) <br>
+    </font>
+                Init hook. This hook is run just after the first root frame is created <br>
+
+    <font color='#ff0000'>
+          *close-hook*
+    </font>
+    <font color='#0000ff'>
+       = (CLOSE-NOTIFY-WINDOW CLOSE-CLFSWM-TERMINAL <br>
+    </font>
+                                                  CLOSE-VIRTUAL-KEYBOARD) <br>
+
+                Close hook. This hook is run just before closing the display <br>
+
+    <font color='#ff0000'>
+          *default-nw-hook*
+    </font>
+    <font color='#0000ff'>
+       = DEFAULT-FRAME-NW-HOOK <br>
+    </font>
+                Default action to do on newly created windows <br>
+
+    <p>
+      <a name='identify-key' href='#top'>
+        <= Identify Key Group => 
+      </a>
+    </p>
+    <font color='#ff0000'>
+          *identify-font-string*
+    </font>
+    <font color='#0000ff'>
+       = "fixed" <br>
+    </font>
+                Identify window font string <br>
+
+    <font color='#ff0000'>
+          *identify-background*
+    </font>
+    <font color='#0000ff'>
+       = "black" <br>
+    </font>
+                Identify window background color <br>
+
+    <font color='#ff0000'>
+          *identify-foreground*
+    </font>
+    <font color='#0000ff'>
+       = "green" <br>
+    </font>
+                Identify window foreground color <br>
+
+    <font color='#ff0000'>
+          *identify-border*
+    </font>
+    <font color='#0000ff'>
+       = "red" <br>
+    </font>
+                Identify window border color <br>
+
+    <p>
+      <a name='info-mode' href='#top'>
+        <= Info Mode Group => 
+      </a>
+    </p>
+    <font color='#ff0000'>
+          *info-background*
+    </font>
+    <font color='#0000ff'>
+       = "black" <br>
+    </font>
+                Info window background color <br>
+
+    <font color='#ff0000'>
+          *info-foreground*
+    </font>
+    <font color='#0000ff'>
+       = "green" <br>
+    </font>
+                Info window foreground color <br>
+
+    <font color='#ff0000'>
+          *info-border*
+    </font>
+    <font color='#0000ff'>
+       = "red" <br>
+    </font>
+                Info window border color <br>
+
+    <font color='#ff0000'>
+          *info-line-cursor*
+    </font>
+    <font color='#0000ff'>
+       = "white" <br>
+    </font>
+                Info window line cursor color color <br>
+
+    <font color='#ff0000'>
+          *info-selected-background*
+    </font>
+    <font color='#0000ff'>
+       = "blue" <br>
+    </font>
+                Info selected item background color <br>
+
+    <font color='#ff0000'>
+          *info-font-string*
+    </font>
+    <font color='#0000ff'>
+       = "fixed" <br>
+    </font>
+                Info window font string <br>
+
+    <font color='#ff0000'>
+          *info-click-to-select*
+    </font>
+    <font color='#0000ff'>
+       = T <br>
+    </font>
+                If true, click on info window select item. Otherwise, click to drag the menu <br>
+
+    <font color='#ff0000'>
+          *info-color-title*
+    </font>
+    <font color='#0000ff'>
+       = "Magenta" <br>
+    </font>
+                Colored info title color <br>
+
+    <font color='#ff0000'>
+          *info-color-underline*
+    </font>
+    <font color='#0000ff'>
+       = "Yellow" <br>
+    </font>
+                Colored info underline color <br>
+
+    <font color='#ff0000'>
+          *info-color-first*
+    </font>
+    <font color='#0000ff'>
+       = "Cyan" <br>
+    </font>
+                Colored info first color <br>
+
+    <font color='#ff0000'>
+          *info-color-second*
+    </font>
+    <font color='#0000ff'>
+       = "lightblue" <br>
+    </font>
+                Colored info second color <br>
+
+    <p>
+      <a name='main-mode' href='#top'>
+        <= Main Mode Group => 
+      </a>
+    </p>
+    <font color='#ff0000'>
+          *color-move-window*
+    </font>
+    <font color='#0000ff'>
+       = "DeepPink" <br>
+    </font>
+                Color when moving or resizing a windows <br>
+
+    <font color='#ff0000'>
+          *color-selected*
+    </font>
+    <font color='#0000ff'>
+       = "Red" <br>
+    </font>
+                Color of selected window <br>
+
+    <font color='#ff0000'>
+          *color-unselected*
+    </font>
+    <font color='#0000ff'>
+       = "Blue" <br>
+    </font>
+                Color of unselected color <br>
+
+    <font color='#ff0000'>
+          *color-maybe-selected*
+    </font>
+    <font color='#0000ff'>
+       = "Yellow" <br>
+    </font>
+                Color of maybe selected windows <br>
+
+    <p>
+      <a name='menu' href='#top'>
+        <= Menu Group => 
+      </a>
+    </p>
+    <font color='#ff0000'>
+          *menu-color-submenu*
+    </font>
+    <font color='#0000ff'>
+       = "Cyan" <br>
+    </font>
+                Submenu color in menu <br>
+
+    <font color='#ff0000'>
+          *menu-color-comment*
+    </font>
+    <font color='#0000ff'>
+       = "Yellow" <br>
+    </font>
+                Comment color in menu <br>
+
+    <font color='#ff0000'>
+          *menu-color-key*
+    </font>
+    <font color='#0000ff'>
+       = "Magenta" <br>
+    </font>
+                Key color in menu <br>
+
+    <font color='#ff0000'>
+          *menu-color-menu-key*
+    </font>
+    <font color='#0000ff'>
+       = #<XLIB:COLOR 0.99609375 0.6015625 0.99609375> <br>
+    </font>
+                Menu key color in menu <br>
+
+    <font color='#ff0000'>
+          *xdg-section-list*
+    </font>
+    <font color='#0000ff'>
+       = (TEXTEDITOR FILEMANAGER WEBBROWSER AUDIOVIDEO AUDIO <br>
+    </font>
+                                    VIDEO DEVELOPMENT EDUCATION GAME GRAPHICS NETWORK <br>
+
+                                    OFFICE SETTINGS SYSTEM UTILITY TERMINALEMULATOR <br>
+
+                                    ARCHLINUX SCREENSAVER) <br>
+
+                Standard menu sections <br>
+
+    <p>
+      <a name='miscellaneous' href='#top'>
+        <= Miscellaneous Group => 
+      </a>
+    </p>
+    <font color='#ff0000'>
+          *have-to-compress-notify*
+    </font>
+    <font color='#0000ff'>
+       = T <br>
+    </font>
+                Compress event notify? <br>
+
+            This variable may be useful to speed up some slow version of CLX. <br>
+
+            It is particulary useful with CLISP/MIT-CLX. <br>
+
+    <font color='#ff0000'>
+          *show-root-frame-p*
+    </font>
+    <font color='#0000ff'>
+       = NIL <br>
+    </font>
+                Show the root frame information or not <br>
+
+    <font color='#ff0000'>
+          *border-size*
+    </font>
+    <font color='#0000ff'>
+       = 1 <br>
+    </font>
+                Windows and frames border size <br>
+
+    <font color='#ff0000'>
+          *loop-timeout*
+    </font>
+    <font color='#0000ff'>
+       = 0.1 <br>
+    </font>
+                Maximum time (in seconds) to wait before calling *loop-hook* <br>
+
+    <font color='#ff0000'>
+          *default-font-string*
+    </font>
+    <font color='#0000ff'>
+       = "fixed" <br>
+    </font>
+                The default font used in clfswm <br>
+
+    <font color='#ff0000'>
+          *default-frame-data*
+    </font>
+    <font color='#0000ff'>
+       = ((:TILE-SIZE 0.8) (:TILE-SPACE-SIZE 0.1) <br>
+    </font>
+                                      (:FAST-LAYOUT (TILE-LEFT-LAYOUT TILE-LAYOUT)) <br>
+
+                                      (:MAIN-LAYOUT-WINDOWS NIL)) <br>
+
+                Default slots set in frame date <br>
+
+    <font color='#ff0000'>
+          *default-managed-type*
+    </font>
+    <font color='#0000ff'>
+       = (:NORMAL) <br>
+    </font>
+                Default managed window types <br>
+
+    <font color='#ff0000'>
+          *default-focus-policy*
+    </font>
+    <font color='#0000ff'>
+       = :CLICK <br>
+    </font>
+                Default mouse focus policy. One of :click, :sloppy, :sloppy-strict or :sloppy-select. <br>
+
+    <font color='#ff0000'>
+          *default-modifiers*
+    </font>
+    <font color='#0000ff'>
+       = NIL <br>
+    </font>
+                Default modifiers list to append to explicit modifiers <br>
+
+            Example: :mod-2 for num_lock, :lock for Caps_lock... <br>
+
+    <font color='#ff0000'>
+          *never-managed-window-list*
+    </font>
+    <font color='#0000ff'>
+       = ((EQUAL-WM-CLASS-ROX-PINBOARD NIL) <br>
+    </font>
+                                             (EQUAL-WM-CLASS-XVKBD RAISE-WINDOW) <br>
+
+                                             (EQUAL-CLFSWM-TERMINAL RAISE-AND-FOCUS-WINDOW)) <br>
+
+                CLFSWM will never manage windows of this type. <br>
+
+            A list of (list match-function handle-function) <br>
+
+    <font color='#ff0000'>
+          *hide-unmanaged-window*
+    </font>
+    <font color='#0000ff'>
+       = T <br>
+    </font>
+                Hide or not unmanaged windows when a child is deselected. <br>
+
+    <font color='#ff0000'>
+          *create-frame-on-root*
+    </font>
+    <font color='#0000ff'>
+       = NIL <br>
+    </font>
+                Create frame on root. <br>
+
+            Set this variable to true if you want to allow to create a new frame <br>
+
+            on the root window in the main mode with the mouse <br>
+
+    <font color='#ff0000'>
+          *default-window-width*
+    </font>
+    <font color='#0000ff'>
+       = 400 <br>
+    </font>
+                Default window width <br>
+
+    <font color='#ff0000'>
+          *default-window-height*
+    </font>
+    <font color='#0000ff'>
+       = 300 <br>
+    </font>
+                Default window height <br>
+
+    <p>
+      <a name='notify-window' href='#top'>
+        <= Notify Window Group => 
+      </a>
+    </p>
+    <font color='#ff0000'>
+          *notify-window-font-string*
+    </font>
+    <font color='#0000ff'>
+       = "fixed" <br>
+    </font>
+                Notify window font string <br>
+
+    <font color='#ff0000'>
+          *notify-window-background*
+    </font>
+    <font color='#0000ff'>
+       = "black" <br>
+    </font>
+                Notify Window background color <br>
+
+    <font color='#ff0000'>
+          *notify-window-foreground*
+    </font>
+    <font color='#0000ff'>
+       = "green" <br>
+    </font>
+                Notify Window foreground color <br>
+
+    <font color='#ff0000'>
+          *notify-window-border*
+    </font>
+    <font color='#0000ff'>
+       = "red" <br>
+    </font>
+                Notify Window border color <br>
+
+    <font color='#ff0000'>
+          *notify-window-delay*
+    </font>
+    <font color='#0000ff'>
+       = 10 <br>
+    </font>
+                Notify Window display delay <br>
+
+    <p>
+      <a name='placement' href='#top'>
+        <= Placement Group => 
+      </a>
+    </p>
+    <font color='#ff0000'>
+          *banish-pointer-placement*
+    </font>
+    <font color='#0000ff'>
+       = BOTTOM-RIGHT-PLACEMENT <br>
+    </font>
+                Pointer banishment placement <br>
+
+    <font color='#ff0000'>
+          *second-mode-placement*
+    </font>
+    <font color='#0000ff'>
+       = TOP-MIDDLE-PLACEMENT <br>
+    </font>
+                Second mode window placement <br>
+
+    <font color='#ff0000'>
+          *info-mode-placement*
+    </font>
+    <font color='#0000ff'>
+       = TOP-LEFT-PLACEMENT <br>
+    </font>
+                Info mode window placement <br>
+
+    <font color='#ff0000'>
+          *query-mode-placement*
+    </font>
+    <font color='#0000ff'>
+       = TOP-LEFT-PLACEMENT <br>
+    </font>
+                Query mode window placement <br>
+
+    <font color='#ff0000'>
+          *circulate-mode-placement*
+    </font>
+    <font color='#0000ff'>
+       = BOTTOM-MIDDLE-PLACEMENT <br>
+    </font>
+                Circulate mode window placement <br>
+
+    <font color='#ff0000'>
+          *expose-mode-placement*
+    </font>
+    <font color='#0000ff'>
+       = TOP-LEFT-CHILD-PLACEMENT <br>
+    </font>
+                Expose mode window placement (Selection keys position) <br>
+
+    <font color='#ff0000'>
+          *notify-window-placement*
+    </font>
+    <font color='#0000ff'>
+       = BOTTOM-RIGHT-PLACEMENT <br>
+    </font>
+                Notify window placement <br>
+
+    <p>
+      <a name='query-string' href='#top'>
+        <= Query String Group => 
+      </a>
+    </p>
+    <font color='#ff0000'>
+          *query-font-string*
+    </font>
+    <font color='#0000ff'>
+       = "fixed" <br>
+    </font>
+                Query string window font string <br>
+
+    <font color='#ff0000'>
+          *query-background*
+    </font>
+    <font color='#0000ff'>
+       = "black" <br>
+    </font>
+                Query string window background color <br>
+
+    <font color='#ff0000'>
+          *query-message-color*
+    </font>
+    <font color='#0000ff'>
+       = "yellow" <br>
+    </font>
+                Query string window message color <br>
+
+    <font color='#ff0000'>
+          *query-foreground*
+    </font>
+    <font color='#0000ff'>
+       = "green" <br>
+    </font>
+                Query string window foreground color <br>
+
+    <font color='#ff0000'>
+          *query-cursor-color*
+    </font>
+    <font color='#0000ff'>
+       = "white" <br>
+    </font>
+                Query string window foreground cursor color <br>
+
+    <font color='#ff0000'>
+          *query-parent-color*
+    </font>
+    <font color='#0000ff'>
+       = "blue" <br>
+    </font>
+                Query string window parenthesis color <br>
+
+    <font color='#ff0000'>
+          *query-parent-error-color*
+    </font>
+    <font color='#0000ff'>
+       = "red" <br>
+    </font>
+                Query string window parenthesis color when no match <br>
+
+    <font color='#ff0000'>
+          *query-border*
+    </font>
+    <font color='#0000ff'>
+       = "red" <br>
+    </font>
+                Query string window border color <br>
+
+    <p>
+      <a name='second-mode' href='#top'>
+        <= Second Mode Group => 
+      </a>
+    </p>
+    <font color='#ff0000'>
+          *sm-border-color*
+    </font>
+    <font color='#0000ff'>
+       = "Green" <br>
+    </font>
+                Second mode window border color <br>
+
+    <font color='#ff0000'>
+          *sm-background-color*
+    </font>
+    <font color='#0000ff'>
+       = "Black" <br>
+    </font>
+                Second mode window background color <br>
+
+    <font color='#ff0000'>
+          *sm-foreground-color*
+    </font>
+    <font color='#0000ff'>
+       = "Red" <br>
+    </font>
+                Second mode window foreground color <br>
+
+    <font color='#ff0000'>
+          *sm-font-string*
+    </font>
+    <font color='#0000ff'>
+       = "fixed" <br>
+    </font>
+                Second mode window font string <br>
+
+    <font color='#ff0000'>
+          *sm-width*
+    </font>
+    <font color='#0000ff'>
+       = 300 <br>
+    </font>
+                Second mode window width <br>
+
+    <font color='#ff0000'>
+          *sm-height*
+    </font>
+    <font color='#0000ff'>
+       = 25 <br>
+    </font>
+                Second mode window height <br>
+
+    <p>
+      <small>
+        This documentation was produced with the CLFSWM auto-doc functions. To reproduce it, use the produce-conf-var-doc-html-in-file or
+the produce-all-docs function from the Lisp REPL.
+      </small>
+    </p>
+    <p>
+      <small>
+        Something like this:<br>
+LISP> (in-package :clfswm)<br>
+CLFSWM> (produce-conf-var-doc-html-in-file "my-variables.html")<br>
+or<br> CLFSWM> (produce-all-docs)
+      </small>
+    </p>
+  </body>
+</html>

Modified: clfswm/doc/variables.txt
==============================================================================
--- clfswm/doc/variables.txt	(original)
+++ clfswm/doc/variables.txt	Fri Mar 18 17:28:07 2011
@@ -1,215 +1,57 @@
     * CLFSWM Configuration variables *
       ------------------------------
 
-  <= Volume Mode Group =>
+<= Circulate Mode Group =>
 
-*VOLUME-FONT-STRING* = "fixed"
-  Volume string window font string
-*VOLUME-BACKGROUND* = "black"
-  Volume string window background color
-*VOLUME-FOREGROUND* = "green"
-  Volume string window foreground color
-*VOLUME-BORDER* = "red"
-  Volume string window border color
-*VOLUME-WIDTH* = 400
-  Volume mode window width
-*VOLUME-HEIGHT* = 15
-  Volume mode window height
-*VOLUME-TEXT-LIMIT* = 30
-  Maximum text limit in the volume window
-*VOLUME-EXTERNAL-MIXER-CMD* = "/usr/bin/gnome-alsamixer"
-  Command to start an external mixer program
-
-
-  <= Gimp Layout Group =>
-
-*GIMP-LAYOUT-NOTIFY-WINDOW-DELAY* = 30
-  Time to display the GIMP layout notify window help
-
-
-  <= Notify Window Group =>
-
-*NOTIFY-WINDOW-FONT-STRING* = "fixed"
-  Notify window font string
-*NOTIFY-WINDOW-BACKGROUND* = "black"
-  Notify Window background color
-*NOTIFY-WINDOW-FOREGROUND* = "green"
-  Notify Window foreground color
-*NOTIFY-WINDOW-BORDER* = "red"
-  Notify Window border color
-*NOTIFY-WINDOW-DELAY* = 10
-  Notify Window display delay
-
-
-  <= Menu Group =>
-
-*MENU-COLOR-SUBMENU* = "Cyan"
-  Submenu color in menu
-*MENU-COLOR-COMMENT* = "Yellow"
-  Comment color in menu
-*MENU-COLOR-KEY* = "Magenta"
-  Key color in menu
-*MENU-COLOR-MENU-KEY* = #<XLIB:COLOR 0.99609375 0.6015625 0.99609375>
-  Menu key color in menu
-*XDG-SECTION-LIST* = (TEXTEDITOR FILEMANAGER WEBBROWSER AUDIOVIDEO AUDIO VIDEO
-                      DEVELOPMENT EDUCATION GAME GRAPHICS NETWORK OFFICE
-                      SETTINGS SYSTEM UTILITY TERMINALEMULATOR ARCHLINUX
-                      SCREENSAVER)
-  Standard menu sections
-
-
-  <= Expose Mode Group =>
-
-*EXPOSE-FONT-STRING* = "fixed"
-  Expose string window font string
-*EXPOSE-BACKGROUND* = "black"
-  Expose string window background color
-*EXPOSE-FOREGROUND* = "green"
-  Expose string window foreground color
-*EXPOSE-BORDER* = "red"
-  Expose string window border color
-*EXPOSE-VALID-ON-KEY* = T
-  Valid expose mode when an accel key is pressed
-*EXPOSE-SHOW-WINDOW-TITLE* = T
-  Show the window title on accel window
-
-
-  <= Circulate Mode Group =>
-
-*CIRCULATE-FONT-STRING* = "fixed"
-  Circulate string window font string
-*CIRCULATE-BACKGROUND* = "black"
-  Circulate string window background color
-*CIRCULATE-FOREGROUND* = "green"
-  Circulate string window foreground color
-*CIRCULATE-BORDER* = "red"
-  Circulate string window border color
-*CIRCULATE-WIDTH* = 400
-  Circulate mode window width
-*CIRCULATE-HEIGHT* = 15
-  Circulate mode window height
-*CIRCULATE-TEXT-LIMITE* = 30
-  Maximum text limite in the circulate window
-
-
-  <= Info Mode Group =>
-
-*INFO-BACKGROUND* = "black"
-  Info window background color
-*INFO-FOREGROUND* = "green"
-  Info window foreground color
-*INFO-BORDER* = "red"
-  Info window border color
-*INFO-LINE-CURSOR* = "white"
-  Info window line cursor color color
-*INFO-SELECTED-BACKGROUND* = "blue"
-  Info selected item background color
-*INFO-FONT-STRING* = "fixed"
-  Info window font string
-*INFO-CLICK-TO-SELECT* = T
-  If true, click on info window select item. Otherwise, click to drag the menu
-*INFO-COLOR-TITLE* = "Magenta"
-  Colored info title color
-*INFO-COLOR-UNDERLINE* = "Yellow"
-  Colored info underline color
-*INFO-COLOR-FIRST* = "Cyan"
-  Colored info first color
-*INFO-COLOR-SECOND* = "lightblue"
-  Colored info second color
-
-
-  <= Query String Group =>
-
-*QUERY-FONT-STRING* = "fixed"
-  Query string window font string
-*QUERY-BACKGROUND* = "black"
-  Query string window background color
-*QUERY-MESSAGE-COLOR* = "yellow"
-  Query string window message color
-*QUERY-FOREGROUND* = "green"
-  Query string window foreground color
-*QUERY-CURSOR-COLOR* = "white"
-  Query string window foreground cursor color
-*QUERY-PARENT-COLOR* = "blue"
-  Query string window parenthesis color
-*QUERY-PARENT-ERROR-COLOR* = "red"
-  Query string window parenthesis color when no match
-*QUERY-BORDER* = "red"
-  Query string window border color
-
-
-  <= Identify Key Group =>
-
-*IDENTIFY-FONT-STRING* = "fixed"
-  Identify window font string
-*IDENTIFY-BACKGROUND* = "black"
-  Identify window background color
-*IDENTIFY-FOREGROUND* = "green"
-  Identify window foreground color
-*IDENTIFY-BORDER* = "red"
-  Identify window border color
-
-
-  <= Second Mode Group =>
-
-*SM-BORDER-COLOR* = "Green"
-  Second mode window border color
-*SM-BACKGROUND-COLOR* = "Black"
-  Second mode window background color
-*SM-FOREGROUND-COLOR* = "Red"
-  Second mode window foreground color
-*SM-FONT-STRING* = "fixed"
-  Second mode window font string
-*SM-WIDTH* = 300
-  Second mode window width
-*SM-HEIGHT* = 25
-  Second mode window height
-
-
-  <= Frame Colors Group =>
-
-*FRAME-BACKGROUND* = "Black"
-  Frame background
-*FRAME-FOREGROUND* = "Green"
-  Frame foreground
-*FRAME-FOREGROUND-ROOT* = "Red"
-  Frame foreground when the frame is the root frame
-*FRAME-FOREGROUND-HIDDEN* = "Darkgreen"
-  Frame foreground for hidden windows
-
-
-  <= Corner Group =>
-
-*CORNER-SIZE* = 3
-  The size of the corner square
-*CORNER-MAIN-MODE-LEFT-BUTTON* = ((:TOP-LEFT OPEN-MENU)
-                                  (:TOP-RIGHT PRESENT-VIRTUAL-KEYBOARD)
-                                  (:BOTTOM-RIGHT EXPOSE-WINDOWS-MODE)
-                                  (:BOTTOM-LEFT NIL))
-  Actions on corners in the main mode with the left mouse button
-*CORNER-MAIN-MODE-MIDDLE-BUTTON* = ((:TOP-LEFT HELP-ON-CLFSWM)
-                                    (:TOP-RIGHT ASK-CLOSE/KILL-CURRENT-WINDOW)
-                                    (:BOTTOM-RIGHT NIL) (:BOTTOM-LEFT NIL))
-  Actions on corners in the main mode with the middle mouse button
-*CORNER-MAIN-MODE-RIGHT-BUTTON* = ((:TOP-LEFT PRESENT-CLFSWM-TERMINAL)
-                                   (:TOP-RIGHT ASK-CLOSE/KILL-CURRENT-WINDOW)
-                                   (:BOTTOM-RIGHT EXPOSE-ALL-WINDOWS-MODE)
-                                   (:BOTTOM-LEFT START-FILE-MANAGER))
-  Config(Corner group): Actions on corners in the main mode with the right mouse button
-*CORNER-SECOND-MODE-LEFT-BUTTON* = ((:TOP-LEFT NIL) (:TOP-RIGHT NIL)
+  *CIRCULATE-FONT-STRING* = "fixed"
+    Circulate string window font string
+  *CIRCULATE-BACKGROUND* = "black"
+    Circulate string window background color
+  *CIRCULATE-FOREGROUND* = "green"
+    Circulate string window foreground color
+  *CIRCULATE-BORDER* = "red"
+    Circulate string window border color
+  *CIRCULATE-WIDTH* = 400
+    Circulate mode window width
+  *CIRCULATE-HEIGHT* = 15
+    Circulate mode window height
+  *CIRCULATE-TEXT-LIMITE* = 30
+    Maximum text limite in the circulate window
+
+
+<= Corner Group =>
+
+  *CORNER-SIZE* = 3
+    The size of the corner square
+  *CORNER-MAIN-MODE-LEFT-BUTTON* = ((:TOP-LEFT OPEN-MENU)
+                                    (:TOP-RIGHT PRESENT-VIRTUAL-KEYBOARD)
                                     (:BOTTOM-RIGHT EXPOSE-WINDOWS-MODE)
                                     (:BOTTOM-LEFT NIL))
-  Actions on corners in the second mode with the left mouse button
-*CORNER-SECOND-MODE-MIDDLE-BUTTON* = ((:TOP-LEFT HELP-ON-CLFSWM)
-                                      (:TOP-RIGHT NIL) (:BOTTOM-RIGHT NIL)
-                                      (:BOTTOM-LEFT NIL))
-  Actions on corners in the second mode with the middle mouse button
-*CORNER-SECOND-MODE-RIGHT-BUTTON* = ((:TOP-LEFT NIL) (:TOP-RIGHT NIL)
+    Actions on corners in the main mode with the left mouse button
+  *CORNER-MAIN-MODE-MIDDLE-BUTTON* = ((:TOP-LEFT HELP-ON-CLFSWM)
+                                      (:TOP-RIGHT
+                                       ASK-CLOSE/KILL-CURRENT-WINDOW)
+                                      (:BOTTOM-RIGHT NIL) (:BOTTOM-LEFT NIL))
+    Actions on corners in the main mode with the middle mouse button
+  *CORNER-MAIN-MODE-RIGHT-BUTTON* = ((:TOP-LEFT PRESENT-CLFSWM-TERMINAL)
+                                     (:TOP-RIGHT ASK-CLOSE/KILL-CURRENT-WINDOW)
                                      (:BOTTOM-RIGHT EXPOSE-ALL-WINDOWS-MODE)
                                      (:BOTTOM-LEFT NIL))
-  Actions on corners in the second mode with the right mouse button
-*VIRTUAL-KEYBOARD-CMD* = "xvkbd"
-  The command to display the virtual keybaord
+    Actions on corners in the main mode with the right mouse button
+  *CORNER-SECOND-MODE-LEFT-BUTTON* = ((:TOP-LEFT NIL) (:TOP-RIGHT NIL)
+                                      (:BOTTOM-RIGHT EXPOSE-WINDOWS-MODE)
+                                      (:BOTTOM-LEFT NIL))
+    Actions on corners in the second mode with the left mouse button
+  *CORNER-SECOND-MODE-MIDDLE-BUTTON* = ((:TOP-LEFT HELP-ON-CLFSWM)
+                                        (:TOP-RIGHT NIL) (:BOTTOM-RIGHT NIL)
+                                        (:BOTTOM-LEFT NIL))
+    Actions on corners in the second mode with the middle mouse button
+  *CORNER-SECOND-MODE-RIGHT-BUTTON* = ((:TOP-LEFT NIL) (:TOP-RIGHT NIL)
+                                       (:BOTTOM-RIGHT EXPOSE-ALL-WINDOWS-MODE)
+                                       (:BOTTOM-LEFT NIL))
+    Actions on corners in the second mode with the right mouse button
+  *VIRTUAL-KEYBOARD-CMD* = "xvkbd"
+    The command to display the virtual keybaord
   Here is an ~/.Xresources example for xvkbd:
     xvkbd.windowGeometry: 300x100-0-0
     xvkbd*Font: 6x12
@@ -217,131 +59,265 @@
     xvkbd.customization: -french
     xvkbd.keypad: false
   And make it always on top
-*CLFSWM-TERMINAL-NAME* = "clfswm-terminal"
-  The clfswm terminal name
-*CLFSWM-TERMINAL-CMD* = "xterm -T clfswm-terminal"
-  The clfswm terminal command.
+  *CLFSWM-TERMINAL-NAME* = "clfswm-terminal"
+    The clfswm terminal name
+  *CLFSWM-TERMINAL-CMD* = "xterm -T clfswm-terminal"
+    The clfswm terminal command.
 This command must set the window title to *clfswm-terminal-name*
 
 
-  <= Placement Group =>
+<= Expose Mode Group =>
 
-*BANISH-POINTER-PLACEMENT* = MIDDLE-RIGHT-CHILD-PLACEMENT
-  Pointer banishment placement
-*SECOND-MODE-PLACEMENT* = TOP-MIDDLE-PLACEMENT
-  Second mode window placement
-*INFO-MODE-PLACEMENT* = TOP-LEFT-PLACEMENT
-  Info mode window placement
-*QUERY-MODE-PLACEMENT* = TOP-LEFT-PLACEMENT
-  Query mode window placement
-*CIRCULATE-MODE-PLACEMENT* = BOTTOM-MIDDLE-PLACEMENT
-  Circulate mode window placement
-*EXPOSE-MODE-PLACEMENT* = TOP-LEFT-CHILD-PLACEMENT
-  Expose mode window placement (Selection keys position)
-*NOTIFY-WINDOW-PLACEMENT* = BOTTOM-RIGHT-PLACEMENT
-  Notify window placement
-*VOLUME-MODE-PLACEMENT* = BOTTOM-MIDDLE-PLACEMENT
-  Volume mode window placement
-
-
-  <= Hook Group =>
-
-*BINDING-HOOK* = (SET-DEFAULT-EXPOSE-KEYS SET-DEFAULT-CIRCULATE-KEYS
-                                          INIT-*INFO-KEYS* INIT-*INFO-MOUSE*
-                                          SET-DEFAULT-INFO-KEYS
-                                          SET-DEFAULT-INFO-MOUSE
-                                          INIT-*QUERY-KEYS*
-                                          SET-DEFAULT-QUERY-KEYS
-                                          INIT-*MAIN-KEYS* INIT-*MAIN-MOUSE*
-                                          SET-DEFAULT-MAIN-KEYS
-                                          SET-DEFAULT-MAIN-MOUSE
-                                          INIT-*SECOND-KEYS*
-                                          INIT-*SECOND-MOUSE*
-                                          SET-DEFAULT-SECOND-KEYS
-                                          SET-DEFAULT-SECOND-MOUSE MPD-BINDING
-                                          FR-BINDING REBOOT-HALT-BINDING
-                                          INIT-*VOLUME-KEYS*
-                                          SET-DEFAULT-VOLUME-KEYS
-                                          AMIXER-VOLUME-BIND LOCAL-BINDING)
-  Hook executed when keys/buttons are bounds
-*LOOP-HOOK* = NIL
-  Hook executed on each event loop
-*MAIN-ENTRANCE-HOOK* = NIL
-  Hook executed on the main function entrance after
+  *EXPOSE-FONT-STRING* = "fixed"
+    Expose string window font string
+  *EXPOSE-BACKGROUND* = "black"
+    Expose string window background color
+  *EXPOSE-FOREGROUND* = "green"
+    Expose string window foreground color
+  *EXPOSE-BORDER* = "red"
+    Expose string window border color
+  *EXPOSE-VALID-ON-KEY* = T
+    Valid expose mode when an accel key is pressed
+  *EXPOSE-SHOW-WINDOW-TITLE* = T
+    Show the window title on accel window
+
+
+<= Frame Colors Group =>
+
+  *FRAME-BACKGROUND* = "Black"
+    Frame background
+  *FRAME-FOREGROUND* = "Green"
+    Frame foreground
+  *FRAME-FOREGROUND-ROOT* = "Red"
+    Frame foreground when the frame is the root frame
+  *FRAME-FOREGROUND-HIDDEN* = "Darkgreen"
+    Frame foreground for hidden windows
+
+
+<= Gimp Layout Group =>
+
+  *GIMP-LAYOUT-NOTIFY-WINDOW-DELAY* = 30
+    Time to display the GIMP layout notify window help
+
+
+<= Hook Group =>
+
+  *BINDING-HOOK* = (SET-DEFAULT-CIRCULATE-KEYS SET-DEFAULT-EXPOSE-KEYS
+                                               INIT-*INFO-KEYS*
+                                               INIT-*INFO-MOUSE*
+                                               SET-DEFAULT-INFO-KEYS
+                                               SET-DEFAULT-INFO-MOUSE
+                                               INIT-*QUERY-KEYS*
+                                               SET-DEFAULT-QUERY-KEYS
+                                               INIT-*MAIN-KEYS*
+                                               INIT-*MAIN-MOUSE*
+                                               SET-DEFAULT-MAIN-KEYS
+                                               SET-DEFAULT-MAIN-MOUSE
+                                               INIT-*SECOND-KEYS*
+                                               INIT-*SECOND-MOUSE*
+                                               SET-DEFAULT-SECOND-KEYS
+                                               SET-DEFAULT-SECOND-MOUSE)
+    Hook executed when keys/buttons are bounds
+  *LOOP-HOOK* = NIL
+    Hook executed on each event loop
+  *MAIN-ENTRANCE-HOOK* = NIL
+    Hook executed on the main function entrance after
 loading configuration file and before opening the display.
-*INIT-HOOK* = (DEFAULT-INIT-HOOK DISPLAY-HELLO-WINDOW MY-INIT-HOOK
-                                 INIT-SURF-FRAME)
-  Init hook. This hook is run just after the first root frame is created
-*CLOSE-HOOK* = (CLOSE-NOTIFY-WINDOW CLOSE-CLFSWM-TERMINAL
-                                    CLOSE-VIRTUAL-KEYBOARD)
-  Close hook. This hook is run just before closing the display
-*DEFAULT-NW-HOOK* = DEFAULT-FRAME-NW-HOOK
-  Default action to do on newly created windows
-
-
-  <= Main Mode Group =>
-
-*COLOR-MOVE-WINDOW* = "DeepPink"
-  Color when moving or resizing a windows
-*COLOR-SELECTED* = "Red"
-  Color of selected window
-*COLOR-UNSELECTED* = "Blue"
-  Color of unselected color
-*COLOR-MAYBE-SELECTED* = "Yellow"
-  Color of maybe selected windows
+  *INIT-HOOK* = (DEFAULT-INIT-HOOK DISPLAY-HELLO-WINDOW)
+    Init hook. This hook is run just after the first root frame is created
+  *CLOSE-HOOK* = (CLOSE-NOTIFY-WINDOW CLOSE-CLFSWM-TERMINAL
+                                      CLOSE-VIRTUAL-KEYBOARD)
+    Close hook. This hook is run just before closing the display
+  *DEFAULT-NW-HOOK* = DEFAULT-FRAME-NW-HOOK
+    Default action to do on newly created windows
+
+
+<= Identify Key Group =>
+
+  *IDENTIFY-FONT-STRING* = "fixed"
+    Identify window font string
+  *IDENTIFY-BACKGROUND* = "black"
+    Identify window background color
+  *IDENTIFY-FOREGROUND* = "green"
+    Identify window foreground color
+  *IDENTIFY-BORDER* = "red"
+    Identify window border color
+
+
+<= Info Mode Group =>
+
+  *INFO-BACKGROUND* = "black"
+    Info window background color
+  *INFO-FOREGROUND* = "green"
+    Info window foreground color
+  *INFO-BORDER* = "red"
+    Info window border color
+  *INFO-LINE-CURSOR* = "white"
+    Info window line cursor color color
+  *INFO-SELECTED-BACKGROUND* = "blue"
+    Info selected item background color
+  *INFO-FONT-STRING* = "fixed"
+    Info window font string
+  *INFO-CLICK-TO-SELECT* = T
+    If true, click on info window select item. Otherwise, click to drag the menu
+  *INFO-COLOR-TITLE* = "Magenta"
+    Colored info title color
+  *INFO-COLOR-UNDERLINE* = "Yellow"
+    Colored info underline color
+  *INFO-COLOR-FIRST* = "Cyan"
+    Colored info first color
+  *INFO-COLOR-SECOND* = "lightblue"
+    Colored info second color
+
+
+<= Main Mode Group =>
+
+  *COLOR-MOVE-WINDOW* = "DeepPink"
+    Color when moving or resizing a windows
+  *COLOR-SELECTED* = "Red"
+    Color of selected window
+  *COLOR-UNSELECTED* = "Blue"
+    Color of unselected color
+  *COLOR-MAYBE-SELECTED* = "Yellow"
+    Color of maybe selected windows
+
+
+<= Menu Group =>
+
+  *MENU-COLOR-SUBMENU* = "Cyan"
+    Submenu color in menu
+  *MENU-COLOR-COMMENT* = "Yellow"
+    Comment color in menu
+  *MENU-COLOR-KEY* = "Magenta"
+    Key color in menu
+  *MENU-COLOR-MENU-KEY* = #<XLIB:COLOR 0.99609375 0.6015625 0.99609375>
+    Menu key color in menu
+  *XDG-SECTION-LIST* = (TEXTEDITOR FILEMANAGER WEBBROWSER AUDIOVIDEO AUDIO
+                        VIDEO DEVELOPMENT EDUCATION GAME GRAPHICS NETWORK
+                        OFFICE SETTINGS SYSTEM UTILITY TERMINALEMULATOR
+                        ARCHLINUX SCREENSAVER)
+    Standard menu sections
 
 
-  <= Miscellaneous Group =>
+<= Miscellaneous Group =>
 
-*HAVE-TO-COMPRESS-NOTIFY* = T
-  Compress event notify?
+  *HAVE-TO-COMPRESS-NOTIFY* = T
+    Compress event notify?
 This variable may be useful to speed up some slow version of CLX.
 It is particulary useful with CLISP/MIT-CLX.
-*SHOW-ROOT-FRAME-P* = NIL
-  Show the root frame information or not
-*BORDER-SIZE* = 1
-  Windows and frames border size
-*LOOP-TIMEOUT* = 0.1
-  Maximum time (in seconds) to wait before calling *loop-hook*
-*DEFAULT-FONT-STRING* = "fixed"
-  The default font used in clfswm
-*DEFAULT-FRAME-DATA* = ((:TILE-SIZE 0.8) (:TILE-SPACE-SIZE 0.1)
-                        (:MAIN-LAYOUT-WINDOWS NIL)
-                        (:FAST-LAYOUT (TILE-SPACE-LAYOUT NO-LAYOUT)))
-  Default slots set in frame date
-*DEFAULT-MANAGED-TYPE* = (:NORMAL)
-  Default managed window types
-*DEFAULT-FOCUS-POLICY* = :CLICK
-  Default mouse focus policy. One of :click, :sloppy, :sloppy-strict or :sloppy-select.
-*DEFAULT-MODIFIERS* = NIL
-  Default modifiers list to append to explicit modifiers
+  *SHOW-ROOT-FRAME-P* = NIL
+    Show the root frame information or not
+  *BORDER-SIZE* = 1
+    Windows and frames border size
+  *LOOP-TIMEOUT* = 0.1
+    Maximum time (in seconds) to wait before calling *loop-hook*
+  *DEFAULT-FONT-STRING* = "fixed"
+    The default font used in clfswm
+  *DEFAULT-FRAME-DATA* = ((:TILE-SIZE 0.8) (:TILE-SPACE-SIZE 0.1)
+                          (:FAST-LAYOUT (TILE-LEFT-LAYOUT TILE-LAYOUT))
+                          (:MAIN-LAYOUT-WINDOWS NIL))
+    Default slots set in frame date
+  *DEFAULT-MANAGED-TYPE* = (:NORMAL)
+    Default managed window types
+  *DEFAULT-FOCUS-POLICY* = :CLICK
+    Default mouse focus policy. One of :click, :sloppy, :sloppy-strict or :sloppy-select.
+  *DEFAULT-MODIFIERS* = NIL
+    Default modifiers list to append to explicit modifiers
 Example: :mod-2 for num_lock, :lock for Caps_lock...
-*NEVER-MANAGED-WINDOW-LIST* = ((EQUAL-WM-CLASS-ROX-PINBOARD NIL)
-                               (EQUAL-WM-CLASS-XVKBD RAISE-WINDOW)
-                               (EQUAL-CLFSWM-TERMINAL RAISE-AND-FOCUS-WINDOW))
-  CLFSWM will never manage windows of this type.
+  *NEVER-MANAGED-WINDOW-LIST* = ((EQUAL-WM-CLASS-ROX-PINBOARD NIL)
+                                 (EQUAL-WM-CLASS-XVKBD RAISE-WINDOW)
+                                 (EQUAL-CLFSWM-TERMINAL RAISE-AND-FOCUS-WINDOW))
+    CLFSWM will never manage windows of this type.
 A list of (list match-function handle-function)
-*HIDE-UNMANAGED-WINDOW* = T
-  Hide or not unmanaged windows when a child is deselected.
-*CREATE-FRAME-ON-ROOT* = NIL
-  Create frame on root.
+  *HIDE-UNMANAGED-WINDOW* = T
+    Hide or not unmanaged windows when a child is deselected.
+  *CREATE-FRAME-ON-ROOT* = NIL
+    Create frame on root.
 Set this variable to true if you want to allow to create a new frame
 on the root window in the main mode with the mouse
-*DEFAULT-WINDOW-WIDTH* = 400
-  Default window width
-*DEFAULT-WINDOW-HEIGHT* = 300
-  Default window height
+  *DEFAULT-WINDOW-WIDTH* = 400
+    Default window width
+  *DEFAULT-WINDOW-HEIGHT* = 300
+    Default window height
+
+
+<= Notify Window Group =>
+
+  *NOTIFY-WINDOW-FONT-STRING* = "fixed"
+    Notify window font string
+  *NOTIFY-WINDOW-BACKGROUND* = "black"
+    Notify Window background color
+  *NOTIFY-WINDOW-FOREGROUND* = "green"
+    Notify Window foreground color
+  *NOTIFY-WINDOW-BORDER* = "red"
+    Notify Window border color
+  *NOTIFY-WINDOW-DELAY* = 10
+    Notify Window display delay
+
+
+<= Placement Group =>
+
+  *BANISH-POINTER-PLACEMENT* = BOTTOM-RIGHT-PLACEMENT
+    Pointer banishment placement
+  *SECOND-MODE-PLACEMENT* = TOP-MIDDLE-PLACEMENT
+    Second mode window placement
+  *INFO-MODE-PLACEMENT* = TOP-LEFT-PLACEMENT
+    Info mode window placement
+  *QUERY-MODE-PLACEMENT* = TOP-LEFT-PLACEMENT
+    Query mode window placement
+  *CIRCULATE-MODE-PLACEMENT* = BOTTOM-MIDDLE-PLACEMENT
+    Circulate mode window placement
+  *EXPOSE-MODE-PLACEMENT* = TOP-LEFT-CHILD-PLACEMENT
+    Expose mode window placement (Selection keys position)
+  *NOTIFY-WINDOW-PLACEMENT* = BOTTOM-RIGHT-PLACEMENT
+    Notify window placement
+
+
+<= Query String Group =>
+
+  *QUERY-FONT-STRING* = "fixed"
+    Query string window font string
+  *QUERY-BACKGROUND* = "black"
+    Query string window background color
+  *QUERY-MESSAGE-COLOR* = "yellow"
+    Query string window message color
+  *QUERY-FOREGROUND* = "green"
+    Query string window foreground color
+  *QUERY-CURSOR-COLOR* = "white"
+    Query string window foreground cursor color
+  *QUERY-PARENT-COLOR* = "blue"
+    Query string window parenthesis color
+  *QUERY-PARENT-ERROR-COLOR* = "red"
+    Query string window parenthesis color when no match
+  *QUERY-BORDER* = "red"
+    Query string window border color
+
+
+<= Second Mode Group =>
+
+  *SM-BORDER-COLOR* = "Green"
+    Second mode window border color
+  *SM-BACKGROUND-COLOR* = "Black"
+    Second mode window background color
+  *SM-FOREGROUND-COLOR* = "Red"
+    Second mode window foreground color
+  *SM-FONT-STRING* = "fixed"
+    Second mode window font string
+  *SM-WIDTH* = 300
+    Second mode window width
+  *SM-HEIGHT* = 25
+    Second mode window height
 
  Those variables can be changed in clfswm.
 Maybe you'll need to restart clfswm to take care of new values
 
 This documentation was produced with the CLFSWM auto-doc functions.
-To reproduce it, use the produce-configuration-variables-doc-in-file or
+To reproduce it, use the produce-conf-var-doc-in-file or
 the produce-all-docs function from the Lisp REPL.
 
 Something like this:
 LISP> (in-package :clfswm)
-CLFSWM> (produce-configuration-variables-doc-in-file "my-variables.txt")
+CLFSWM> (produce-conf-var-doc-in-file "my-variables.txt")
 or
 CLFSWM> (produce-all-docs)
 

Modified: clfswm/src/clfswm-autodoc.lisp
==============================================================================
--- clfswm/src/clfswm-autodoc.lisp	(original)
+++ clfswm/src/clfswm-autodoc.lisp	Fri Mar 18 17:28:07 2011
@@ -306,33 +306,33 @@
 
 
 ;;; Configuration variables autodoc functions
-(defun produce-configuration-variables-doc (stream &optional (group t) (title t) (footnote t))
+(defun produce-conf-var-doc (stream &optional (group t) (title t) (footnote t))
   (when title
     (format stream "    * CLFSWM Configuration variables *~%")
     (format stream "      ------------------------------~2%"))
-  (format stream "  <= ~A =>~2%" (if (equal group t) ""
+  (format stream "<= ~A =>~2%" (if (equal group t) ""
                                      (config-group->string group)))
   (maphash (lambda (key val)
              (when (or (equal group t)
                        (equal group (configvar-group val)))
-               (format stream "~A = ~S~%  ~A~%" key (symbol-value key)
+               (format stream "  ~A = ~S~%    ~A~%" key (symbol-value key)
                        (documentation key 'variable))))
            *config-var-table*)
   (when footnote
     (format stream "~2& Those variables can be changed in clfswm.
 Maybe you'll need to restart clfswm to take care of new values")
     (format stream "~2%This documentation was produced with the CLFSWM auto-doc functions.
-To reproduce it, use the produce-configuration-variables-doc-in-file or
+To reproduce it, use the produce-conf-var-doc-in-file or
 the produce-all-docs function from the Lisp REPL.
 
 Something like this:
 LISP> (in-package :clfswm)
-CLFSWM> (produce-configuration-variables-doc-in-file \"my-variables.txt\")
+CLFSWM> (produce-conf-var-doc-in-file \"my-variables.txt\")
 or
 CLFSWM> (produce-all-docs)~2%"))
   (format stream "~2%"))
 
-(defun produce-configuration-variables-doc-in-file (filename)
+(defun produce-conf-var-doc-in-file (filename)
   (format t "Producing text config variables documentation in ~S " filename)
   (with-open-file (stream filename :direction :output
 			  :if-exists :supersede :if-does-not-exist :create)
@@ -340,12 +340,67 @@
            (all-groups (config-all-groups))
            (last-group (first (last all-groups))))
       (dolist (group all-groups)
-        (produce-configuration-variables-doc stream group title
+        (produce-conf-var-doc stream group title
                                              (equal group last-group))
         (setf title nil))))
   (format t " done~%"))
 
 
+(defun produce-conf-var-doc-html (&optional (stream t))
+  (let ((all-groups (config-all-groups)))
+    (labels ((conf-var-group ()
+               `((h3 ("a name='TOP'" "Configuration variables groups:"))
+                 (ul ,@(loop for group in all-groups
+                          collect `(li (,(format nil "a href='#~A'" group) ,(config-group->string group)))))))
+             (colorize-line (group list)
+               (let ((acc nil))
+                 (dolist (line list)
+                   (cond ((search "* =" line)
+                          (let ((pos (position #\= line)))
+                            (push `("font color='#FF0000'" ,(format nil "  ~(~A~)" (subseq line 0 (1- pos)))) acc)
+                            (push `("font color='#0000FF'" ,(format nil "~A<br>" (subseq line (1- pos)))) acc)))
+                         ((search "<=" line)
+                          (push `(p (,(format nil "a name='~A' href='#TOP'" group) ,(escape-html line))) acc))
+                         ((not (string= line " "))
+                          (push (format nil "        ~A<br>~%" line) acc))))
+                 (nreverse acc)))
+             (conf-var (group)
+               (colorize-line group
+                              (split-string (append-newline-space
+                                             (with-output-to-string (stream)
+                                               (produce-conf-var-doc stream group nil nil)))
+                                            #\Newline)))
+             (all-conf-var ()
+               (let ((acc nil))
+                 (dolist (group all-groups)
+                   (setf acc (nconc acc (conf-var group))))
+                 acc)))
+      (produce-html `(html
+                      (head
+                       (title "CLFSWM - Configuration variables"))
+                      (body
+                       (h1 ("a name='Top'" "CLFSWM - Configuration variables"))
+                       (p "Here are the variables you can configure in CLFSWM with the configuration file or the configuration menu:")
+                       ,@(conf-var-group)
+                       ,@(all-conf-var)
+                       (p (small "This documentation was produced with the CLFSWM auto-doc functions. To reproduce it, use the produce-conf-var-doc-html-in-file or
+the produce-all-docs function from the Lisp REPL."))
+                       (p (small "Something like this:<br>
+LISP> (in-package :clfswm)<br>
+CLFSWM> (produce-conf-var-doc-html-in-file \"my-variables.html\")<br>
+or<br> CLFSWM> (produce-all-docs)"))))
+                    0 stream))))
+
+
+(defun produce-conf-var-doc-html-in-file (filename)
+  (format t "Producing html configuration variables documentation in ~S " filename)
+  (with-open-file (stream filename :direction :output
+			  :if-exists :supersede :if-does-not-exist :create)
+    (produce-conf-var-doc-html stream))
+  (format t " done~%"))
+
+
+
 
 
 
@@ -359,7 +414,8 @@
   (produce-menu-doc-html-in-file "doc/menu.html")
   (produce-corner-doc-in-file "doc/corner.txt")
   (produce-corner-doc-html-in-file "doc/corner.html")
-  (produce-configuration-variables-doc-in-file "doc/variables.txt"))
+  (produce-conf-var-doc-in-file "doc/variables.txt")
+  (produce-conf-var-doc-html-in-file "doc/variables.html"))
 
 
 

Modified: clfswm/src/clfswm-internal.lisp
==============================================================================
--- clfswm/src/clfswm-internal.lisp	(original)
+++ clfswm/src/clfswm-internal.lisp	Fri Mar 18 17:28:07 2011
@@ -505,6 +505,11 @@
       (when (xlib:window-p window)
 	, at body)))
 
+(defun get-first-window ()
+  (typecase *current-child*
+    (xlib:window  *current-child*)
+    (frame (first (frame-child *current-child*)))))
+
 
 
 
@@ -782,16 +787,17 @@
 
 
 
-(defun hide-all-children (root)
+(defun hide-all-children (root &optional except)
   "Hide all root children"
-  (when (frame-p root)
+  (when (and (frame-p root) (not (child-equal-p root except)))
     (dolist (child (frame-child root))
-      (hide-all child))))
+      (hide-all child except))))
 
-(defun hide-all (root)
+(defun hide-all (root &optional except)
   "Hide root and all its children"
-  (hide-child root)
-  (hide-all-children root))
+  (unless (child-equal-p root except)
+    (hide-child root))
+  (hide-all-children root except))
 
 
 
@@ -879,11 +885,12 @@
 
 (defun leave-frame ()
   "Leave the selected frame - ie make its parent the root frame"
-  (hide-all *current-root*)
-  (awhen (find-parent-frame *current-root*)
-    (when (frame-p it)
-      (setf *current-root* it)))
-  (show-all-children))
+  (unless (child-equal-p *current-root* *root-frame*)
+    (hide-all *current-root* (get-first-window))
+    (awhen (find-parent-frame *current-root*)
+           (when (frame-p it)
+             (setf *current-root* it)))
+    (show-all-children)))
 
 
 ;;; Other actions (select-next-child, select-next-brother...) are in

Modified: clfswm/src/my-html.lisp
==============================================================================
--- clfswm/src/my-html.lisp	(original)
+++ clfswm/src/my-html.lisp	Fri Mar 18 17:28:07 2011
@@ -30,6 +30,7 @@
 (defpackage :my-html
   (:use :common-lisp :tools)
   (:export :insert-html-doctype
+           :escape-html
 	   :produce-html
 	   :with-html
 	   :produce-html-string))
@@ -42,6 +43,18 @@
      \"http://www.w3.org/TR/html4/transitional.dtd\">")
 
 
+(defun escape-html (string &optional (replace '((">" ">") ("<" "<"))))
+  (if replace
+      (aif (search (caar replace) string)
+           (escape-html (concatenate 'string (subseq string 0 it)
+                                     (cadar replace)
+                                     (subseq string (+ it (length (caar replace)))))
+                replace)
+           (escape-html string (cdr replace)))
+      string))
+
+
+
 
 (defun produce-html (tree &optional (level 0) (stream *standard-output*))
   (cond ((listp tree)

Modified: clfswm/src/tools.lisp
==============================================================================
--- clfswm/src/tools.lisp	(original)
+++ clfswm/src/tools.lisp	Fri Mar 18 17:28:07 2011
@@ -156,7 +156,8 @@
                (declare (ignore key))
                (pushnew (configvar-group val) all-groups :test #'equal))
              *config-var-table*)
-    all-groups))
+    (sort all-groups (lambda (x y)
+                       (string< (string x) (string y))))))
 
 
 




More information about the clfswm-cvs mailing list