1 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
3 * src/clfswm-internal.lisp
4 (delete-child-and-children-in-all-frames): Delete or destroy
5 children before displaying all children.
7 2011-06-05 Philippe Brochard <pbrochard@common-lisp.net>
9 * src/clfswm-util.lisp (add-frame-in-parent-frame): New function
12 2011-06-04 Philippe Brochard <pbrochard@common-lisp.net>
14 * src/clfswm.lisp (main-unprotected): Destroy all frames windows
15 before closing the display (not really needed).
17 2011-06-02 Philippe Brochard <pbrochard@common-lisp.net>
19 * src/clfswm-layout.lisp (inc-tile-layout-size)
20 (dec-tile-layout-size, inc-slow-tile-layout-size)
21 (dec-slow-tile-layout-size): New functions and bindings.
23 2011-06-01 Philippe Brochard <pbrochard@common-lisp.net>
25 * src/clfswm-expose-mode.lisp (define-expose-letter-keys): Add
26 0..1 and A..Z keys to select a child in exposé mode.
28 * src/clfswm-internal.lisp (display-frame-info): Remove hidden
29 infos in frames windows.
31 * src/clfswm-util.lisp (ask-close/kill-current-window): Menu
34 2011-05-30 Philippe Brochard <pbrochard@common-lisp.net>
36 * src/clfswm-internal.lisp (get-parent-layout): Minor fullscreen
39 2011-05-29 Philippe Brochard <pbrochard@common-lisp.net>
41 * src/clfswm-internal.lisp
42 (delete-child-and-children-in-all-frames): Show all children
43 before deleting/destroying a windows, so prevent a flickering.
44 (get-parent-layout): Return the fullscreen size when the current
47 2011-05-28 Philippe Brochard <pbrochard@common-lisp.net>
49 * src/clfswm-internal.lisp (get-parent-layout): Handle correctly
52 * src/clfswm-util.lisp (delete-focus-window-generic): Do not hide
53 child before removing, so prevent a flickering.
55 * src/clfswm-internal.lisp (show-all-children): Rectangular
56 optimization to display only needed children.
57 (show-all-children): Remove flickering on
58 select-next/previous-brother.
60 2011-05-17 Philippe Brochard <pbrochard@common-lisp.net>
62 * src/clfswm-util.lisp (copy-focus-window, cut-focus-window): New
63 functions and ask-close/kill-current-window menu and bindings
66 2011-05-16 Philippe Brochard <pbrochard@common-lisp.net>
68 * src/clfswm-util.lisp (ask-close/kill-current-window): Add an
69 *ask-close/kill-placement* placement window variable.
71 2011-05-09 Philippe Brochard <pbrochard@common-lisp.net>
73 * contrib/osd.lisp (funcall-button-from-code): Display osd
74 documention for buttons and fix some redefining warnings.
76 2011-05-07 Philippe Brochard <pbrochard@common-lisp.net>
78 * src/clfswm-nw-hooks.lisp (make-permanent-nw-hook-frame): New
79 function. Prevent to add or delete a new window hook for this
82 * src/clfswm-layout.lisp (update-layout-managed-children-position):
85 2011-05-06 Philippe Brochard <pbrochard@common-lisp.net>
87 * src/bindings-second-mode.lisp (set-default-second-keys):
88 select-brother-spatial-move-* binding update.
90 * src/clfswm-layout.lisp (tile-left|right|top|bottom-layout): Ask
91 to keep children positions or not.
93 * src/clfswm-internal.lisp (fixe-real-size): Takes care of border
96 * src/clfswm-layout.lisp (update-layout-managed-children): Fix a
97 bug by using the parent frame instead of the current child.
99 * src/clfswm-circulate-mode.lisp
100 (select-brother-generic-spatial-move+right/left/up/down): New
101 function to select a brother from another in a spatial move.
103 2011-04-19 Philippe Brochard <pbrochard@common-lisp.net>
105 * src/clfswm-pack.lisp (move-frame-constrained)
106 (resize-frame-constrained): Use pixels instead of floating
109 2011-04-18 Philippe Brochard <pbrochard@common-lisp.net>
111 * src/clfswm-pack.lisp (resize-frame-constrained): Takes care of
113 (implode-frame, implode-current-frame): New functions. Absorb all
114 frames subchildren in frame. Explode frame opposite.
116 2011-04-17 Philippe Brochard <pbrochard@common-lisp.net>
118 * src/clfswm-pack.lisp (move-frame-constrained)
119 (resize-frame-constrained): New function. Move and resize frame
120 with the mouse constrained by other frame brothers.
122 2011-04-14 Philippe Brochard <pbrochard@common-lisp.net>
124 * src/clfswm-util.lisp (with-movement-select-next-brother)
125 (with-movement-select-previous-brother)
126 (with-movement-select-next-child): Use a simple method (do not
127 enter in the circulate mode) to allow to circulate in all children
130 * src/clfswm-menu.lisp (open-menu): Save info hash table keys
131 instead of deleting newly created keys.
133 2011-03-21 Philippe Brochard <pbrochard@common-lisp.net>
135 * src/clfswm-internal.lisp (x-px->fl, y-px->fl): Takes care of
138 2011-03-20 Philippe Brochard <pbrochard@common-lisp.net>
140 * src/clfswm-info.lisp (show-config-variable): call
141 produce-conf-var-doc.
143 2011-03-18 Philippe Brochard <pbrochard@common-lisp.net>
145 * src/clfswm-autodoc.lisp (produce-conf-var-doc-html): Produce a
146 documentation for all configurable variables in CLFSWM -
149 * src/clfswm-internal.lisp (leave-frame): Hide all children except
152 2011-03-16 Philippe Brochard <pbrochard@common-lisp.net>
154 * src/clfswm-autodoc.lisp (produce-all-docs): Produce a
155 documentation for all configurable variables in CLFSWM.
157 * src/clfswm-layout.lisp (set-gimp-layout): Display a notify
158 window with the help on the GIMP layout.
160 2011-03-12 Philippe Brochard <pbrochard@common-lisp.net>
162 * src/menu-def.lisp: Menu update to prevent cursor keys clash.
164 * clfswm.asd: Change compilation order to prevent undefined
167 * src/clfswm-internal.lisp (show-child(frame)): Handle properly
168 the show-root-frame-p parameter.
170 2011-03-11 Philippe Brochard <pbrochard@common-lisp.net>
172 * src/clfswm-util.lisp (move-frame, resize-frame): Do not move or
173 resize a frame when it's the current root.
175 2011-03-10 Philippe Brochard <pbrochard@common-lisp.net>
177 * src/clfswm-internal.lisp (show-all-children): Handle properly
178 duplicated child in multipe frames.
180 2011-03-09 Philippe Brochard <pbrochard@common-lisp.net>
182 * contrib/volume-mode.lisp (set-default-volume-keys): Add more
183 keybindings (up/down, right/left) to raise/lower the volume.
185 * src/clfswm-layout.lisp: Add a variable border size for frames
188 2011-03-08 Philippe Brochard <pbrochard@common-lisp.net>
190 * src/clfswm-util.lisp (cut-current-child, remove-current-child)
191 (delete-current-child): Hide the current child before doing the
194 * src/clfswm-internal.lisp (show-all-children): Hide windows not
195 in the current root before displaying those in current root.
196 Remove all hide-all unnecessary calls.
198 * src/clfswm-configuration.lisp (save-variables-in-conf-file):
199 Save only variables with a different value than there original
202 2011-03-07 Philippe Brochard <pbrochard@common-lisp.net>
204 * src/clfswm-info.lisp (show-config-variable): Use the new
207 * src/clfswm-autodoc.lisp (produce-configuration-variables): Use
208 the new defconfig method.
210 * src/clfswm-configuration.lisp (create-configuration-menu):
211 Change the config system with a more lispy one and a less string
212 based one: (defconfig name value group doc).
215 2011-03-06 Philippe Brochard <pbrochard@common-lisp.net>
217 * src/clfswm-internal.lisp (show-all-children): Simplify the
219 (show-child): Display an unmanaged window whe it's the current
221 (show-all-children): add the ability to display all child from
222 *root-frame* and hide all those who are not in *current-root*.
223 -> remove hide-all-children when needed.
225 * src/xlib-util.lisp (move-window,resize-window): Add a
226 *color-move-window* border when moving or resizing a window.
228 2011-03-04 Philippe Brochard <pbrochard@common-lisp.net>
230 * src/clfswm-internal.lisp (show-all-children): Perform only one
231 recusion on the clfswm tree: calculate geometry and place child in
234 2011-03-03 Philippe Brochard <pbrochard@common-lisp.net>
236 * src/clfswm-internal.lisp (show-all-children): Rethink of display
237 child order to prevent very annoying flickering.
239 2011-02-27 Philippe Brochard <pbrochard@common-lisp.net>
241 * src/clfswm-util.lisp (query-yes-or-no): New function.
243 * src/clfswm-configuration.lisp (reset-all-config-variables): New
244 function and menu entry.
245 (query-conf-value): Add the ability to leave the field blank to
246 reset the variable to its default value.
248 2011-02-26 Philippe Brochard <pbrochard@common-lisp.net>
250 * src/clfswm-configuration.lisp
251 (add-all-configuration-default-value): Add a default value to
252 configurable variables.
254 2011-02-23 Philippe Brochard <pbrochard@common-lisp.net>
256 * src/clfswm.lisp (main-unprotected): Create the configuration
257 menu only once at startup.
259 2011-02-22 Desmond O. Chang <dochang@gmail.com>
261 * contrib/amixer.lisp: Add a volume mode inspired by the emms
262 volume package. Alsa mixer interface.
264 * contrib/volume-mode.lisp: Add a volume mode inspired by the emms
267 2011-02-22 Desmond O. Chang <dochang@gmail.com>
269 * src/clfswm.lisp (main): Use ASDF:SYSTEM-SOURCE-DIRECTORY instead
270 of *LOAD-TRUENAME*. *LOAD-TRUENAME* is only bound during a call to
271 LOAD. If one eval CLFSWM:MAIN in repl, BASE-DIR will be an empty
272 string. Use ASDF:SYSTEM-SOURCE-DIRECTORY to fix it.
274 2011-02-16 Philippe Brochard <pbrochard@common-lisp.net>
276 * src/clfswm.lisp (main-unprotected): Add a close hook. And close
277 the notify window, the virtual keyboard and the clfswm terminal by
280 2011-02-15 Philippe Brochard <pbrochard@common-lisp.net>
282 * src/clfswm.lisp (main-unprotected): Destroy the notify window
283 before closing the display. This fix a bug when resetting/reloading
286 2011-02-12 Philippe Brochard <pbrochard@common-lisp.net>
288 * src/xlib-util.lisp (equal-wm-class-fun, equal-wm-name-fun)
289 (raise-window-fun, raise-and-focus-window-fun): New functions.
291 * src/config.lisp (*clfswm-terminal-cmd*): Switch from xterm to
293 (*never-managed-window-list*): Structure change to be more
294 flexible. Let the choice to focus, raise and do nothing on never
297 2011-02-09 Philippe Brochard <pbrochard@common-lisp.net>
299 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Take
300 care of never managed windows to move or resize them if the raise
303 * src/clfswm-internal.lisp (in-frame, in-window, in-child): New
306 2011-02-08 Philippe Brochard <pbrochard@common-lisp.net>
308 * src/clfswm.lisp (main-mode): Raise or not unmanaged windows
309 following request in *never-managed-window-list*.
311 2011-02-05 Philippe Brochard <pbrochard@common-lisp.net>
313 * *: **** Release 1102 ****
315 2011-02-05 Desmond O. Chang <dochang@gmail.com>
317 * src/keysyms.lisp: Add extended keysyms from stumpwm.
319 2011-02-01 Desmond O. Chang <dochang@gmail.com>
321 * src/clfswm-util.lisp (run-or-raise): New function (thanks to
324 * src/clfswm-internal.lisp (with-all-*): add a nil block.
326 2011-01-28 Desmond O. Chang <dochang@gmail.com>
328 * src/clfswm-util.lisp (xdg-config-home): XDG_CONFIG_HOME should
329 be $HOME/.config by default.
331 2010-12-29 Philippe Brochard <pbrochard@common-lisp.net>
333 * contrib/osd.lisp (display-doc): Add another method where a
334 CLFSWM native window is used to display the key documentation.
336 2010-12-27 Philippe Brochard <pbrochard@common-lisp.net>
338 * src/xlib-util.lisp (with-xlib-protect): Force to revert to the
341 2010-12-25 Philippe Brochard <pbrochard@common-lisp.net>
343 * src/clfswm-second-mode.lisp (second-key-mode): Call the second
344 mode leave function only when the generic mode was ended.
346 2010-12-08 Philippe Brochard <pbrochard@common-lisp.net>
348 * src/clfswm-second-mode.lisp (sm-leave-function): Do not use
349 *second-mode-program* anymore.
351 2010-12-07 Philippe Brochard <pbrochard@common-lisp.net>
353 * src/clfswm-second-mode.lisp (*second-mode-leave-function*): New
354 variable bound to a function executed (when not null) on second
357 2010-11-14 Philippe Brochard <pbrochard@common-lisp.net>
359 * src/clfswm-util.lisp (find-child-under-mouse): Do not find
362 2010-11-13 Philippe Brochard <pbrochard@common-lisp.net>
364 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
365 Do not display the accel window for unmanaged windows.
367 2010-11-11 Philippe Brochard <pbrochard@common-lisp.net>
369 * src/clfswm-internal.lisp (set-current-root): Handle
370 window-parent in set-current-root.
372 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
373 focus the parent child when the current root is a window.
375 2010-11-09 Philippe Brochard <pbrochard@common-lisp.net>
377 * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
378 New function an bindings.
380 * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
383 2010-11-07 Philippe Brochard <pbrochard@common-lisp.net>
385 * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
386 function to let the user choose to keep child position with
389 * src/clfswm-internal.lisp (remove-frame-data-slot): New
392 2010-11-05 Philippe Brochard <pbrochard@common-lisp.net>
394 * src/clfswm-internal.lisp (frame-select-next-child)
395 (frame-select-previous-child): New functions and bindings. Select
396 the next/previous child in the current frame.
398 2010-10-31 Philippe Brochard <pbrochard@common-lisp.net>
400 * src/clfswm-query.lisp (query-mode-complet): New function: Handle
401 completion in query-mode.
403 2010-10-30 Philippe Brochard <pbrochard@common-lisp.net>
405 * src/clfswm-query.lisp (query-print-string): Handle long lines
408 2010-10-27 Philippe Brochard <pbrochard@common-lisp.net>
410 * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
411 all characters are printable.
413 2010-10-25 Philippe Brochard <pbrochard@common-lisp.net>
415 * contrib/server/server.lisp: Load clfswm client code in the main
416 program and let the user start it with a --client command line
419 * src/package.lisp (*main-entrance-hook*): New hook executed after
420 loading configuration file and before opening the display.
422 2010-10-23 Philippe Brochard <pbrochard@common-lisp.net>
424 * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
426 * src/clfswm-internal.lisp (show-child): Show window only if not
429 * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
430 change modifiers after binding definition.
432 2010-10-21 Philippe Brochard <pbrochard@common-lisp.net>
434 * contrib/osd.lisp: New file: OSD (On Screen Display) for
437 * src/clfswm-menu.lisp (open-menu): Modularise function.
439 2010-10-13 Philippe Brochard <pbrochard@common-lisp.net>
441 * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
442 key binding in main and second mode.
444 2010-10-10 Philippe Brochard <pbrochard@common-lisp.net>
446 * src/clfswm-util.lisp (open-notify-window): Convert hello-window
447 functions to a more generic Notify-window system.
449 * src/tools.lisp (add-timer): Add an id to identify the timer.
451 2010-10-09 Philippe Brochard <pbrochard@common-lisp.net>
453 * src/tools.lisp (erase-timer): New function.
455 * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
456 the hello window. Add Configuration variables.
458 2010-10-08 Philippe Brochard <pbrochard@common-lisp.net>
460 * src/clfswm-util.lisp (): Add an Hello window at startup.
462 * src/tools.lisp (process-timers): Add a timer system.
464 2010-10-07 Philippe Brochard <pbrochard@common-lisp.net>
466 * src/clfswm-query.lisp (add-in-query-string): Handle correctly
469 2010-10-06 Philippe Brochard <pbrochard@common-lisp.net>
471 * src/clfswm-query.lisp (query-print-string): Change cursor color
472 and show parenthesis matching with colors (on match and on
475 2010-10-05 Philippe Brochard <pbrochard@common-lisp.net>
477 * src/clfswm-internal.lisp (show-all-children): Do not raise a
478 child when its parent is hidden.
480 2010-10-02 Philippe Brochard <pbrochard@common-lisp.net>
482 * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
483 possibility to circulate over subchild of the current child.
485 * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
486 (expose-windows-generic): Add an escape-body function to return to
487 the original state on escape key.
489 * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
490 to bind the current child from the configuration file.
492 2010-10-01 Philippe Brochard <pbrochard@common-lisp.net>
494 * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
495 window hook: the frame absorb all new windows that match
496 nw-absorb-test frame data slot.
498 2010-09-30 Philippe Brochard <pbrochard@common-lisp.net>
500 * src/clfswm-expose-mode.lisp (expose-create-window): Show window
501 title in accel window.
503 2010-09-29 Philippe Brochard <pbrochard@common-lisp.net>
505 * configure: Use the Xavier Maillard clfswm script in contrib to
506 build an executable in the standard way.
508 2010-09-26 Philippe Brochard <pbrochard@common-lisp.net>
510 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
511 New functions. Add a window on each child in the expose mode to
514 * src/clfswm-internal.lisp (child-x, child-y, child-width)
515 (child-height): New methods to get real child coordinates.
517 2010-09-25 Philippe Brochard <pbrochard@common-lisp.net>
519 * src/clfswm-layout.lisp (*-layout): Use child-position.
521 * src/clfswm-internal.lisp (child-position): New function.
523 * src/clfswm-expose-mode.lisp (expose-windows-mode)
524 (expose-all-windows-mode): Use a generic mode.
526 * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
527 with handle-event-fun symbols instead of inspecting clfswm
528 internals symbols on each mode change.
530 * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
531 a separate clfswm-expose-mode.lisp file.
533 * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
534 screen size instead of hardcoded test coordinates.
536 2010-09-24 Philippe Brochard <pbrochard@common-lisp.net>
538 * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
539 (speed-mouse-right, speed-mouse-up, speed-mouse-down)
540 (speed-mouse-undo, speed-mouse-first-history): New functions to
541 quickly move the mouse. Implemented for the second mode.
543 2010-09-16 Philippe Brochard <pbrochard@common-lisp.net>
545 * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
546 write permission on $clfswm_asd_path. So anybody can start clfswm
547 even if there is no write permission on the source directory.
549 2010-09-12 Philippe Brochard <pbrochard@common-lisp.net>
551 * contrib/clfswm: Add support to cmucl, ccl and ecl.
553 2010-09-11 Philippe Brochard <pbrochard@common-lisp.net>
555 * src/clfswm-util.lisp (set-hide-unmanaged-window)
556 (set-show-unmanaged-window, set-default-hide-unmanaged-window):
557 New functions and menu entry.
558 (set-globally-hide-unmanaged-window)
559 (set-globally-show-unmanaged-window): New functions and menu
562 * src/clfswm-internal.lisp (hide-unmanager-window-p): New
564 (show-child): Add a data slot on frame to hide or not unmanaged
567 * src/clfswm-corner.lisp (present-clfswm-terminal)
568 (present-virtual-keyboard): Use a function (generic-present-body)
569 instead of a macro (generate-present-body).
571 * src/clfswm-util.lisp (update-menus): List all directories and
572 subdirectories in $XDG_DATA_DIRS/applications.
574 2010-09-10 Philippe Brochard <pbrochard@common-lisp.net>
576 * src/clfswm-corner.lisp (generate-present-body): New macro.
577 (present-clfswm-terminal, present-virtual-keyboard): Use
578 generate-present-body.
580 2010-09-09 Philippe Brochard <pbrochard@common-lisp.net>
582 * src/clfswm-util.lisp (update-menus): Follow XDG specifications
583 instead of the non-portable Debian update-menu.
585 2010-09-07 Philippe Brochard <pbrochard@common-lisp.net>
587 * src/clfswm.lisp (error-handler): New function do handle
588 asynchronous errors and ignore them.
589 (open-display): Install the new error-handler on display.
591 2010-09-05 Philippe Brochard <pbrochard@common-lisp.net>
593 * src/xlib-util.lisp (with-xlib-protect): Add a
594 with-simple-restart on top of body execution.
596 2010-09-04 Philippe Brochard <pbrochard@common-lisp.net>
598 * src/clfswm.lisp (main-loop): Protect all xlib functions with an
601 * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
602 handle-event. Add a with-simple-restart to prevent a
603 clisp/new-lisp infinite loop.
605 2010-08-30 Philippe Brochard <pbrochard@common-lisp.net>
607 * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
608 clfswm terminal working even on xterm title changes.
610 2010-08-29 Philippe Brochard <pbrochard@common-lisp.net>
612 * src/clfswm-util.lisp (run-other-window-manager): Update for
615 * src/tools.lisp (do-execute): New parameter io to change the
618 * src/clfswm-util.lisp (hide-current-child): Prevent from removing
621 * src/clfswm-internal.lisp (child-member): New predicate.
622 (child-remove): New function.
624 * src/*.lisp: Use child-member and child-remove everywhere it's
627 2010-08-28 Philippe Brochard <pbrochard@common-lisp.net>
629 * src/clfswm.lisp (main-loop): Ensure that all events have been
630 processed after a process-event.
632 * src/clfswm-internal.lisp (is-in-current-child-p): New function.
634 2010-08-27 Philippe Brochard <pbrochard@common-lisp.net>
636 * src/clfswm.lisp (main-mode:configure-request): Raise the window
637 only when present on the current child and focus it accordingly.
639 2010-08-26 Philippe Brochard <pbrochard@common-lisp.net>
641 * src/clfswm-circulate-mode.lisp (circulate-loop-function):
642 Use is-a-key-pressed-p.
644 * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
646 * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
647 returned by xlib:keysym->keycodes.
649 * src/*.lisp: Use the new child-equal-p to compare children. This
650 prevent a bug with sbcl/cmucl when the standard equal function
651 does not work with xlib:window.
653 * src/clfswm-internal.lisp (child-equal-p): New predicate.
655 2010-08-25 Philippe Brochard <pbrochard@common-lisp.net>
657 * src/clfswm-generic-mode.lisp (generic-mode): Use an
658 xlib:event-listen before processing event with
659 xlib:process-event. This prevent a bug with CLX threaded
660 implementation like sbcl.
662 * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
663 processing event with xlib:process-event. This prevent a bug with
664 CLX threaded implementation like sbcl.
666 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
668 * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
670 * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
673 * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
674 (find-parent-frame, find-frame-window, find-frame-by-name)
675 (find-frame-by-number): Use with-find-in-all-frames to search in
676 frames in the right order.
678 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
679 unwanted flickering with unmanaged windows.
681 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
683 * src/package.lisp: Remove event handler hooks as they're not
684 needed anymore (To replace them: use closure and define-handler).
686 * src/xlib-util.lisp (move-window, resize-window)
687 (wait-mouse-button-release): Use a generic mode.
689 * src/*.lisp: Replace the case to handle event with a more (tricky)
690 lispy method which bind a function to each keywords associated
693 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
695 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
696 menu entry between delete-current-child and remove-current-child.
697 ie: Delete a child and its children in all frames by default.
699 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
701 * src/package.lisp: Add a placement configuration group.
703 * src/binding*.lisp: Bind control+g to escape the current action
706 * src/clfswm-internal.lisp
707 (delete-child-and-children-in-all-frames): New function and
708 binding: Second mode - Control+Delete delete the current child and
709 its children in all frames (ie: close the current child and its
712 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
714 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
715 the frame window and the frame gc. Close a very annoying bug when
716 cuting/pasting a frame or moving a child over frames with the
719 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
720 all children in *current-root* after moving/resizing a frame.
722 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
724 * src/clfswm-util.lisp (delete-focus-window)
725 (destroy-focus-window): Remove child in parent frame before
728 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
730 * src/clfswm-util.lisp (identify-key): Add a timeout in
732 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
733 of the window passed by xlib:process-event.
735 * src/xlib-util.lisp (move-window, resize-window)
736 (wait-mouse-button-release): Add a timeout in xlib:process-event.
738 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
740 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
741 to launch an other window manager and to return to clfswm.
743 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
745 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
748 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
750 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
753 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
754 parameter and a loop timeout.
756 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
758 * src/clfswm.lisp (main): Add an alternate configuration filename
761 * load.lisp: Add a debuging code example.
763 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
765 * src/clfswm-configuration.lisp (create-configuration-menu): New
766 menu to configure all clfswm variables while clfswm is running.
768 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
770 * src/clfswm-util.lisp (save-configuration-variables): New
771 function to save all configuration variables in clfswmrc.
773 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
775 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
777 (set-default-info-keys): Add cursor key support in info mode.
779 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
781 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
784 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
785 prevent reading the configuration file (this may be useful to
786 produce the original documentation without user modifications
787 with the rc configuration file).
789 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
791 * src/bindings-second-mode.lisp (set-default-second-keys):
792 Simplification of Escape key to close/kill/remove the focus window
793 and unhide all windows.
795 * src/bindings.lisp (set-default-main-keys): Simplification of
796 Escape key to close/kill/remove the focus window and unhide all
799 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
800 focus and unhide all windows capabilities.
802 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
804 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
806 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
808 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
809 Keep child order and don't make unnecessary child movement.
810 (one-column-layout, one-line-layout): New layouts.
812 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
814 * *: **** Release 0906 ****
816 * contrib/cd-player.lisp: New file to handle the CD player.
818 * contrib/xmms.lisp: New file to handle the xmms player.
820 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
822 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
823 Maximize windows in there frame - Leave frames to there actual
826 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
827 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
829 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
831 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
833 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
835 * contrib/mpd.lisp: Use a standard menu.
837 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
839 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
841 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
843 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
845 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
848 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
850 * src/config.lisp (get-fullscreen-size): One pixel adjustment
853 * src/clfswm-placement.lisp (*-child-placement): One pixel
856 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
858 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
859 Ensure that all characters are printable.
861 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
864 * src/clfswm-placement.lisp (*-child-placement): Adjust
865 coordinates to one pixel in the current child.
867 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
869 * src/clfswm-query.lisp (query-enter-function): Assign font before
870 width and height calculation.
872 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
874 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
875 bannish the pointer in an arbitrary place.
877 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
878 place the info window in an arbitrary place.
880 * src/clfswm-query.lisp (query-enter-function): Use with-placement
881 macro to place the query window in an arbitrary place.
883 * src/clfswm-placement.lisp: New file. Allow to place info windows
884 or query windows on an arbitrary place. Allow to bannish the
885 pointer on an arbitrary place.
887 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
889 * src/clfswm-circulate-mode.lisp (reorder-child)
890 (reorder-brother): Unfocus windows before reordering children or
893 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
895 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
896 the parent is a frame.
898 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
899 motion with a default modifier.
901 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
904 * src/clfswm-info.lisp (info-mode): Handle motion with a default
906 (info-mode): Optimization in loop function.
908 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
910 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
911 root-frame correctly.
913 * clfswm.asd: Dependency fix for clfswm-generic-mode.
915 * src/clfswm-circulate-mode.lisp (reorder-child)
916 (reorder-brother): Handle empty frames.
917 (reorder-brother): Redisplay only the parent frame of the current
920 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
921 parent frame of the current frame.
923 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
925 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
926 Maximize/Unmaximize the current frame in its parent frame.
928 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
929 windows and frames in there parent frame.
931 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
933 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
935 * src/clfswm-circulate-mode.lisp (reorder-child)
936 (reorder-brother): Reinitialise on circulate type change
937 child to brother or brother to child.
939 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
940 calls xlib:display-finish-output on each map-request. So speed up
943 * src/xlib-util.lisp (map-window): New function. Call
944 xlib:display-finish-output on each map request.
946 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
948 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
949 Optimisation when drawing second mode window.
951 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
953 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
956 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
958 * src/clfswm-util.lisp (run-program-from-query-string): Launch
959 command only with a return validation.
961 2009-04-22 Xavier Maillard <xma@gnu.org>
963 * src/clfswm-query.lisp (query-string): Use a generic mode.
965 2009-04-19 Xavier Maillard <xma@gnu.org>
967 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
969 2009-04-18 Xavier Maillard <xma@gnu.org>
971 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
972 to define all other modes.
974 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
976 * src/package.lisp (): Use *default-font-string* for all
979 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
981 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
983 * src/xlib-util.lisp (null-size-window-p): Better check of null
986 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
988 * src/clfswm.lisp (handle-map-request): Add a fix to manage
989 correctly fullscreen windows (SDL particularly).
991 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
993 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
994 a segfault with clisp/new-clx.
996 * src/clfswm.lisp (handle-motion-notify): Add a needed window
999 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
1000 needed window argument.
1002 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
1004 * src/xlib-util.lisp (wait-no-key-or-button-press)
1005 (wait-a-key-or-button-press): Check buttons press/release correctly"
1007 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
1009 * src/menu-def.lisp: Add children navigation menu in the movement
1010 menu (select next/previous child/brother/level).
1012 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
1014 * *: Rename 'sister' frame to 'brother' frame.
1016 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
1017 alias in a real modifier.
1019 * src/package.lisp (*modifier-alias*): New list of modifier alias
1020 For example: :alt is :mod-1, :numlock is :mod-2...
1022 * src/tools.lisp (remove-hook): New function.
1024 * src/clfswm-keys.lisp (with-capslock, without-capslock)
1025 (with-numlock, without-cnumlock): New functions.
1027 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
1029 * src/clfswm-info.lisp: Use the *binding-hook* to create info
1030 keys and mouse bindings.
1032 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
1033 second keys and mouse bindings.
1035 * src/bindings.lisp: Use the *binding-hook* to create main keys
1038 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1040 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
1043 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
1045 * src/menu-def.lisp: Use a menu instead of a function for the
1048 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
1050 * src/clfswm-util.lisp (show-standard-menu): Display the standard
1051 menu from the 'update-menus' command.
1053 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
1055 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
1056 it's already grabbed.
1058 * src/clfswm-internal.lisp (display-frame-info): Use configurable
1059 colors and fix a bug with background.
1060 (display-frame-info): Set window background when displaying info.
1062 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1064 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
1065 warning with clisp/new-clx.
1067 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
1069 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
1072 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1074 * *: **** Release 0809 ****
1076 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1078 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
1080 (ensure-unique-number): New function and menu entry.
1082 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
1084 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
1085 hook: open the next window in a named frame.
1086 (numbered-frame-nw-hook): New new window hook: open the next
1087 window in a numbered frame.
1089 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
1090 cases. So query-string can be called even in the main mode.
1092 * src/clfswm-internal.lisp (show-all-children): Do not raise a
1093 child by default => far less flickering.
1095 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
1097 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
1099 * src/menu-def.lisp: Change key binding for the CLFSWM menu
1102 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
1103 is nil. (workaround on some CLX implementation).
1105 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
1107 * src/menu-def.lisp: Add a menu to set a focus policy for all
1110 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
1111 (all-frames-set-*-focus-policy): Set a focus policy for all
1114 * src/clfswm.lisp (handle-enter-notify): sloppy-select
1115 mode. Select a child and its parents on mouse over.
1117 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
1119 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
1120 policy -> Sloppy focus only for windows in the current frame.
1121 (main-unprotected): Exit clfswm on init error (ie: when another
1122 window manager is running).
1124 * src/clfswm-util.lisp (reset-clfswm): New function.
1126 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
1128 * src/clfswm-menu.lisp (init-menu): New function.
1130 * src/clfswm-util.lisp (reload-clfswm): New function to reload
1132 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
1134 * src/clfswm.lisp (main, main-unprotected): Handle error in a
1135 superior main function. Now CLFSWM can't break the X session. It
1136 just reinitialize the display and run a new main loop.
1138 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
1139 *vt-keyboard-on* global to avoid warnings when loading clfswm.
1141 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
1142 (help-on-gimp-layout): Describe how to use the GIMP layout.
1144 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
1146 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
1147 main-window-right-layout. Change the keybinding for (shift)alt+tab
1148 to not select windows in the main window lisst.
1149 Bind F8 to add a window in the main window list.
1150 Bind F9 to remove a window in the main window list.
1151 Change the focus policy to :sloppy.
1152 (set-previous-layout): Restore the previous layout, keybinding and
1155 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
1157 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
1159 * src/clfswm-layout.lisp (main-window-left-layout)
1160 (main-window-bottom-layout, main-window-top-layout): New
1162 Factorize layouts in menu.
1164 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
1166 * src/clfswm-layout.lisp (main-window-right-layout): A possible
1167 GIMP layout: one or more main windows on one side of the
1168 frame. Others on the other size.
1170 * src/clfswm-util.lisp
1171 (current-frame-set-click/sloppy-focus-policy): Each frame can have
1172 a different focus policy (one of :click or :sloppy).
1173 The default focus policy is set with *default-focus-policy*.
1175 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
1177 * src/clfswm-info.lisp (show-config-variable): New function.
1179 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
1181 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
1183 * src/clfswm-info.lisp: Colored help for key binding and corners
1186 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
1188 * src/clfswm-util.lisp (delete-focus-window)
1189 (destroy-focus-window): Remove chid only in
1190 handle-unmap/destroy-notify. Focus *current-root* only when
1191 closing/killing the current child.
1193 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
1194 functions or corners.
1196 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1198 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
1199 action: Hide/Unhide a terminal on mouse corner action. (By default
1200 right mouse button on the top left corner).
1202 * src/config.lisp (*never-managed-window-list*): New config
1205 * src/clfswm-internal.lisp (never-managed-window-p): New function:
1206 Handle never managed window in a more simple way.
1208 * src/clfswm-corner.lisp: New file and new and more simple method
1209 to define corners actions.
1211 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
1213 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
1215 * src/clfswm-layout.lisp (fast-layout-switch)
1216 (define-fast-layout-switch): New functions: Switch between two
1219 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
1220 really in the second mode. So leave-second-mode can be used even
1223 * src/clfswm-util.lisp (switch-to-last-child): New function:
1224 Store the current child and switch to the previous one.
1226 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1228 * src/clfswm-util.lisp (display-current-window-info): Display the
1230 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
1231 (top right by default). By default 'xvkbd' is used.
1233 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1235 * src/xlib-util.lisp (move-window, resize-window): Compress motion
1238 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
1240 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
1243 * src/clfswm-info.lisp (info-mode): Compress motion events.
1245 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
1247 * src/clfswm-internal.lisp (show-all-children): Compute geometry
1248 and selection first and then show only necessary children.
1249 (show-child): remove unneeded display-p parameter.
1251 * src/config.lisp (get-fullscreen-size): Place the frame border
1252 outside the screen (this prevent the loose of 2 pixels per
1255 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
1257 * src/clfswm-internal.lisp (focus-child): Algorithm change to
1258 raise only the selected child.
1260 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
1262 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
1263 Raise only viewable children.
1265 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
1267 * src/clfswm-internal.lisp (show-all-children): Always raise all
1268 displayed children. Remove all references to raise-p.
1270 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1272 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
1275 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
1276 second mode binding on raise/lower child in its frame.
1278 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
1279 behaviour to the new raise/lower property.
1280 Call clear-nw-hook before the rest of the hook.
1282 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
1283 (mouse-click-to-focus-and-resize-window): Stop button event. This
1284 prevent a keyboard/pointer freeze.
1286 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1288 * src/clfswm-internal.lisp (frame-lower-child)
1289 (frame-raise-child): New functions to raise/lower a child in its
1292 * src/clfswm-util.lisp (have-to-present-windows)
1293 (have-to-present-all-windows): New functions to have an MaxOS
1294 expose like on mouse click in screen corner.
1296 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
1298 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
1300 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
1301 child from a choice in all frames with hidden children.
1303 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
1305 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
1307 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
1308 (unhide-all-children): New functions.
1310 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
1313 * src/clfswm-util.lisp (hide/show-frame-window): new function and
1316 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
1318 * src/clfswm-util.lisp (rename-current-child): Do not display the
1319 frame info for a window.
1321 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
1323 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
1324 frame window for the removed child and its children.
1326 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
1328 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
1331 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
1333 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
1334 the ROX pinboard (ie: leave it lowered in the root window as
1337 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
1338 (tile-left-layout, tile-right-layout, tile-top-layout)
1339 (tile-bottom-layout): Use all the frame space when there is only
1342 * src/clfswm-internal.lisp (place-window-from-hints): Center
1343 unmanaged windows in the root screen.
1345 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
1348 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1350 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
1351 typo in managed types.
1353 * src/clfswm-internal.lisp (show-child): Always display frame info
1354 even if the frame is hidden.
1356 * src/xlib-util.lisp (resize-window): Use a better algorithme to
1359 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1361 * src/clfswm-util.lisp (with-movement): Display frame info for all
1362 frames in current root.
1364 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1366 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
1368 * src/bindings-second-mode.lisp (define-second-key #\a): New
1369 binding on 'add-default-frame'.
1371 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1372 message to follow the autodocumentation process.
1374 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1376 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1377 "Space" to jump to a child. "B" to bind a slot on the current
1380 * src/bindings-second-mode.lisp: Use "Tab" instead of
1383 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
1385 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1386 unmanaged (hidden) windows.
1388 * src/clfswm-internal.lisp (place-window-from-hints): Give a
1389 minimal size for windows.
1390 (with-all-windows-frames-and-parent): New function.
1392 * src/config.lisp (*default-window-width/height*): New parameters.
1394 * src/clfswm-internal.lisp (place-window-from-hints): Center
1395 windows in the screen instead of in there frame.
1397 * src/bindings-second-mode.lisp (tile-space-current-frame): New
1400 * src/clfswm-layout.lisp (register-layout): Intern the once name
1401 in the right package.
1403 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1405 * doc/dot-clfswmrc: Update to follow the new clfswm way.
1407 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
1409 * src/clfswm-internal.lisp (set-current-child)
1410 (adapt-child-to-parent, show-child, hide-child): Handle the case
1411 where child is not a frame or a window.
1413 * src/clfswm-util.lisp
1414 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1415 Check if child is a frame.
1417 * src/clfswm-internal.lisp (managed-window-p): Handle the case
1418 where frame is null.
1419 (place-frame): Check if frame and parent are frames.
1421 * src/clfswm-info.lisp (info-mode): display all frame info before
1424 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1425 info before leaving.
1427 * src/clfswm-internal.lisp (display-all-frame-info): New function.
1429 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
1431 * src/tools.lisp (getenv): Implemented for ECL.
1432 (urun-prog): Implemented for ECL.
1434 * src/clfswm-util.lisp (identify-key): Use a double buffer to
1437 * src/clfswm-query.lisp (query-string): Use a double buffer to
1440 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1443 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1446 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
1448 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1450 * src/menu-def.lisp: New file: move all menu definition in
1453 * src/clfswm-layout.lisp (register-layout): Use a function instead
1456 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
1458 * src/clfswm-autodoc.lisp (produce-menu-doc,
1459 (produce-menu-doc-html): New functions.
1460 (produce-doc-*): Moved to clfswm-autodoc.lisp.
1462 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1463 paste a child on one of its own children. (this prevent a
1465 (move-child-to): Rename move/copy-current-child-by to
1467 (mouse-move-window-over-frame): New function to move the window
1468 under the mouse cursor to another frame.
1470 * src/clfswm-internal.lisp (find-child-in-parent): New function.
1472 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1474 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1475 windows only when its window parent is the current child.
1477 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1479 * src/clfswm-util.lisp (manage-current-window)
1480 (unmanage-current-window): New functions: Allow to force to manage
1481 or unmanage a window by its parent frame.
1483 * src/bindings-second-mode.lisp (#\o): binded to
1484 set-open-in-new-frame-in-parent-frame-nw-hook and
1485 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1487 * src/clfswm-util.lisp (with-current-window): New macro.
1489 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1490 exposure and enter-window handle event.
1492 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1493 children for the current child after the move/resize.
1495 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1497 * src/xlib-util.lisp (resize-window): Take care of window size
1500 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1501 move/resize unmanaged windows.
1503 * src/xlib-util.lisp (move-window, resize-window): New functions.
1505 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1507 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1508 user choose what window type the current frame must handle.
1509 (display-current-window-info): New function.
1510 (current-frame-manage-all-window-type)
1511 (current-frame-manage-only-normal-window-type)
1512 (current-frame-manage-no-window-type): New functions.
1514 * src/clfswm-internal.lisp (managed-window-p): New function.
1516 * src/package.lisp (frame): Managed type: new frame
1517 parameter. This allow to choose what window type a frame must
1520 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1522 * src/clfswm-nw-hooks.lisp
1523 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1525 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1528 * src/tools.lisp (ensure-printable): Return always a string even
1531 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
1533 * src/config.lisp (*default-nw-hook*): New variable to change the
1534 default new window hook.
1536 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1538 * clfswm.asd (clfswm): Add a dependency from
1539 clfswm-second-mode.lisp to clfswm.lisp.
1541 * src/clfswm-util.lisp (identify-key): Show the documentation for
1542 the function bound on a key.
1543 (with-movement): Move with-movement,
1544 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
1545 to clfswm-util.lisp.
1547 * src/clfswm-menu.lisp: New menu system that let user change keys
1548 or functions associated to keys.
1550 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
1552 * src/clfswm-internal.lisp (show-all-children): Display-child is
1553 the first child by default. Solve a bug with father-p.
1555 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
1557 * src/clfswm-internal.lisp (add-frame): Add frame return the
1559 (show-all-children): Move the size computation outside the
1562 * src/bindings-second-mode.lisp (with-movement): Redisplay only
1565 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1566 only the current child.
1568 * src/clfswm-internal.lisp (show-all-children): New display-child
1569 parameter to display only the desired child and its children.
1570 (select-next/previous-child): Only display the current child.
1572 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
1574 * src/clfswm.lisp (init-display): Move the default frame creation
1575 on the default init hook.
1577 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1578 the main mode (for example: "1" on an azerty keyboard).
1580 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
1582 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1583 keysyms. Revert to old grabbing method for the main mode.
1585 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
1587 * src/clfswm.lisp (init-display): Add key handling on no focus
1588 window and on frame windows.
1590 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1592 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1593 all keys by default and replay just what is needed. No change for
1596 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1597 (find-key-from-code): Test for shift and not shift presence.
1599 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
1601 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1602 new key parameter to have less flickering.
1604 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
1606 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1607 layout only one time and revert to no-layout to freely handle
1610 * src/clfswm-nw-hooks.lisp
1611 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1612 with new created window.
1614 * src/clfswm-layout.lisp (register-layout): Now register
1615 automatically a once layout to set the layout only one time and
1616 revert to no-layout to freely handle frames.
1618 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1620 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1621 nw-hook: Open the next window in the current frame and leave the
1622 focus to the current child.
1624 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
1626 * src/bindings-second-mode.lisp: Add keys definitions to
1627 bind-or-jump in the second mode.
1629 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
1630 macro for bind-or-jump-(1|2|3...).
1632 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
1633 arguments to function. This allow to do things like:
1634 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
1635 are passed to my-function on key press.
1637 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
1639 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
1641 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
1643 * src/clfswm-internal.lisp (child-fullname): New function
1645 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
1646 docstring in info-mode-menu. An item can be
1647 '((key function) (key function)) or with docstring
1648 '((key function "documentation 1") (key function "bla bla") (key function))
1650 * src/tools.lisp (ensure-n-elems): New function.
1652 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
1653 resize a frame or the window's father.
1655 * src/clfswm.lisp (init-display): Remove tile-space-layout by
1656 default on the root frame.
1658 * src/clfswm-util.lisp (move/resize-frame): Add standard event
1659 hooks handlers (map-request, configure-notify...)
1661 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
1664 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1666 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
1667 or the window's father.
1669 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
1670 event only if there is a geometry change.
1671 (mouse-focus-move/resize-generic): Generic function to move or
1672 resize a frame or a window father frame.
1674 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1676 * src/clfswm-internal.lisp (show-all-children): Return t if there
1677 is a geometry change.
1679 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
1681 * src/bindings.lisp (Up/Down): Swap select previous/next level.
1683 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
1685 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
1687 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
1688 (with-all-*): Reverse the child list to manage the first child last (like in
1691 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
1692 root window only if true.
1694 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
1695 root window only if *create-frame-on-root* is true.
1697 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
1700 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
1702 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
1703 the current child (even if it's a window).
1705 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
1707 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
1708 (mouse-click-to-focus-and-resize): New functions.
1710 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
1711 (*-px->fl): Convert pixel coordinates to float.
1713 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
1715 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
1717 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
1720 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
1721 and hide-all-children.
1722 (raise-if-needed): New function.
1723 (show-child): Use a first-p parameter to raise windows only when they are
1726 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
1728 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
1731 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
1733 * src/clfswm-info.lisp (keys-from-list): new function.
1735 * src/*: rename 'childs' in 'children'.
1737 * src/*: rename 'group' in 'frame'.
1739 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
1741 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
1743 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
1745 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
1747 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
1749 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
1750 Bind control+o to open the next window in a new group in the root group
1751 (as open in next window in a new workspace in 0801 version).
1753 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
1755 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
1758 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
1760 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
1761 instead of Tab for select-previous-child.
1763 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
1765 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
1768 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
1770 * clfswm-util.lisp (identify-key): Display the documentation
1771 associated to keys when identifying a key.
1773 2008-03-10 Xavier Maillard <xma@gnu.org>
1775 * contrib/clfswm: Complete rewrite of the script. Detect error and
1776 act accordingly. Add command line arguments to configure the
1777 script execution. User can now choose different common lisp
1778 implementation (clisp and sbcl only), choose where to store the
1779 dumped image, where to find clfswm source.
1781 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
1783 * clfswm-internal.lisp (process-new-window): Beginning of new
1784 window hook: each group have a hook to tell what he wants to do
1785 with the new created window.
1787 2008-03-08 Xavier Maillard <xma@gnu.org>
1789 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
1790 call the resulting executable.
1792 * clfswm.lisp (read-conf-file): Check for the user config file in
1793 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
1794 prefered whenever possible.
1796 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
1798 * clfswm-layout.lisp (*-layout): Add an optional raise-p
1799 parameter in each layout.
1801 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
1803 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
1805 (copy/move-current-child-by-name/number): new functions
1806 (focus-group-by-name/number): new functions
1807 (delete-group-by-name/number): new functions
1809 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
1811 * ************************************************************ *
1812 *: Major update - No more reference to workspaces. The main *
1813 structure is a tree of groups or application windows. *
1814 * ************************************************************ *
1816 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
1818 * clfswm.lisp (read-conf-file): Read configuration in
1819 $HOME/.clfswmrc or in /etc/clfswmrc or in
1820 $XDG_CONFIG_HOME/clfswm/clfswmrc.
1821 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
1824 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
1826 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
1829 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
1831 * clfswm-internal.lisp (find-window-group): New function.
1833 * clfswm*: Change to make clfswm run with clisp/new-clx.
1835 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
1837 * clfswm-util.lisp (query-show-paren): Add show parent matching in
1839 (query-string): Bind control+k to delete end of line.
1841 * clfswm-second-mode.lisp (draw-second-mode-window): Display
1842 the action on mouse motion in second mode.
1844 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
1845 event but do not clear the root window.
1846 (handle-configure-request): Adjust unmanaged window from there
1849 * clfswm-internal.lisp (process-new-window): Adjust new window
1850 with the specified hints (max/min/base width/height).
1852 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
1854 * clfswm.lisp (handle-configure-request): Send an Configuration
1855 Notify event. This solve a bug with xterm and rxvt who takes some
1856 times to be mapped. Now there is no delay.
1858 * bindings-second-mode.lisp (define-shell): Run programs after
1859 living the second mode.
1861 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
1863 * clfswm-internal.lisp (process-new-window): Do not crop transient
1864 window to group size.
1865 (adapt-window-to-group): Do not crop transient window to group
1868 * clfswm.lisp (handle-configure-request): Adapt just the window to
1869 its group and don't take care of the configure request. Remove the
1870 bug with the Gimp outside the group and speed up the window
1872 (handle-exposure): Remove show-all-group on exposure event
1875 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
1877 * clfswm-util.lisp (circulate-group-up-copy-window)
1878 (circulate-group-down-copy-window)
1879 (circulate-workspace-up-copy-group)
1880 (circulate-workspace-down-copy-group): Prevent the copy of the
1881 same window in the same workspace.
1883 * bindings-second-mode.lisp (release-copy-selected-window)
1884 (release-copy-selected-group): Prevent the copy of the same window
1885 in the same workspace.
1887 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
1888 (generic-pager-move-window-on-next-line): Remove the copy
1890 (generic-pager-move-group-on-next-workspace)
1891 (generic-pager-move-group-on-previous-workspace): Prevent the copy
1892 of the same window in the same workspace.
1894 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
1895 (mouse-pager-copy-selected-group-release): Prevent the copy of the
1896 same window in the same workspace.
1898 * tools.lisp (setf/=): new macro to set a variable only when
1901 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
1902 x, y... only when necessary.
1904 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
1906 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
1907 new function and hook: force windows to stay in its group (solve a
1910 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
1912 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
1913 less flickering when moving/resizing groups.
1915 * clfswm-internal.lisp (hide-group): new function.
1916 (show-all-group): clear-all: new parameter.
1918 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
1920 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
1922 * clfswm*: Color change for the pager. Typo or better description
1923 in bindings definitions. Define bindings for a qwerty keyboard by
1924 default. dot-clfswmrc show examples to switch to an azerty
1926 License change to GPL v3.
1927 * config.lisp: new file - group all globals variables in this
1930 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
1932 * xlib-util.lisp (hide-window): Remove structure-notivy events
1933 when hidding a window.
1935 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
1937 * package.lisp (*sm-property-notify-hook*): Readded
1938 property-notify-hook in second mode.
1940 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1942 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
1944 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1946 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
1947 Tile the current workspace with the current window on one side and
1948 others on the other (this emulate the larswm, dwm, wmii way). See
1949 the default configuration file to enable this mode by default.
1951 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
1954 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1956 * clfswm-pager.lisp (pager-draw-window-in-group): Add
1957 ensure-printable to print windows name even with non-ascii
1960 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
1962 * clfswm-pager.lisp (pager-explode-current-group): Create a new
1963 group for each window in group.
1964 (pager-implode-current-group): Move all windows in workspace to
1965 one group and remove other groups.
1967 * clfswm-pack.lisp (explode-group): Create a new group for each
1969 (implode-group): Move all windows in workspace to one group and
1970 remove other groups.
1972 * clfswm-util.lisp (identify-key): Remove local configuration
1973 variables and made them available for configuration from
1975 (query-string): idem.
1977 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1979 * netwm-util.lisp: Start of NetWM compliance.
1980 Add a Netwm client list gestion.
1982 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1984 * clfswm-internal.lisp (create-group-on-request): open a new group
1985 only when the current group is not empty.
1987 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
1988 bug with null workspace.
1990 * clfswm-pager.lisp (pager-handle-event): Add a hook
1991 system. This hooks can be changed in the user configuration file.
1993 * package.lisp: All colors and font variables are set in
1994 package.lisp and can be configured in the user configuration
1996 Note: If you have configured some less ugly colors (esp. for the
1997 pager) don't hesitate to let me know :)
1999 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
2000 system. This hooks can be changed in the user configuration file.
2002 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
2003 changed in the user configuration file (~/.clfswmrc)
2005 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
2007 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
2008 arrow action, open next window in new workspace/group.
2010 * bindings.lisp (stop-all-pending-actions): new binding.
2011 (open-next-window-in-new-group-once): Open the next windows in a
2012 new group (only once) or open all new windows in a new group (like
2013 others windows managers).
2015 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
2017 * clfswm.lisp (read-conf-file): New function to read a lisp
2018 configuration file at startup.
2019 (focus-group-under-mouse): Check if group isn't the current group
2020 ( prevent a bug with unclutter ).
2022 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
2024 * bindings.lisp (run-program-from-query-string): A program can be
2025 launch from a input query window.
2027 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
2029 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
2031 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
2033 * clfswm.lisp (process-new-window): One can now open the next
2034 window in a workspace called by its number.
2036 * clfswm-util.lisp (query-font-string): Minimal editing
2038 (eval-from-string): And an REPL in the window manager... :)
2040 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2042 * clfswm.lisp (process-new-window): One can now open the next
2043 window in a new workspace or a new group.
2045 * clfswm-pager.lisp (pager-mode): Display the next arrow action
2046 with the hidden windows.
2048 * clfswm.lisp (second-key-mode): Display the current workspace
2049 number and the next arrow action in the state window.
2051 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
2052 the pager mode and then redisplay only the current workspace.
2054 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
2056 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
2057 they can be focused with a keypress, sorted or renumbered.
2059 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2061 * clfswm-pager.lisp (pager-mode): Remove multiple silly
2062 pager-draw-display. This prevent a lot of flickering in the
2065 * clfswm.lisp: Remove all display-force-output and replace them
2066 with only one display-finish-output in the event loop.
2068 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
2070 * clfswm-pager.lisp (pager-center-group): New function - center a
2071 group at the middle of the screen.
2073 * clfswm-pack.lisp (center-group): New function - center a group
2074 at the middle of the screen.
2076 * clfswm.lisp (show-group): Add a cross line under the group.
2077 (show-group): Group are showned even if fullscreened.
2078 (init-display): Add an exposure event on the root window.
2080 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
2082 * package.lisp (*default-group*): Default group is the same size
2083 of a fullscreened group.
2085 * bindings*: Use shift to move, control+shift to copy.
2087 * *.lisp: Add comments for configuration or alternatives. So grep
2088 for CONFIG to see where you can configure clfswm. And grep for
2089 Alternative to use some commented code.
2091 * clfswm.lisp (second-key-mode): Use a single window to show the
2092 second mode. See for alternatives at the end of this file.
2094 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
2096 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
2097 macro of key and mouse definitions.
2098 (define-define-key/mouse): Use state instead of modifiers list
2099 this fix a bug when the modifiers list is not in the rigth order.
2101 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
2103 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
2105 * clfswm-info.lisp (info-mode): Add an info mode.
2107 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
2109 * clfswm.lisp (process-new-window): Change border size for
2111 (show-all-windows-in-workspace): Unhide all windows even when the
2112 current group is in fullscreen mode.
2114 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
2116 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
2117 redisplay the identify window after a terminal switch.
2119 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
2120 redisplay the pager after a terminal switch.
2122 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
2124 * clfswm-util.lisp (identify-key): Add a window to display
2125 the keys to identify on screen.
2127 * bindings.lisp, bindings-pager.lisp: Define same keys to
2128 move/copy groups/windows in second mode and in pager.
2130 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
2132 (show-all-windows-in-workspace): unhide window before adapting it
2135 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
2137 * clfswm.lisp (handle-event): Revert to an older version.
2139 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
2141 * clfswm-util.lisp (force-window-in-group)
2142 (force-window-center-in-group): New functions for transient windows.
2144 * clfswm-pager.lisp (pager-remove-current-workspace/group):
2145 bugfix: hide all windows before removing group or workspace.
2147 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
2149 * bindings-pager.lisp (mouse-pager-move-selected-group)
2150 (mouse-pager-copy-selected-group)
2151 (mouse-pager-move-selected-window)
2152 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
2153 (mouse-pager-rotate-window-down): New functions to have mouse in
2156 * clfswm-pager.lisp (pager-swap-window)
2157 (pager-copy-group-on-next/previous-workspace)
2158 (pager-copy-window-on-next/previous-line): New functions
2160 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
2162 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
2163 (pager-move-group-on-next/previous-workspace): new functions.
2165 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
2166 to its half size (new functions).
2168 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
2170 * clfswm-pager.lisp: workspaces, groups and windows can now be
2171 selectionned with the keyboard or the mouse.
2173 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
2175 * clfswm-pager.lisp (pager-select-workspace-right/left):
2176 workspaces can now be selectionned with the keyboard.
2178 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
2180 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
2181 new function to remove a previous defined key or mouse combination.
2183 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
2185 * clfswm.lisp (main): Check for access error in init-display.
2187 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
2188 keycode before grabbing.
2190 * bindings.lisp: Remove nlambda and use defun to keep the function
2191 documentation with clisp.
2192 (define-shell): new macro to define shell command for the second
2195 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
2197 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
2200 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
2202 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
2203 workspace circulation.
2205 * clfswm-util.lisp (absorb-orphan-window): new function.
2207 * clfswm-keys.lisp: Keysyms support.
2209 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
2211 * clfswm.lisp (show-group): Use one gc for all groups and not one
2214 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
2216 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
2218 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
2219 width and height outside group.
2221 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
2223 * clfswm.lisp: First public release.