1 2011-02-27 Philippe Brochard <pbrochard@common-lisp.net>
3 * src/clfswm-configuration.lisp (reset-all-config-variables): New
4 function and menu entry.
5 (query-conf-value): Add the ability to leave the field blank to
6 reset the variable to its default value.
8 2011-02-26 Philippe Brochard <pbrochard@common-lisp.net>
10 * src/clfswm-configuration.lisp
11 (add-all-configuration-default-value): Add a default value to
12 configurable variables.
14 2011-02-23 Philippe Brochard <pbrochard@common-lisp.net>
16 * src/clfswm.lisp (main-unprotected): Create the configuration
17 menu only once at startup.
19 2011-02-22 Desmond O. Chang <dochang@gmail.com>
21 * contrib/amixer.lisp: Add a volume mode inspired by the emms
22 volume package. Alsa mixer interface.
24 * contrib/volume-mode.lisp: Add a volume mode inspired by the emms
27 2011-02-22 Desmond O. Chang <dochang@gmail.com>
29 * src/clfswm.lisp (main): Use ASDF:SYSTEM-SOURCE-DIRECTORY instead
30 of *LOAD-TRUENAME*. *LOAD-TRUENAME* is only bound during a call to
31 LOAD. If one eval CLFSWM:MAIN in repl, BASE-DIR will be an empty
32 string. Use ASDF:SYSTEM-SOURCE-DIRECTORY to fix it.
34 2011-02-16 Philippe Brochard <pbrochard@common-lisp.net>
36 * src/clfswm.lisp (main-unprotected): Add a close hook. And close
37 the notify window, the virtual keyboard and the clfswm terminal by
40 2011-02-15 Philippe Brochard <pbrochard@common-lisp.net>
42 * src/clfswm.lisp (main-unprotected): Destroy the notify window
43 before closing the display. This fix a bug when resetting/reloading
46 2011-02-12 Philippe Brochard <pbrochard@common-lisp.net>
48 * src/xlib-util.lisp (equal-wm-class-fun, equal-wm-name-fun)
49 (raise-window-fun, raise-and-focus-window-fun): New functions.
51 * src/config.lisp (*clfswm-terminal-cmd*): Switch from xterm to
53 (*never-managed-window-list*): Structure change to be more
54 flexible. Let the choice to focus, raise and do nothing on never
57 2011-02-09 Philippe Brochard <pbrochard@common-lisp.net>
59 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Take
60 care of never managed windows to move or resize them if the raise
63 * src/clfswm-internal.lisp (in-frame, in-window, in-child): New
66 2011-02-08 Philippe Brochard <pbrochard@common-lisp.net>
68 * src/clfswm.lisp (main-mode): Raise or not unmanaged windows
69 following request in *never-managed-window-list*.
71 2011-02-05 Philippe Brochard <pbrochard@common-lisp.net>
73 * *: **** Release 1102 ****
75 2011-02-05 Desmond O. Chang <dochang@gmail.com>
77 * src/keysyms.lisp: Add extended keysyms from stumpwm.
79 2011-02-01 Desmond O. Chang <dochang@gmail.com>
81 * src/clfswm-util.lisp (run-or-raise): New function (thanks to
84 * src/clfswm-internal.lisp (with-all-*): add a nil block.
86 2011-01-28 Desmond O. Chang <dochang@gmail.com>
88 * src/clfswm-util.lisp (xdg-config-home): XDG_CONFIG_HOME should
89 be $HOME/.config by default.
91 2010-12-29 Philippe Brochard <pbrochard@common-lisp.net>
93 * contrib/osd.lisp (display-doc): Add another method where a
94 CLFSWM native window is used to display the key documentation.
96 2010-12-27 Philippe Brochard <pbrochard@common-lisp.net>
98 * src/xlib-util.lisp (with-xlib-protect): Force to revert to the
101 2010-12-25 Philippe Brochard <pbrochard@common-lisp.net>
103 * src/clfswm-second-mode.lisp (second-key-mode): Call the second
104 mode leave function only when the generic mode was ended.
106 2010-12-08 Philippe Brochard <pbrochard@common-lisp.net>
108 * src/clfswm-second-mode.lisp (sm-leave-function): Do not use
109 *second-mode-program* anymore.
111 2010-12-07 Philippe Brochard <pbrochard@common-lisp.net>
113 * src/clfswm-second-mode.lisp (*second-mode-leave-function*): New
114 variable bound to a function executed (when not null) on second
117 2010-11-14 Philippe Brochard <pbrochard@common-lisp.net>
119 * src/clfswm-util.lisp (find-child-under-mouse): Do not find
122 2010-11-13 Philippe Brochard <pbrochard@common-lisp.net>
124 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
125 Do not display the accel window for unmanaged windows.
127 2010-11-11 Philippe Brochard <pbrochard@common-lisp.net>
129 * src/clfswm-internal.lisp (set-current-root): Handle
130 window-parent in set-current-root.
132 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
133 focus the parent child when the current root is a window.
135 2010-11-09 Philippe Brochard <pbrochard@common-lisp.net>
137 * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
138 New function an bindings.
140 * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
143 2010-11-07 Philippe Brochard <pbrochard@common-lisp.net>
145 * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
146 function to let the user choose to keep child position with
149 * src/clfswm-internal.lisp (remove-frame-data-slot): New
152 2010-11-05 Philippe Brochard <pbrochard@common-lisp.net>
154 * src/clfswm-internal.lisp (frame-select-next-child)
155 (frame-select-previous-child): New functions and bindings. Select
156 the next/previous child in the current frame.
158 2010-10-31 Philippe Brochard <pbrochard@common-lisp.net>
160 * src/clfswm-query.lisp (query-mode-complet): New function: Handle
161 completion in query-mode.
163 2010-10-30 Philippe Brochard <pbrochard@common-lisp.net>
165 * src/clfswm-query.lisp (query-print-string): Handle long lines
168 2010-10-27 Philippe Brochard <pbrochard@common-lisp.net>
170 * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
171 all characters are printable.
173 2010-10-25 Philippe Brochard <pbrochard@common-lisp.net>
175 * contrib/server/server.lisp: Load clfswm client code in the main
176 program and let the user start it with a --client command line
179 * src/package.lisp (*main-entrance-hook*): New hook executed after
180 loading configuration file and before opening the display.
182 2010-10-23 Philippe Brochard <pbrochard@common-lisp.net>
184 * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
186 * src/clfswm-internal.lisp (show-child): Show window only if not
189 * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
190 change modifiers after binding definition.
192 2010-10-21 Philippe Brochard <pbrochard@common-lisp.net>
194 * contrib/osd.lisp: New file: OSD (On Screen Display) for
197 * src/clfswm-menu.lisp (open-menu): Modularise function.
199 2010-10-13 Philippe Brochard <pbrochard@common-lisp.net>
201 * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
202 key binding in main and second mode.
204 2010-10-10 Philippe Brochard <pbrochard@common-lisp.net>
206 * src/clfswm-util.lisp (open-notify-window): Convert hello-window
207 functions to a more generic Notify-window system.
209 * src/tools.lisp (add-timer): Add an id to identify the timer.
211 2010-10-09 Philippe Brochard <pbrochard@common-lisp.net>
213 * src/tools.lisp (erase-timer): New function.
215 * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
216 the hello window. Add Configuration variables.
218 2010-10-08 Philippe Brochard <pbrochard@common-lisp.net>
220 * src/clfswm-util.lisp (): Add an Hello window at startup.
222 * src/tools.lisp (process-timers): Add a timer system.
224 2010-10-07 Philippe Brochard <pbrochard@common-lisp.net>
226 * src/clfswm-query.lisp (add-in-query-string): Handle correctly
229 2010-10-06 Philippe Brochard <pbrochard@common-lisp.net>
231 * src/clfswm-query.lisp (query-print-string): Change cursor color
232 and show parenthesis matching with colors (on match and on
235 2010-10-05 Philippe Brochard <pbrochard@common-lisp.net>
237 * src/clfswm-internal.lisp (show-all-children): Do not raise a
238 child when its parent is hidden.
240 2010-10-02 Philippe Brochard <pbrochard@common-lisp.net>
242 * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
243 possibility to circulate over subchild of the current child.
245 * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
246 (expose-windows-generic): Add an escape-body function to return to
247 the original state on escape key.
249 * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
250 to bind the current child from the configuration file.
252 2010-10-01 Philippe Brochard <pbrochard@common-lisp.net>
254 * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
255 window hook: the frame absorb all new windows that match
256 nw-absorb-test frame data slot.
258 2010-09-30 Philippe Brochard <pbrochard@common-lisp.net>
260 * src/clfswm-expose-mode.lisp (expose-create-window): Show window
261 title in accel window.
263 2010-09-29 Philippe Brochard <pbrochard@common-lisp.net>
265 * configure: Use the Xavier Maillard clfswm script in contrib to
266 build an executable in the standard way.
268 2010-09-26 Philippe Brochard <pbrochard@common-lisp.net>
270 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
271 New functions. Add a window on each child in the expose mode to
274 * src/clfswm-internal.lisp (child-x, child-y, child-width)
275 (child-height): New methods to get real child coordinates.
277 2010-09-25 Philippe Brochard <pbrochard@common-lisp.net>
279 * src/clfswm-layout.lisp (*-layout): Use child-position.
281 * src/clfswm-internal.lisp (child-position): New function.
283 * src/clfswm-expose-mode.lisp (expose-windows-mode)
284 (expose-all-windows-mode): Use a generic mode.
286 * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
287 with handle-event-fun symbols instead of inspecting clfswm
288 internals symbols on each mode change.
290 * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
291 a separate clfswm-expose-mode.lisp file.
293 * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
294 screen size instead of hardcoded test coordinates.
296 2010-09-24 Philippe Brochard <pbrochard@common-lisp.net>
298 * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
299 (speed-mouse-right, speed-mouse-up, speed-mouse-down)
300 (speed-mouse-undo, speed-mouse-first-history): New functions to
301 quickly move the mouse. Implemented for the second mode.
303 2010-09-16 Philippe Brochard <pbrochard@common-lisp.net>
305 * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
306 write permission on $clfswm_asd_path. So anybody can start clfswm
307 even if there is no write permission on the source directory.
309 2010-09-12 Philippe Brochard <pbrochard@common-lisp.net>
311 * contrib/clfswm: Add support to cmucl, ccl and ecl.
313 2010-09-11 Philippe Brochard <pbrochard@common-lisp.net>
315 * src/clfswm-util.lisp (set-hide-unmanaged-window)
316 (set-show-unmanaged-window, set-default-hide-unmanaged-window):
317 New functions and menu entry.
318 (set-globally-hide-unmanaged-window)
319 (set-globally-show-unmanaged-window): New functions and menu
322 * src/clfswm-internal.lisp (hide-unmanager-window-p): New
324 (show-child): Add a data slot on frame to hide or not unmanaged
327 * src/clfswm-corner.lisp (present-clfswm-terminal)
328 (present-virtual-keyboard): Use a function (generic-present-body)
329 instead of a macro (generate-present-body).
331 * src/clfswm-util.lisp (update-menus): List all directories and
332 subdirectories in $XDG_DATA_DIRS/applications.
334 2010-09-10 Philippe Brochard <pbrochard@common-lisp.net>
336 * src/clfswm-corner.lisp (generate-present-body): New macro.
337 (present-clfswm-terminal, present-virtual-keyboard): Use
338 generate-present-body.
340 2010-09-09 Philippe Brochard <pbrochard@common-lisp.net>
342 * src/clfswm-util.lisp (update-menus): Follow XDG specifications
343 instead of the non-portable Debian update-menu.
345 2010-09-07 Philippe Brochard <pbrochard@common-lisp.net>
347 * src/clfswm.lisp (error-handler): New function do handle
348 asynchronous errors and ignore them.
349 (open-display): Install the new error-handler on display.
351 2010-09-05 Philippe Brochard <pbrochard@common-lisp.net>
353 * src/xlib-util.lisp (with-xlib-protect): Add a
354 with-simple-restart on top of body execution.
356 2010-09-04 Philippe Brochard <pbrochard@common-lisp.net>
358 * src/clfswm.lisp (main-loop): Protect all xlib functions with an
361 * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
362 handle-event. Add a with-simple-restart to prevent a
363 clisp/new-lisp infinite loop.
365 2010-08-30 Philippe Brochard <pbrochard@common-lisp.net>
367 * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
368 clfswm terminal working even on xterm title changes.
370 2010-08-29 Philippe Brochard <pbrochard@common-lisp.net>
372 * src/clfswm-util.lisp (run-other-window-manager): Update for
375 * src/tools.lisp (do-execute): New parameter io to change the
378 * src/clfswm-util.lisp (hide-current-child): Prevent from removing
381 * src/clfswm-internal.lisp (child-member): New predicate.
382 (child-remove): New function.
384 * src/*.lisp: Use child-member and child-remove everywhere it's
387 2010-08-28 Philippe Brochard <pbrochard@common-lisp.net>
389 * src/clfswm.lisp (main-loop): Ensure that all events have been
390 processed after a process-event.
392 * src/clfswm-internal.lisp (is-in-current-child-p): New function.
394 2010-08-27 Philippe Brochard <pbrochard@common-lisp.net>
396 * src/clfswm.lisp (main-mode:configure-request): Raise the window
397 only when present on the current child and focus it accordingly.
399 2010-08-26 Philippe Brochard <pbrochard@common-lisp.net>
401 * src/clfswm-circulate-mode.lisp (circulate-loop-function):
402 Use is-a-key-pressed-p.
404 * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
406 * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
407 returned by xlib:keysym->keycodes.
409 * src/*.lisp: Use the new child-equal-p to compare children. This
410 prevent a bug with sbcl/cmucl when the standard equal function
411 does not work with xlib:window.
413 * src/clfswm-internal.lisp (child-equal-p): New predicate.
415 2010-08-25 Philippe Brochard <pbrochard@common-lisp.net>
417 * src/clfswm-generic-mode.lisp (generic-mode): Use an
418 xlib:event-listen before processing event with
419 xlib:process-event. This prevent a bug with CLX threaded
420 implementation like sbcl.
422 * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
423 processing event with xlib:process-event. This prevent a bug with
424 CLX threaded implementation like sbcl.
426 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
428 * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
430 * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
433 * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
434 (find-parent-frame, find-frame-window, find-frame-by-name)
435 (find-frame-by-number): Use with-find-in-all-frames to search in
436 frames in the right order.
438 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
439 unwanted flickering with unmanaged windows.
441 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
443 * src/package.lisp: Remove event handler hooks as they're not
444 needed anymore (To replace them: use closure and define-handler).
446 * src/xlib-util.lisp (move-window, resize-window)
447 (wait-mouse-button-release): Use a generic mode.
449 * src/*.lisp: Replace the case to handle event with a more (tricky)
450 lispy method which bind a function to each keywords associated
453 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
455 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
456 menu entry between delete-current-child and remove-current-child.
457 ie: Delete a child and its children in all frames by default.
459 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
461 * src/package.lisp: Add a placement configuration group.
463 * src/binding*.lisp: Bind control+g to escape the current action
466 * src/clfswm-internal.lisp
467 (delete-child-and-children-in-all-frames): New function and
468 binding: Second mode - Control+Delete delete the current child and
469 its children in all frames (ie: close the current child and its
472 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
474 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
475 the frame window and the frame gc. Close a very annoying bug when
476 cuting/pasting a frame or moving a child over frames with the
479 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
480 all children in *current-root* after moving/resizing a frame.
482 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
484 * src/clfswm-util.lisp (delete-focus-window)
485 (destroy-focus-window): Remove child in parent frame before
488 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
490 * src/clfswm-util.lisp (identify-key): Add a timeout in
492 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
493 of the window passed by xlib:process-event.
495 * src/xlib-util.lisp (move-window, resize-window)
496 (wait-mouse-button-release): Add a timeout in xlib:process-event.
498 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
500 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
501 to launch an other window manager and to return to clfswm.
503 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
505 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
508 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
510 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
513 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
514 parameter and a loop timeout.
516 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
518 * src/clfswm.lisp (main): Add an alternate configuration filename
521 * load.lisp: Add a debuging code example.
523 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
525 * src/clfswm-configuration.lisp (create-configuration-menu): New
526 menu to configure all clfswm variables while clfswm is running.
528 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
530 * src/clfswm-util.lisp (save-configuration-variables): New
531 function to save all configuration variables in clfswmrc.
533 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
535 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
537 (set-default-info-keys): Add cursor key support in info mode.
539 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
541 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
544 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
545 prevent reading the configuration file (this may be useful to
546 produce the original documentation without user modifications
547 with the rc configuration file).
549 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
551 * src/bindings-second-mode.lisp (set-default-second-keys):
552 Simplification of Escape key to close/kill/remove the focus window
553 and unhide all windows.
555 * src/bindings.lisp (set-default-main-keys): Simplification of
556 Escape key to close/kill/remove the focus window and unhide all
559 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
560 focus and unhide all windows capabilities.
562 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
564 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
566 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
568 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
569 Keep child order and don't make unnecessary child movement.
570 (one-column-layout, one-line-layout): New layouts.
572 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
574 * *: **** Release 0906 ****
576 * contrib/cd-player.lisp: New file to handle the CD player.
578 * contrib/xmms.lisp: New file to handle the xmms player.
580 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
582 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
583 Maximize windows in there frame - Leave frames to there actual
586 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
587 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
589 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
591 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
593 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
595 * contrib/mpd.lisp: Use a standard menu.
597 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
599 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
601 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
603 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
605 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
608 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
610 * src/config.lisp (get-fullscreen-size): One pixel adjustment
613 * src/clfswm-placement.lisp (*-child-placement): One pixel
616 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
618 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
619 Ensure that all characters are printable.
621 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
624 * src/clfswm-placement.lisp (*-child-placement): Adjust
625 coordinates to one pixel in the current child.
627 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
629 * src/clfswm-query.lisp (query-enter-function): Assign font before
630 width and height calculation.
632 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
634 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
635 bannish the pointer in an arbitrary place.
637 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
638 place the info window in an arbitrary place.
640 * src/clfswm-query.lisp (query-enter-function): Use with-placement
641 macro to place the query window in an arbitrary place.
643 * src/clfswm-placement.lisp: New file. Allow to place info windows
644 or query windows on an arbitrary place. Allow to bannish the
645 pointer on an arbitrary place.
647 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
649 * src/clfswm-circulate-mode.lisp (reorder-child)
650 (reorder-brother): Unfocus windows before reordering children or
653 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
655 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
656 the parent is a frame.
658 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
659 motion with a default modifier.
661 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
664 * src/clfswm-info.lisp (info-mode): Handle motion with a default
666 (info-mode): Optimization in loop function.
668 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
670 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
671 root-frame correctly.
673 * clfswm.asd: Dependency fix for clfswm-generic-mode.
675 * src/clfswm-circulate-mode.lisp (reorder-child)
676 (reorder-brother): Handle empty frames.
677 (reorder-brother): Redisplay only the parent frame of the current
680 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
681 parent frame of the current frame.
683 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
685 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
686 Maximize/Unmaximize the current frame in its parent frame.
688 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
689 windows and frames in there parent frame.
691 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
693 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
695 * src/clfswm-circulate-mode.lisp (reorder-child)
696 (reorder-brother): Reinitialise on circulate type change
697 child to brother or brother to child.
699 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
700 calls xlib:display-finish-output on each map-request. So speed up
703 * src/xlib-util.lisp (map-window): New function. Call
704 xlib:display-finish-output on each map request.
706 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
708 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
709 Optimisation when drawing second mode window.
711 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
713 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
716 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
718 * src/clfswm-util.lisp (run-program-from-query-string): Launch
719 command only with a return validation.
721 2009-04-22 Xavier Maillard <xma@gnu.org>
723 * src/clfswm-query.lisp (query-string): Use a generic mode.
725 2009-04-19 Xavier Maillard <xma@gnu.org>
727 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
729 2009-04-18 Xavier Maillard <xma@gnu.org>
731 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
732 to define all other modes.
734 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
736 * src/package.lisp (): Use *default-font-string* for all
739 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
741 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
743 * src/xlib-util.lisp (null-size-window-p): Better check of null
746 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
748 * src/clfswm.lisp (handle-map-request): Add a fix to manage
749 correctly fullscreen windows (SDL particularly).
751 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
753 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
754 a segfault with clisp/new-clx.
756 * src/clfswm.lisp (handle-motion-notify): Add a needed window
759 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
760 needed window argument.
762 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
764 * src/xlib-util.lisp (wait-no-key-or-button-press)
765 (wait-a-key-or-button-press): Check buttons press/release correctly"
767 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
769 * src/menu-def.lisp: Add children navigation menu in the movement
770 menu (select next/previous child/brother/level).
772 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
774 * *: Rename 'sister' frame to 'brother' frame.
776 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
777 alias in a real modifier.
779 * src/package.lisp (*modifier-alias*): New list of modifier alias
780 For example: :alt is :mod-1, :numlock is :mod-2...
782 * src/tools.lisp (remove-hook): New function.
784 * src/clfswm-keys.lisp (with-capslock, without-capslock)
785 (with-numlock, without-cnumlock): New functions.
787 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
789 * src/clfswm-info.lisp: Use the *binding-hook* to create info
790 keys and mouse bindings.
792 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
793 second keys and mouse bindings.
795 * src/bindings.lisp: Use the *binding-hook* to create main keys
798 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
800 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
803 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
805 * src/menu-def.lisp: Use a menu instead of a function for the
808 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
810 * src/clfswm-util.lisp (show-standard-menu): Display the standard
811 menu from the 'update-menus' command.
813 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
815 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
816 it's already grabbed.
818 * src/clfswm-internal.lisp (display-frame-info): Use configurable
819 colors and fix a bug with background.
820 (display-frame-info): Set window background when displaying info.
822 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
824 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
825 warning with clisp/new-clx.
827 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
829 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
832 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
834 * *: **** Release 0809 ****
836 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
838 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
840 (ensure-unique-number): New function and menu entry.
842 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
844 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
845 hook: open the next window in a named frame.
846 (numbered-frame-nw-hook): New new window hook: open the next
847 window in a numbered frame.
849 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
850 cases. So query-string can be called even in the main mode.
852 * src/clfswm-internal.lisp (show-all-children): Do not raise a
853 child by default => far less flickering.
855 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
857 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
859 * src/menu-def.lisp: Change key binding for the CLFSWM menu
862 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
863 is nil. (workaround on some CLX implementation).
865 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
867 * src/menu-def.lisp: Add a menu to set a focus policy for all
870 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
871 (all-frames-set-*-focus-policy): Set a focus policy for all
874 * src/clfswm.lisp (handle-enter-notify): sloppy-select
875 mode. Select a child and its parents on mouse over.
877 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
879 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
880 policy -> Sloppy focus only for windows in the current frame.
881 (main-unprotected): Exit clfswm on init error (ie: when another
882 window manager is running).
884 * src/clfswm-util.lisp (reset-clfswm): New function.
886 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
888 * src/clfswm-menu.lisp (init-menu): New function.
890 * src/clfswm-util.lisp (reload-clfswm): New function to reload
892 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
894 * src/clfswm.lisp (main, main-unprotected): Handle error in a
895 superior main function. Now CLFSWM can't break the X session. It
896 just reinitialize the display and run a new main loop.
898 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
899 *vt-keyboard-on* global to avoid warnings when loading clfswm.
901 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
902 (help-on-gimp-layout): Describe how to use the GIMP layout.
904 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
906 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
907 main-window-right-layout. Change the keybinding for (shift)alt+tab
908 to not select windows in the main window lisst.
909 Bind F8 to add a window in the main window list.
910 Bind F9 to remove a window in the main window list.
911 Change the focus policy to :sloppy.
912 (set-previous-layout): Restore the previous layout, keybinding and
915 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
917 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
919 * src/clfswm-layout.lisp (main-window-left-layout)
920 (main-window-bottom-layout, main-window-top-layout): New
922 Factorize layouts in menu.
924 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
926 * src/clfswm-layout.lisp (main-window-right-layout): A possible
927 GIMP layout: one or more main windows on one side of the
928 frame. Others on the other size.
930 * src/clfswm-util.lisp
931 (current-frame-set-click/sloppy-focus-policy): Each frame can have
932 a different focus policy (one of :click or :sloppy).
933 The default focus policy is set with *default-focus-policy*.
935 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
937 * src/clfswm-info.lisp (show-config-variable): New function.
939 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
941 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
943 * src/clfswm-info.lisp: Colored help for key binding and corners
946 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
948 * src/clfswm-util.lisp (delete-focus-window)
949 (destroy-focus-window): Remove chid only in
950 handle-unmap/destroy-notify. Focus *current-root* only when
951 closing/killing the current child.
953 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
954 functions or corners.
956 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
958 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
959 action: Hide/Unhide a terminal on mouse corner action. (By default
960 right mouse button on the top left corner).
962 * src/config.lisp (*never-managed-window-list*): New config
965 * src/clfswm-internal.lisp (never-managed-window-p): New function:
966 Handle never managed window in a more simple way.
968 * src/clfswm-corner.lisp: New file and new and more simple method
969 to define corners actions.
971 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
973 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
975 * src/clfswm-layout.lisp (fast-layout-switch)
976 (define-fast-layout-switch): New functions: Switch between two
979 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
980 really in the second mode. So leave-second-mode can be used even
983 * src/clfswm-util.lisp (switch-to-last-child): New function:
984 Store the current child and switch to the previous one.
986 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
988 * src/clfswm-util.lisp (display-current-window-info): Display the
990 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
991 (top right by default). By default 'xvkbd' is used.
993 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
995 * src/xlib-util.lisp (move-window, resize-window): Compress motion
998 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
1000 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
1003 * src/clfswm-info.lisp (info-mode): Compress motion events.
1005 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
1007 * src/clfswm-internal.lisp (show-all-children): Compute geometry
1008 and selection first and then show only necessary children.
1009 (show-child): remove unneeded display-p parameter.
1011 * src/config.lisp (get-fullscreen-size): Place the frame border
1012 outside the screen (this prevent the loose of 2 pixels per
1015 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
1017 * src/clfswm-internal.lisp (focus-child): Algorithm change to
1018 raise only the selected child.
1020 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
1022 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
1023 Raise only viewable children.
1025 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
1027 * src/clfswm-internal.lisp (show-all-children): Always raise all
1028 displayed children. Remove all references to raise-p.
1030 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1032 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
1035 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
1036 second mode binding on raise/lower child in its frame.
1038 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
1039 behaviour to the new raise/lower property.
1040 Call clear-nw-hook before the rest of the hook.
1042 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
1043 (mouse-click-to-focus-and-resize-window): Stop button event. This
1044 prevent a keyboard/pointer freeze.
1046 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1048 * src/clfswm-internal.lisp (frame-lower-child)
1049 (frame-raise-child): New functions to raise/lower a child in its
1052 * src/clfswm-util.lisp (have-to-present-windows)
1053 (have-to-present-all-windows): New functions to have an MaxOS
1054 expose like on mouse click in screen corner.
1056 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
1058 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
1060 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
1061 child from a choice in all frames with hidden children.
1063 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
1065 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
1067 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
1068 (unhide-all-children): New functions.
1070 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
1073 * src/clfswm-util.lisp (hide/show-frame-window): new function and
1076 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
1078 * src/clfswm-util.lisp (rename-current-child): Do not display the
1079 frame info for a window.
1081 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
1083 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
1084 frame window for the removed child and its children.
1086 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
1088 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
1091 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
1093 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
1094 the ROX pinboard (ie: leave it lowered in the root window as
1097 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
1098 (tile-left-layout, tile-right-layout, tile-top-layout)
1099 (tile-bottom-layout): Use all the frame space when there is only
1102 * src/clfswm-internal.lisp (place-window-from-hints): Center
1103 unmanaged windows in the root screen.
1105 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
1108 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1110 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
1111 typo in managed types.
1113 * src/clfswm-internal.lisp (show-child): Always display frame info
1114 even if the frame is hidden.
1116 * src/xlib-util.lisp (resize-window): Use a better algorithme to
1119 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1121 * src/clfswm-util.lisp (with-movement): Display frame info for all
1122 frames in current root.
1124 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1126 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
1128 * src/bindings-second-mode.lisp (define-second-key #\a): New
1129 binding on 'add-default-frame'.
1131 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1132 message to follow the autodocumentation process.
1134 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1136 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1137 "Space" to jump to a child. "B" to bind a slot on the current
1140 * src/bindings-second-mode.lisp: Use "Tab" instead of
1143 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
1145 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1146 unmanaged (hidden) windows.
1148 * src/clfswm-internal.lisp (place-window-from-hints): Give a
1149 minimal size for windows.
1150 (with-all-windows-frames-and-parent): New function.
1152 * src/config.lisp (*default-window-width/height*): New parameters.
1154 * src/clfswm-internal.lisp (place-window-from-hints): Center
1155 windows in the screen instead of in there frame.
1157 * src/bindings-second-mode.lisp (tile-space-current-frame): New
1160 * src/clfswm-layout.lisp (register-layout): Intern the once name
1161 in the right package.
1163 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1165 * doc/dot-clfswmrc: Update to follow the new clfswm way.
1167 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
1169 * src/clfswm-internal.lisp (set-current-child)
1170 (adapt-child-to-parent, show-child, hide-child): Handle the case
1171 where child is not a frame or a window.
1173 * src/clfswm-util.lisp
1174 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1175 Check if child is a frame.
1177 * src/clfswm-internal.lisp (managed-window-p): Handle the case
1178 where frame is null.
1179 (place-frame): Check if frame and parent are frames.
1181 * src/clfswm-info.lisp (info-mode): display all frame info before
1184 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1185 info before leaving.
1187 * src/clfswm-internal.lisp (display-all-frame-info): New function.
1189 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
1191 * src/tools.lisp (getenv): Implemented for ECL.
1192 (urun-prog): Implemented for ECL.
1194 * src/clfswm-util.lisp (identify-key): Use a double buffer to
1197 * src/clfswm-query.lisp (query-string): Use a double buffer to
1200 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1203 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1206 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
1208 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1210 * src/menu-def.lisp: New file: move all menu definition in
1213 * src/clfswm-layout.lisp (register-layout): Use a function instead
1216 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
1218 * src/clfswm-autodoc.lisp (produce-menu-doc,
1219 (produce-menu-doc-html): New functions.
1220 (produce-doc-*): Moved to clfswm-autodoc.lisp.
1222 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1223 paste a child on one of its own children. (this prevent a
1225 (move-child-to): Rename move/copy-current-child-by to
1227 (mouse-move-window-over-frame): New function to move the window
1228 under the mouse cursor to another frame.
1230 * src/clfswm-internal.lisp (find-child-in-parent): New function.
1232 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1234 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1235 windows only when its window parent is the current child.
1237 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1239 * src/clfswm-util.lisp (manage-current-window)
1240 (unmanage-current-window): New functions: Allow to force to manage
1241 or unmanage a window by its parent frame.
1243 * src/bindings-second-mode.lisp (#\o): binded to
1244 set-open-in-new-frame-in-parent-frame-nw-hook and
1245 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1247 * src/clfswm-util.lisp (with-current-window): New macro.
1249 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1250 exposure and enter-window handle event.
1252 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1253 children for the current child after the move/resize.
1255 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1257 * src/xlib-util.lisp (resize-window): Take care of window size
1260 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1261 move/resize unmanaged windows.
1263 * src/xlib-util.lisp (move-window, resize-window): New functions.
1265 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1267 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1268 user choose what window type the current frame must handle.
1269 (display-current-window-info): New function.
1270 (current-frame-manage-all-window-type)
1271 (current-frame-manage-only-normal-window-type)
1272 (current-frame-manage-no-window-type): New functions.
1274 * src/clfswm-internal.lisp (managed-window-p): New function.
1276 * src/package.lisp (frame): Managed type: new frame
1277 parameter. This allow to choose what window type a frame must
1280 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1282 * src/clfswm-nw-hooks.lisp
1283 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1285 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1288 * src/tools.lisp (ensure-printable): Return always a string even
1291 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
1293 * src/config.lisp (*default-nw-hook*): New variable to change the
1294 default new window hook.
1296 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1298 * clfswm.asd (clfswm): Add a dependency from
1299 clfswm-second-mode.lisp to clfswm.lisp.
1301 * src/clfswm-util.lisp (identify-key): Show the documentation for
1302 the function bound on a key.
1303 (with-movement): Move with-movement,
1304 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
1305 to clfswm-util.lisp.
1307 * src/clfswm-menu.lisp: New menu system that let user change keys
1308 or functions associated to keys.
1310 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
1312 * src/clfswm-internal.lisp (show-all-children): Display-child is
1313 the first child by default. Solve a bug with father-p.
1315 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
1317 * src/clfswm-internal.lisp (add-frame): Add frame return the
1319 (show-all-children): Move the size computation outside the
1322 * src/bindings-second-mode.lisp (with-movement): Redisplay only
1325 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1326 only the current child.
1328 * src/clfswm-internal.lisp (show-all-children): New display-child
1329 parameter to display only the desired child and its children.
1330 (select-next/previous-child): Only display the current child.
1332 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
1334 * src/clfswm.lisp (init-display): Move the default frame creation
1335 on the default init hook.
1337 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1338 the main mode (for example: "1" on an azerty keyboard).
1340 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
1342 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1343 keysyms. Revert to old grabbing method for the main mode.
1345 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
1347 * src/clfswm.lisp (init-display): Add key handling on no focus
1348 window and on frame windows.
1350 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1352 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1353 all keys by default and replay just what is needed. No change for
1356 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1357 (find-key-from-code): Test for shift and not shift presence.
1359 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
1361 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1362 new key parameter to have less flickering.
1364 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
1366 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1367 layout only one time and revert to no-layout to freely handle
1370 * src/clfswm-nw-hooks.lisp
1371 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1372 with new created window.
1374 * src/clfswm-layout.lisp (register-layout): Now register
1375 automatically a once layout to set the layout only one time and
1376 revert to no-layout to freely handle frames.
1378 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1380 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1381 nw-hook: Open the next window in the current frame and leave the
1382 focus to the current child.
1384 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
1386 * src/bindings-second-mode.lisp: Add keys definitions to
1387 bind-or-jump in the second mode.
1389 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
1390 macro for bind-or-jump-(1|2|3...).
1392 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
1393 arguments to function. This allow to do things like:
1394 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
1395 are passed to my-function on key press.
1397 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
1399 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
1401 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
1403 * src/clfswm-internal.lisp (child-fullname): New function
1405 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
1406 docstring in info-mode-menu. An item can be
1407 '((key function) (key function)) or with docstring
1408 '((key function "documentation 1") (key function "bla bla") (key function))
1410 * src/tools.lisp (ensure-n-elems): New function.
1412 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
1413 resize a frame or the window's father.
1415 * src/clfswm.lisp (init-display): Remove tile-space-layout by
1416 default on the root frame.
1418 * src/clfswm-util.lisp (move/resize-frame): Add standard event
1419 hooks handlers (map-request, configure-notify...)
1421 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
1424 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1426 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
1427 or the window's father.
1429 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
1430 event only if there is a geometry change.
1431 (mouse-focus-move/resize-generic): Generic function to move or
1432 resize a frame or a window father frame.
1434 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1436 * src/clfswm-internal.lisp (show-all-children): Return t if there
1437 is a geometry change.
1439 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
1441 * src/bindings.lisp (Up/Down): Swap select previous/next level.
1443 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
1445 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
1447 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
1448 (with-all-*): Reverse the child list to manage the first child last (like in
1451 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
1452 root window only if true.
1454 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
1455 root window only if *create-frame-on-root* is true.
1457 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
1460 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
1462 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
1463 the current child (even if it's a window).
1465 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
1467 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
1468 (mouse-click-to-focus-and-resize): New functions.
1470 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
1471 (*-px->fl): Convert pixel coordinates to float.
1473 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
1475 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
1477 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
1480 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
1481 and hide-all-children.
1482 (raise-if-needed): New function.
1483 (show-child): Use a first-p parameter to raise windows only when they are
1486 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
1488 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
1491 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
1493 * src/clfswm-info.lisp (keys-from-list): new function.
1495 * src/*: rename 'childs' in 'children'.
1497 * src/*: rename 'group' in 'frame'.
1499 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
1501 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
1503 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
1505 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
1507 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
1509 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
1510 Bind control+o to open the next window in a new group in the root group
1511 (as open in next window in a new workspace in 0801 version).
1513 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
1515 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
1518 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
1520 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
1521 instead of Tab for select-previous-child.
1523 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
1525 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
1528 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
1530 * clfswm-util.lisp (identify-key): Display the documentation
1531 associated to keys when identifying a key.
1533 2008-03-10 Xavier Maillard <xma@gnu.org>
1535 * contrib/clfswm: Complete rewrite of the script. Detect error and
1536 act accordingly. Add command line arguments to configure the
1537 script execution. User can now choose different common lisp
1538 implementation (clisp and sbcl only), choose where to store the
1539 dumped image, where to find clfswm source.
1541 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
1543 * clfswm-internal.lisp (process-new-window): Beginning of new
1544 window hook: each group have a hook to tell what he wants to do
1545 with the new created window.
1547 2008-03-08 Xavier Maillard <xma@gnu.org>
1549 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
1550 call the resulting executable.
1552 * clfswm.lisp (read-conf-file): Check for the user config file in
1553 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
1554 prefered whenever possible.
1556 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
1558 * clfswm-layout.lisp (*-layout): Add an optional raise-p
1559 parameter in each layout.
1561 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
1563 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
1565 (copy/move-current-child-by-name/number): new functions
1566 (focus-group-by-name/number): new functions
1567 (delete-group-by-name/number): new functions
1569 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
1571 * ************************************************************ *
1572 *: Major update - No more reference to workspaces. The main *
1573 structure is a tree of groups or application windows. *
1574 * ************************************************************ *
1576 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
1578 * clfswm.lisp (read-conf-file): Read configuration in
1579 $HOME/.clfswmrc or in /etc/clfswmrc or in
1580 $XDG_CONFIG_HOME/clfswm/clfswmrc.
1581 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
1584 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
1586 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
1589 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
1591 * clfswm-internal.lisp (find-window-group): New function.
1593 * clfswm*: Change to make clfswm run with clisp/new-clx.
1595 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
1597 * clfswm-util.lisp (query-show-paren): Add show parent matching in
1599 (query-string): Bind control+k to delete end of line.
1601 * clfswm-second-mode.lisp (draw-second-mode-window): Display
1602 the action on mouse motion in second mode.
1604 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
1605 event but do not clear the root window.
1606 (handle-configure-request): Adjust unmanaged window from there
1609 * clfswm-internal.lisp (process-new-window): Adjust new window
1610 with the specified hints (max/min/base width/height).
1612 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
1614 * clfswm.lisp (handle-configure-request): Send an Configuration
1615 Notify event. This solve a bug with xterm and rxvt who takes some
1616 times to be mapped. Now there is no delay.
1618 * bindings-second-mode.lisp (define-shell): Run programs after
1619 living the second mode.
1621 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
1623 * clfswm-internal.lisp (process-new-window): Do not crop transient
1624 window to group size.
1625 (adapt-window-to-group): Do not crop transient window to group
1628 * clfswm.lisp (handle-configure-request): Adapt just the window to
1629 its group and don't take care of the configure request. Remove the
1630 bug with the Gimp outside the group and speed up the window
1632 (handle-exposure): Remove show-all-group on exposure event
1635 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
1637 * clfswm-util.lisp (circulate-group-up-copy-window)
1638 (circulate-group-down-copy-window)
1639 (circulate-workspace-up-copy-group)
1640 (circulate-workspace-down-copy-group): Prevent the copy of the
1641 same window in the same workspace.
1643 * bindings-second-mode.lisp (release-copy-selected-window)
1644 (release-copy-selected-group): Prevent the copy of the same window
1645 in the same workspace.
1647 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
1648 (generic-pager-move-window-on-next-line): Remove the copy
1650 (generic-pager-move-group-on-next-workspace)
1651 (generic-pager-move-group-on-previous-workspace): Prevent the copy
1652 of the same window in the same workspace.
1654 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
1655 (mouse-pager-copy-selected-group-release): Prevent the copy of the
1656 same window in the same workspace.
1658 * tools.lisp (setf/=): new macro to set a variable only when
1661 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
1662 x, y... only when necessary.
1664 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
1666 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
1667 new function and hook: force windows to stay in its group (solve a
1670 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
1672 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
1673 less flickering when moving/resizing groups.
1675 * clfswm-internal.lisp (hide-group): new function.
1676 (show-all-group): clear-all: new parameter.
1678 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
1680 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
1682 * clfswm*: Color change for the pager. Typo or better description
1683 in bindings definitions. Define bindings for a qwerty keyboard by
1684 default. dot-clfswmrc show examples to switch to an azerty
1686 License change to GPL v3.
1687 * config.lisp: new file - group all globals variables in this
1690 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
1692 * xlib-util.lisp (hide-window): Remove structure-notivy events
1693 when hidding a window.
1695 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
1697 * package.lisp (*sm-property-notify-hook*): Readded
1698 property-notify-hook in second mode.
1700 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1702 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
1704 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1706 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
1707 Tile the current workspace with the current window on one side and
1708 others on the other (this emulate the larswm, dwm, wmii way). See
1709 the default configuration file to enable this mode by default.
1711 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
1714 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1716 * clfswm-pager.lisp (pager-draw-window-in-group): Add
1717 ensure-printable to print windows name even with non-ascii
1720 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
1722 * clfswm-pager.lisp (pager-explode-current-group): Create a new
1723 group for each window in group.
1724 (pager-implode-current-group): Move all windows in workspace to
1725 one group and remove other groups.
1727 * clfswm-pack.lisp (explode-group): Create a new group for each
1729 (implode-group): Move all windows in workspace to one group and
1730 remove other groups.
1732 * clfswm-util.lisp (identify-key): Remove local configuration
1733 variables and made them available for configuration from
1735 (query-string): idem.
1737 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1739 * netwm-util.lisp: Start of NetWM compliance.
1740 Add a Netwm client list gestion.
1742 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1744 * clfswm-internal.lisp (create-group-on-request): open a new group
1745 only when the current group is not empty.
1747 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
1748 bug with null workspace.
1750 * clfswm-pager.lisp (pager-handle-event): Add a hook
1751 system. This hooks can be changed in the user configuration file.
1753 * package.lisp: All colors and font variables are set in
1754 package.lisp and can be configured in the user configuration
1756 Note: If you have configured some less ugly colors (esp. for the
1757 pager) don't hesitate to let me know :)
1759 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
1760 system. This hooks can be changed in the user configuration file.
1762 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
1763 changed in the user configuration file (~/.clfswmrc)
1765 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1767 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
1768 arrow action, open next window in new workspace/group.
1770 * bindings.lisp (stop-all-pending-actions): new binding.
1771 (open-next-window-in-new-group-once): Open the next windows in a
1772 new group (only once) or open all new windows in a new group (like
1773 others windows managers).
1775 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1777 * clfswm.lisp (read-conf-file): New function to read a lisp
1778 configuration file at startup.
1779 (focus-group-under-mouse): Check if group isn't the current group
1780 ( prevent a bug with unclutter ).
1782 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
1784 * bindings.lisp (run-program-from-query-string): A program can be
1785 launch from a input query window.
1787 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
1789 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
1791 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
1793 * clfswm.lisp (process-new-window): One can now open the next
1794 window in a workspace called by its number.
1796 * clfswm-util.lisp (query-font-string): Minimal editing
1798 (eval-from-string): And an REPL in the window manager... :)
1800 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
1802 * clfswm.lisp (process-new-window): One can now open the next
1803 window in a new workspace or a new group.
1805 * clfswm-pager.lisp (pager-mode): Display the next arrow action
1806 with the hidden windows.
1808 * clfswm.lisp (second-key-mode): Display the current workspace
1809 number and the next arrow action in the state window.
1811 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
1812 the pager mode and then redisplay only the current workspace.
1814 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
1816 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
1817 they can be focused with a keypress, sorted or renumbered.
1819 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
1821 * clfswm-pager.lisp (pager-mode): Remove multiple silly
1822 pager-draw-display. This prevent a lot of flickering in the
1825 * clfswm.lisp: Remove all display-force-output and replace them
1826 with only one display-finish-output in the event loop.
1828 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
1830 * clfswm-pager.lisp (pager-center-group): New function - center a
1831 group at the middle of the screen.
1833 * clfswm-pack.lisp (center-group): New function - center a group
1834 at the middle of the screen.
1836 * clfswm.lisp (show-group): Add a cross line under the group.
1837 (show-group): Group are showned even if fullscreened.
1838 (init-display): Add an exposure event on the root window.
1840 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
1842 * package.lisp (*default-group*): Default group is the same size
1843 of a fullscreened group.
1845 * bindings*: Use shift to move, control+shift to copy.
1847 * *.lisp: Add comments for configuration or alternatives. So grep
1848 for CONFIG to see where you can configure clfswm. And grep for
1849 Alternative to use some commented code.
1851 * clfswm.lisp (second-key-mode): Use a single window to show the
1852 second mode. See for alternatives at the end of this file.
1854 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
1856 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
1857 macro of key and mouse definitions.
1858 (define-define-key/mouse): Use state instead of modifiers list
1859 this fix a bug when the modifiers list is not in the rigth order.
1861 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
1863 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
1865 * clfswm-info.lisp (info-mode): Add an info mode.
1867 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
1869 * clfswm.lisp (process-new-window): Change border size for
1871 (show-all-windows-in-workspace): Unhide all windows even when the
1872 current group is in fullscreen mode.
1874 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
1876 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
1877 redisplay the identify window after a terminal switch.
1879 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
1880 redisplay the pager after a terminal switch.
1882 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
1884 * clfswm-util.lisp (identify-key): Add a window to display
1885 the keys to identify on screen.
1887 * bindings.lisp, bindings-pager.lisp: Define same keys to
1888 move/copy groups/windows in second mode and in pager.
1890 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
1892 (show-all-windows-in-workspace): unhide window before adapting it
1895 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
1897 * clfswm.lisp (handle-event): Revert to an older version.
1899 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
1901 * clfswm-util.lisp (force-window-in-group)
1902 (force-window-center-in-group): New functions for transient windows.
1904 * clfswm-pager.lisp (pager-remove-current-workspace/group):
1905 bugfix: hide all windows before removing group or workspace.
1907 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
1909 * bindings-pager.lisp (mouse-pager-move-selected-group)
1910 (mouse-pager-copy-selected-group)
1911 (mouse-pager-move-selected-window)
1912 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
1913 (mouse-pager-rotate-window-down): New functions to have mouse in
1916 * clfswm-pager.lisp (pager-swap-window)
1917 (pager-copy-group-on-next/previous-workspace)
1918 (pager-copy-window-on-next/previous-line): New functions
1920 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
1922 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
1923 (pager-move-group-on-next/previous-workspace): new functions.
1925 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
1926 to its half size (new functions).
1928 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
1930 * clfswm-pager.lisp: workspaces, groups and windows can now be
1931 selectionned with the keyboard or the mouse.
1933 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
1935 * clfswm-pager.lisp (pager-select-workspace-right/left):
1936 workspaces can now be selectionned with the keyboard.
1938 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
1940 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
1941 new function to remove a previous defined key or mouse combination.
1943 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
1945 * clfswm.lisp (main): Check for access error in init-display.
1947 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
1948 keycode before grabbing.
1950 * bindings.lisp: Remove nlambda and use defun to keep the function
1951 documentation with clisp.
1952 (define-shell): new macro to define shell command for the second
1955 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1957 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
1960 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
1962 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
1963 workspace circulation.
1965 * clfswm-util.lisp (absorb-orphan-window): new function.
1967 * clfswm-keys.lisp: Keysyms support.
1969 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
1971 * clfswm.lisp (show-group): Use one gc for all groups and not one
1974 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
1976 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
1978 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
1979 width and height outside group.
1981 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
1983 * clfswm.lisp: First public release.