1 2012-09-04 Philippe Brochard <pbrochard@common-lisp.net>
3 * src/clfswm-internal.lisp (show-all-children): Hide only children
4 hidden by normal windows or frames (but not :dialog,
7 2012-08-31 Philippe Brochard <pbrochard@common-lisp.net>
9 * src/xlib-util.lisp (with-xlib-protect): Handle all Xlib errors
10 for better code protection.
12 2012-08-28 Philippe Brochard <pbrochard@common-lisp.net>
14 * src/clfswm-expose-mode.lisp (expose-query-key-press-hook): Add
15 an option to immediately select child if they can be directly
18 2012-08-25 Philippe Brochard <pbrochard@common-lisp.net>
20 * contrib/volume-mode.lisp: Add mouse buttons actions in volume
21 mode. Add a volume button toolbar module.
23 2012-08-24 Philippe Brochard <pbrochard@common-lisp.net>
25 * contrib/mpd.lisp: New toolbar modules (available only if
26 toolbar.lisp is loaded).
27 Add a small parameter for toolbar modules useful with vertical
30 2012-08-21 Philippe Brochard <pbrochard@common-lisp.net>
32 * contrib/reboot-halt.lisp: Add configuration command for system
35 * contrib/toolbar.lisp (toggle-toolbar-hide-state): New function.
37 2012-08-20 Philippe Brochard <pbrochard@common-lisp.net>
39 * src/clfswm-internal.lisp (add-in-never-managed-window-list): New
42 2012-08-20 Philipp Kroos <philipp.kroos@t-online.de>
44 * src/clfswm-placement.lisp (here-placement): Evaluates to current
47 2012-08-20 Philipp Kroos <philipp.kroos@t-online.de>
49 * contrib/toolbar.lisp: Add an expose-mode-button-module.
51 2012-08-19 Philippe Brochard <pbrochard@common-lisp.net>
53 * contrib/toolbar.lisp (remove-toolbar): New function.
55 2012-08-18 Philippe Brochard <pbrochard@common-lisp.net>
57 * contrib/toolbar.lisp: Add configurable colors in toolbar
60 2012-08-16 Philippe Brochard <pbrochard@common-lisp.net>
62 * src/tools.lisp: Factorize system usage information collection.
63 (start-system-poll): Use a lock file instead of a local variable.
65 * contrib/toolbar.lisp: Add memory, cpu and battery usage module
66 with a poll methode. More responsive but up to date every 10s by
69 2012-08-15 Philippe Brochard <pbrochard@common-lisp.net>
71 * contrib/toolbar.lisp: Add a clickable label module for toolbar.
72 Add a clickable entry to open the CLFSWM main menu.
73 Add memory, cpu and battery usage module.
75 * src/clfswm-menu.lisp (open-menu): Prevent to reopen an opened
76 menu. Fixe a but with negative selected-item.
78 2012-08-14 Philippe Brochard <pbrochard@common-lisp.net>
80 * src/clfswm-util.lisp (eval-from-query-string): Show a notify
81 window when updating symobls list for REPL completion.
82 (show-current-root): New function and configuration menu to
83 display a message on the current root.
85 * contrib/toolbar.lisp: Add arguments in toolbar modules.
87 * src/xlib-util.lisp (event-hook-name): Intern hook name symbol
90 2012-08-13 Philippe Brochard <pbrochard@common-lisp.net>
92 * contrib/toolbar.lisp (toolbar-module-text): Print a formatted
93 text at module position centered in toolbar.
95 * src/xlib-util.lisp (optimize-event-hook): Remove unused event
98 2012-08-12 Philippe Brochard <pbrochard@common-lisp.net>
100 * contrib/toolbar.lisp: End of toolbar framework.
101 (list-toolbar-modules): Add a list toolbar modules function.
103 2012-08-03 Philippe Brochard <pbrochard@common-lisp.net>
105 * src/clfswm-internal.lisp (show-child): Show unmanaged windows
106 on (maybe) current child in all roots.
108 * src/clfswm-util.lisp (find-child-under-mouse-in-child-tree):
109 Handle children from all roots instead of from *root-frame*.
111 2012-07-23 Philippe Brochard <pbrochard@common-lisp.net>
113 * src/clfswm-expose-mode.lisp: New expose mode based on standard
116 2012-06-27 Philippe Brochard <pbrochard@common-lisp.net>
118 * src/clfswm-util.lisp (eval-from-query-string): Add completion
119 for eval for query string.
121 2012-06-26 Philippe Brochard <pbrochard@common-lisp.net>
123 * src/clfswm-query.lisp: Add completion for shell commands.
125 2012-06-18 Philippe Brochard <pbrochard@common-lisp.net>
127 * src/clfswm-placement.lisp: Each child can have its own border
128 size. New binding to change the child border size on the fly.
130 2012-06-08 Philippe Brochard <pbrochard@common-lisp.net>
132 * src/tools.lisp (process-timers): Call get-internal-real-time
133 only once for all times.
135 2012-06-07 Philippe Brochard <pbrochard@common-lisp.net>
137 * contrib/toolbar.lisp (define-toolbar-hooks): Add auto-hide
139 (define-toolbar-hooks): Add auto-hide toolbar (show/hide on mouse
142 2012-06-06 Philippe Brochard <pbrochard@common-lisp.net>
144 * src/xlib-util.lisp (handle-event): Add an additional hook event
145 system to handle events in contrib code.
147 2012-06-03 Philippe Brochard <pbrochard@common-lisp.net>
149 * src/clfswm-placement.lisp: Add an optional border size in all
152 2012-05-30 Philippe Brochard <pbrochard@common-lisp.net>
154 * contrib/toolbar.lisp (clock): Add a clock module.
156 2012-05-28 Philippe Brochard <pbrochard@common-lisp.net>
158 * contrib/toolbar.lisp: begining of toolbar support.
160 2012-05-24 Philippe Brochard <pbrochard@common-lisp.net>
162 * src/clfswm-internal.lisp (rotate-root-geometry): Do not use
163 rotatef but a simpler algorithm.
165 2012-05-19 Philippe Brochard <pbrochard@common-lisp.net>
167 * src/clfswm-placement.lisp: Adjust width and height in child and
168 root placement to prevent too big child size.
170 2012-05-18 Philippe Brochard <pbrochard@common-lisp.net>
172 * src/clfswm-placement.lisp: New root placement possibility.
174 * src/clfswm-util.lisp (change-current-root-geometry): New
177 2012-05-17 Philippe Brochard <pbrochard@common-lisp.net>
179 * src/clfswm-util.lisp (exchange-root-geometry-with-mouse): New
182 2012-05-16 Philippe Brochard <pbrochard@common-lisp.net>
184 * src/menu-def.lisp: New root menu.
186 2012-05-15 Philippe Brochard <pbrochard@common-lisp.net>
188 * src/clfswm-circulate-mode.lisp (rotate-root-geometry-next)
189 (rotate-root-geometry-previous): New second mode binding to change
192 2012-05-13 Philippe Brochard <pbrochard@common-lisp.net>
194 * src/clfswm-internal.lisp: Remove the *current-child* variable
195 and use a setfable function (current-child) instead.
196 (current-child-setter): Store root current child before apllying
197 current child change.
199 2012-05-09 Philippe Brochard <pbrochard@common-lisp.net>
201 * src/clfswm-internal.lisp: Use xdpyinfo/xinerama informations
202 instead of xrandr informations.
204 2012-05-06 Philippe Brochard <pbrochard@common-lisp.net>
206 * src/clfswm-internal.lisp : Use only one list for root
208 (*root*): Root management API simplification.
210 2012-04-30 Philippe Brochard <pbrochard@common-lisp.net>
212 * src/clfswm-internal.lisp: Big change to replace *current-root*
213 variable to support multiple root.
215 2012-04-18 Philippe Brochard <pbrochard@common-lisp.net>
217 * src/tools.lisp (add-new-hook, add-hook): New macro. Do not
218 duplicate hooks by default. Use add-new-hook if you want to
221 2012-04-16 Philippe Brochard <pbrochard@common-lisp.net>
223 * src/clfswm-corner.lisp (wait-window-in-query-tree): Add a limit
224 of try to wait the command window.
226 2012-02-25 Philippe Brochard <pbrochard@common-lisp.net>
228 * src/clfswm-util.lisp (place-frames-from-xrandr)
229 (swap-frame-geometry, rotate-frame-geometry): New helper functions
230 for multiple physical screen.
231 (jump-to-slot, add-frame-in-parent-frame): Change *current-root*
234 2012-01-18 Philippe Brochard <pbrochard@common-lisp.net>
236 * src/*.lisp: Use create-symbol and create-symbol-in-package
237 instead of the shorter symb. (Thanks Aad Versteden).
239 * src/bindings-second-mode.lisp (set-default-second-keys): New
240 key binding to set window and frame transparency.
242 * src/bindings.lisp (set-default-main-mouse): New mouse binding to
243 set window and frame transparency.
245 * src/clfswm-keys.lisp (define-keys): New macro to ease multiple
246 keys definitions. (Thanks Valentin Plechinger for the request).
248 * src/*.lisp: Add full transparency support with xcompmgr.
250 2012-01-14 Philippe Brochard <pbrochard@common-lisp.net>
252 * src/*.lisp: Add transparency support.
254 2012-01-09 Ales Guzik <ales.guzik@gmail.com>
256 * src/clfswm-layout.lisp (tile-layout-mix): New layout to
257 automatically choose between vertival and horizontal tile layout.
258 (tile-space-layout): Fix to have space between screen border and
259 frame the same as between frames.
261 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
263 * load.lisp: Support clisp 2.49+ module system to load CLX.
265 2012-01-04 Ales Guzik <ales.guzik@gmail.com>
267 * src/clfswm-layout.lisp (update-layout-managed-children-keep-position):
268 Fix an inattention error.
270 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
272 * src/xlib-util.lisp (with-xlib-protect): Protect from
273 xlib:lookup-error. This prevent an error in clisp/new-clx when
274 sometimes an xlib:colormap is expected instead of an xlib:window.
276 2012-01-03 Philippe Brochard <pbrochard@common-lisp.net>
278 * src/xlib-util.lisp (handle-event): Fix a clisp/new-clx error
279 when sometimes window slot of event-slots is a pixmap instead of a
282 2011-12-26 Philippe Brochard <pbrochard@common-lisp.net>
284 * src/clfswm-query.lisp: Fill the history list with a non-nil
287 2011-12-25 Philippe Brochard <pbrochard@common-lisp.net>
289 * src/package.lisp (make-x-drawable): Drawable wrapper to prevent
290 type error in some CLX versions.
291 Replace xlib:drawable-* functions with x-drawable-* equivalents
293 2011-12-14 Philippe Brochard <pbrochard@common-lisp.net>
295 * src/clfswm-util.lisp (um-create-xdg-section-list): Add at least
296 the 'Utility menu entry.
298 * src/config.lisp (*xdg-section-list*): moved to config.lisp.
300 * src/clfswm-util.lisp (update-menus): Set a default value for
301 searching .desktop files when XDG_DATA_DIRS is not set.
303 2011-10-15 Philippe Brochard <pbrochard@common-lisp.net>
305 * src/clfswm-internal.lisp (place-window-from-hints): Use
306 with-placement macro to place unmanaged windows in an arbitrary
309 2011-06-16 Philippe Brochard <pbrochard@common-lisp.net>
311 * src/clfswm-internal.lisp (clean-windows-in-all-frames): Prevent
312 current root and current child being equal to child.
314 2011-06-13 Philippe Brochard <pbrochard@common-lisp.net>
316 * src/keysyms.lisp: Repeat Page_Down/Up keysym definitions at the
317 end of the file to change keysyms priority.
319 2011-06-13 Sylvain HENRY <hsyl20@gmail.com>
321 * *.*: Minor spelling fix.
323 2011-06-12 Philippe Brochard <pbrochard@common-lisp.net>
325 * src/clfswm.lisp (:unmap-notify, :destroy-notify): Show all
326 children just after the xlib tree cleanup -> reduce the
327 flickering when a window is deleted or destroyed.
329 * src/clfswm-internal.lisp (process-existing-windows): Do not
330 process the notify window.
332 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
334 * *: **** Release 1106 ****
336 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
338 * src/clfswm-internal.lisp (clean-windows-in-all-frames): New
339 function to prevent xlib error when a window is deleted.
341 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
343 * src/clfswm-internal.lisp
344 (delete-child-and-children-in-all-frames): Delete or destroy
345 children before displaying all children.
347 2011-06-05 Philippe Brochard <pbrochard@common-lisp.net>
349 * src/clfswm-util.lisp (add-frame-in-parent-frame): New function
352 2011-06-04 Philippe Brochard <pbrochard@common-lisp.net>
354 * src/clfswm.lisp (main-unprotected): Destroy all frames windows
355 before closing the display (not really needed).
357 2011-06-02 Philippe Brochard <pbrochard@common-lisp.net>
359 * src/clfswm-layout.lisp (inc-tile-layout-size)
360 (dec-tile-layout-size, inc-slow-tile-layout-size)
361 (dec-slow-tile-layout-size): New functions and bindings.
363 2011-06-01 Philippe Brochard <pbrochard@common-lisp.net>
365 * src/clfswm-expose-mode.lisp (define-expose-letter-keys): Add
366 0..1 and A..Z keys to select a child in exposé mode.
368 * src/clfswm-internal.lisp (display-frame-info): Remove hidden
369 infos in frames windows.
371 * src/clfswm-util.lisp (ask-close/kill-current-window): Menu
374 2011-05-30 Philippe Brochard <pbrochard@common-lisp.net>
376 * src/clfswm-internal.lisp (get-parent-layout): Minor fullscreen
379 2011-05-29 Philippe Brochard <pbrochard@common-lisp.net>
381 * src/clfswm-internal.lisp
382 (delete-child-and-children-in-all-frames): Show all children
383 before deleting/destroying a windows, so prevent a flickering.
384 (get-parent-layout): Return the fullscreen size when the current
387 2011-05-28 Philippe Brochard <pbrochard@common-lisp.net>
389 * src/clfswm-internal.lisp (get-parent-layout): Handle correctly
392 * src/clfswm-util.lisp (delete-focus-window-generic): Do not hide
393 child before removing, so prevent a flickering.
395 * src/clfswm-internal.lisp (show-all-children): Rectangular
396 optimization to display only needed children.
397 (show-all-children): Remove flickering on
398 select-next/previous-brother.
400 2011-05-17 Philippe Brochard <pbrochard@common-lisp.net>
402 * src/clfswm-util.lisp (copy-focus-window, cut-focus-window): New
403 functions and ask-close/kill-current-window menu and bindings
406 2011-05-16 Philippe Brochard <pbrochard@common-lisp.net>
408 * src/clfswm-util.lisp (ask-close/kill-current-window): Add an
409 *ask-close/kill-placement* placement window variable.
411 2011-05-09 Philippe Brochard <pbrochard@common-lisp.net>
413 * contrib/osd.lisp (funcall-button-from-code): Display osd
414 documention for buttons and fix some redefining warnings.
416 2011-05-07 Philippe Brochard <pbrochard@common-lisp.net>
418 * src/clfswm-nw-hooks.lisp (make-permanent-nw-hook-frame): New
419 function. Prevent to add or delete a new window hook for this
422 * src/clfswm-layout.lisp (update-layout-managed-children-position):
425 2011-05-06 Philippe Brochard <pbrochard@common-lisp.net>
427 * src/bindings-second-mode.lisp (set-default-second-keys):
428 select-brother-spatial-move-* binding update.
430 * src/clfswm-layout.lisp (tile-left|right|top|bottom-layout): Ask
431 to keep children positions or not.
433 * src/clfswm-internal.lisp (fixe-real-size): Takes care of border
436 * src/clfswm-layout.lisp (update-layout-managed-children): Fix a
437 bug by using the parent frame instead of the current child.
439 * src/clfswm-circulate-mode.lisp
440 (select-brother-generic-spatial-move+right/left/up/down): New
441 function to select a brother from another in a spatial move.
443 2011-04-19 Philippe Brochard <pbrochard@common-lisp.net>
445 * src/clfswm-pack.lisp (move-frame-constrained)
446 (resize-frame-constrained): Use pixels instead of floating
449 2011-04-18 Philippe Brochard <pbrochard@common-lisp.net>
451 * src/clfswm-pack.lisp (resize-frame-constrained): Takes care of
453 (implode-frame, implode-current-frame): New functions. Absorb all
454 frames subchildren in frame. Explode frame opposite.
456 2011-04-17 Philippe Brochard <pbrochard@common-lisp.net>
458 * src/clfswm-pack.lisp (move-frame-constrained)
459 (resize-frame-constrained): New function. Move and resize frame
460 with the mouse constrained by other frame brothers.
462 2011-04-14 Philippe Brochard <pbrochard@common-lisp.net>
464 * src/clfswm-util.lisp (with-movement-select-next-brother)
465 (with-movement-select-previous-brother)
466 (with-movement-select-next-child): Use a simple method (do not
467 enter in the circulate mode) to allow to circulate in all children
470 * src/clfswm-menu.lisp (open-menu): Save info hash table keys
471 instead of deleting newly created keys.
473 2011-03-21 Philippe Brochard <pbrochard@common-lisp.net>
475 * src/clfswm-internal.lisp (x-px->fl, y-px->fl): Takes care of
478 2011-03-20 Philippe Brochard <pbrochard@common-lisp.net>
480 * src/clfswm-info.lisp (show-config-variable): call
481 produce-conf-var-doc.
483 2011-03-18 Philippe Brochard <pbrochard@common-lisp.net>
485 * src/clfswm-autodoc.lisp (produce-conf-var-doc-html): Produce a
486 documentation for all configurable variables in CLFSWM -
489 * src/clfswm-internal.lisp (leave-frame): Hide all children except
492 2011-03-16 Philippe Brochard <pbrochard@common-lisp.net>
494 * src/clfswm-autodoc.lisp (produce-all-docs): Produce a
495 documentation for all configurable variables in CLFSWM.
497 * src/clfswm-layout.lisp (set-gimp-layout): Display a notify
498 window with the help on the GIMP layout.
500 2011-03-12 Philippe Brochard <pbrochard@common-lisp.net>
502 * src/menu-def.lisp: Menu update to prevent cursor keys clash.
504 * clfswm.asd: Change compilation order to prevent undefined
507 * src/clfswm-internal.lisp (show-child(frame)): Handle properly
508 the show-root-frame-p parameter.
510 2011-03-11 Philippe Brochard <pbrochard@common-lisp.net>
512 * src/clfswm-util.lisp (move-frame, resize-frame): Do not move or
513 resize a frame when it's the current root.
515 2011-03-10 Philippe Brochard <pbrochard@common-lisp.net>
517 * src/clfswm-internal.lisp (show-all-children): Handle properly
518 duplicated child in multipe frames.
520 2011-03-09 Philippe Brochard <pbrochard@common-lisp.net>
522 * contrib/volume-mode.lisp (set-default-volume-keys): Add more
523 keybindings (up/down, right/left) to raise/lower the volume.
525 * src/clfswm-layout.lisp: Add a variable border size for frames
528 2011-03-08 Philippe Brochard <pbrochard@common-lisp.net>
530 * src/clfswm-util.lisp (cut-current-child, remove-current-child)
531 (delete-current-child): Hide the current child before doing the
534 * src/clfswm-internal.lisp (show-all-children): Hide windows not
535 in the current root before displaying those in current root.
536 Remove all hide-all unnecessary calls.
538 * src/clfswm-configuration.lisp (save-variables-in-conf-file):
539 Save only variables with a different value than their original
542 2011-03-07 Philippe Brochard <pbrochard@common-lisp.net>
544 * src/clfswm-info.lisp (show-config-variable): Use the new
547 * src/clfswm-autodoc.lisp (produce-configuration-variables): Use
548 the new defconfig method.
550 * src/clfswm-configuration.lisp (create-configuration-menu):
551 Change the config system with a more lispy one and a less string
552 based one: (defconfig name value group doc).
555 2011-03-06 Philippe Brochard <pbrochard@common-lisp.net>
557 * src/clfswm-internal.lisp (show-all-children): Simplify the
559 (show-child): Display an unmanaged window whe it's the current
561 (show-all-children): add the ability to display all child from
562 *root-frame* and hide all those who are not in *current-root*.
563 -> remove hide-all-children when needed.
565 * src/xlib-util.lisp (move-window,resize-window): Add a
566 *color-move-window* border when moving or resizing a window.
568 2011-03-04 Philippe Brochard <pbrochard@common-lisp.net>
570 * src/clfswm-internal.lisp (show-all-children): Perform only one
571 recusion on the clfswm tree: calculate geometry and place child in
574 2011-03-03 Philippe Brochard <pbrochard@common-lisp.net>
576 * src/clfswm-internal.lisp (show-all-children): Rethink of display
577 child order to prevent very annoying flickering.
579 2011-02-27 Philippe Brochard <pbrochard@common-lisp.net>
581 * src/clfswm-util.lisp (query-yes-or-no): New function.
583 * src/clfswm-configuration.lisp (reset-all-config-variables): New
584 function and menu entry.
585 (query-conf-value): Add the ability to leave the field blank to
586 reset the variable to its default value.
588 2011-02-26 Philippe Brochard <pbrochard@common-lisp.net>
590 * src/clfswm-configuration.lisp
591 (add-all-configuration-default-value): Add a default value to
592 configurable variables.
594 2011-02-23 Philippe Brochard <pbrochard@common-lisp.net>
596 * src/clfswm.lisp (main-unprotected): Create the configuration
597 menu only once at startup.
599 2011-02-22 Desmond O. Chang <dochang@gmail.com>
601 * contrib/amixer.lisp: Add a volume mode inspired by the emms
602 volume package. Alsa mixer interface.
604 * contrib/volume-mode.lisp: Add a volume mode inspired by the emms
607 2011-02-22 Desmond O. Chang <dochang@gmail.com>
609 * src/clfswm.lisp (main): Use ASDF:SYSTEM-SOURCE-DIRECTORY instead
610 of *LOAD-TRUENAME*. *LOAD-TRUENAME* is only bound during a call to
611 LOAD. If one eval CLFSWM:MAIN in repl, BASE-DIR will be an empty
612 string. Use ASDF:SYSTEM-SOURCE-DIRECTORY to fix it.
614 2011-02-16 Philippe Brochard <pbrochard@common-lisp.net>
616 * src/clfswm.lisp (main-unprotected): Add a close hook. And close
617 the notify window, the virtual keyboard and the clfswm terminal by
620 2011-02-15 Philippe Brochard <pbrochard@common-lisp.net>
622 * src/clfswm.lisp (main-unprotected): Destroy the notify window
623 before closing the display. This fix a bug when resetting/reloading
626 2011-02-12 Philippe Brochard <pbrochard@common-lisp.net>
628 * src/xlib-util.lisp (equal-wm-class-fun, equal-wm-name-fun)
629 (raise-window-fun, raise-and-focus-window-fun): New functions.
631 * src/config.lisp (*clfswm-terminal-cmd*): Switch from xterm to
633 (*never-managed-window-list*): Structure change to be more
634 flexible. Let the choice to focus, raise and do nothing on never
637 2011-02-09 Philippe Brochard <pbrochard@common-lisp.net>
639 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Take
640 care of never managed windows to move or resize them if the raise
643 * src/clfswm-internal.lisp (in-frame, in-window, in-child): New
646 2011-02-08 Philippe Brochard <pbrochard@common-lisp.net>
648 * src/clfswm.lisp (main-mode): Raise or not unmanaged windows
649 following request in *never-managed-window-list*.
651 2011-02-05 Philippe Brochard <pbrochard@common-lisp.net>
653 * *: **** Release 1102 ****
655 2011-02-05 Desmond O. Chang <dochang@gmail.com>
657 * src/keysyms.lisp: Add extended keysyms from stumpwm.
659 2011-02-01 Desmond O. Chang <dochang@gmail.com>
661 * src/clfswm-util.lisp (run-or-raise): New function (thanks to
664 * src/clfswm-internal.lisp (with-all-*): add a nil block.
666 2011-01-28 Desmond O. Chang <dochang@gmail.com>
668 * src/clfswm-util.lisp (xdg-config-home): XDG_CONFIG_HOME should
669 be $HOME/.config by default.
671 2010-12-29 Philippe Brochard <pbrochard@common-lisp.net>
673 * contrib/osd.lisp (display-doc): Add another method where a
674 CLFSWM native window is used to display the key documentation.
676 2010-12-27 Philippe Brochard <pbrochard@common-lisp.net>
678 * src/xlib-util.lisp (with-xlib-protect): Force to revert to the
681 2010-12-25 Philippe Brochard <pbrochard@common-lisp.net>
683 * src/clfswm-second-mode.lisp (second-key-mode): Call the second
684 mode leave function only when the generic mode was ended.
686 2010-12-08 Philippe Brochard <pbrochard@common-lisp.net>
688 * src/clfswm-second-mode.lisp (sm-leave-function): Do not use
689 *second-mode-program* anymore.
691 2010-12-07 Philippe Brochard <pbrochard@common-lisp.net>
693 * src/clfswm-second-mode.lisp (*second-mode-leave-function*): New
694 variable bound to a function executed (when not null) on second
697 2010-11-14 Philippe Brochard <pbrochard@common-lisp.net>
699 * src/clfswm-util.lisp (find-child-under-mouse): Do not find
702 2010-11-13 Philippe Brochard <pbrochard@common-lisp.net>
704 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
705 Do not display the accel window for unmanaged windows.
707 2010-11-11 Philippe Brochard <pbrochard@common-lisp.net>
709 * src/clfswm-internal.lisp (set-current-root): Handle
710 window-parent in set-current-root.
712 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
713 focus the parent child when the current root is a window.
715 2010-11-09 Philippe Brochard <pbrochard@common-lisp.net>
717 * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
718 New function an bindings.
720 * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
723 2010-11-07 Philippe Brochard <pbrochard@common-lisp.net>
725 * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
726 function to let the user choose to keep child position with
729 * src/clfswm-internal.lisp (remove-frame-data-slot): New
732 2010-11-05 Philippe Brochard <pbrochard@common-lisp.net>
734 * src/clfswm-internal.lisp (frame-select-next-child)
735 (frame-select-previous-child): New functions and bindings. Select
736 the next/previous child in the current frame.
738 2010-10-31 Philippe Brochard <pbrochard@common-lisp.net>
740 * src/clfswm-query.lisp (query-mode-complet): New function: Handle
741 completion in query-mode.
743 2010-10-30 Philippe Brochard <pbrochard@common-lisp.net>
745 * src/clfswm-query.lisp (query-print-string): Handle long lines
748 2010-10-27 Philippe Brochard <pbrochard@common-lisp.net>
750 * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
751 all characters are printable.
753 2010-10-25 Philippe Brochard <pbrochard@common-lisp.net>
755 * contrib/server/server.lisp: Load clfswm client code in the main
756 program and let the user start it with a --client command line
759 * src/package.lisp (*main-entrance-hook*): New hook executed after
760 loading configuration file and before opening the display.
762 2010-10-23 Philippe Brochard <pbrochard@common-lisp.net>
764 * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
766 * src/clfswm-internal.lisp (show-child): Show window only if not
769 * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
770 change modifiers after binding definition.
772 2010-10-21 Philippe Brochard <pbrochard@common-lisp.net>
774 * contrib/osd.lisp: New file: OSD (On Screen Display) for
777 * src/clfswm-menu.lisp (open-menu): Modularise function.
779 2010-10-13 Philippe Brochard <pbrochard@common-lisp.net>
781 * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
782 key binding in main and second mode.
784 2010-10-10 Philippe Brochard <pbrochard@common-lisp.net>
786 * src/clfswm-util.lisp (open-notify-window): Convert hello-window
787 functions to a more generic Notify-window system.
789 * src/tools.lisp (add-timer): Add an id to identify the timer.
791 2010-10-09 Philippe Brochard <pbrochard@common-lisp.net>
793 * src/tools.lisp (erase-timer): New function.
795 * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
796 the hello window. Add Configuration variables.
798 2010-10-08 Philippe Brochard <pbrochard@common-lisp.net>
800 * src/clfswm-util.lisp (): Add an Hello window at startup.
802 * src/tools.lisp (process-timers): Add a timer system.
804 2010-10-07 Philippe Brochard <pbrochard@common-lisp.net>
806 * src/clfswm-query.lisp (add-in-query-string): Handle correctly
809 2010-10-06 Philippe Brochard <pbrochard@common-lisp.net>
811 * src/clfswm-query.lisp (query-print-string): Change cursor color
812 and show parenthesis matching with colors (on match and on
815 2010-10-05 Philippe Brochard <pbrochard@common-lisp.net>
817 * src/clfswm-internal.lisp (show-all-children): Do not raise a
818 child when its parent is hidden.
820 2010-10-02 Philippe Brochard <pbrochard@common-lisp.net>
822 * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
823 possibility to circulate over subchild of the current child.
825 * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
826 (expose-windows-generic): Add an escape-body function to return to
827 the original state on escape key.
829 * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
830 to bind the current child from the configuration file.
832 2010-10-01 Philippe Brochard <pbrochard@common-lisp.net>
834 * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
835 window hook: the frame absorb all new windows that match
836 nw-absorb-test frame data slot.
838 2010-09-30 Philippe Brochard <pbrochard@common-lisp.net>
840 * src/clfswm-expose-mode.lisp (expose-create-window): Show window
841 title in accel window.
843 2010-09-29 Philippe Brochard <pbrochard@common-lisp.net>
845 * configure: Use the Xavier Maillard clfswm script in contrib to
846 build an executable in the standard way.
848 2010-09-26 Philippe Brochard <pbrochard@common-lisp.net>
850 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
851 New functions. Add a window on each child in the expose mode to
854 * src/clfswm-internal.lisp (child-x, child-y, child-width)
855 (child-height): New methods to get real child coordinates.
857 2010-09-25 Philippe Brochard <pbrochard@common-lisp.net>
859 * src/clfswm-layout.lisp (*-layout): Use child-position.
861 * src/clfswm-internal.lisp (child-position): New function.
863 * src/clfswm-expose-mode.lisp (expose-windows-mode)
864 (expose-all-windows-mode): Use a generic mode.
866 * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
867 with handle-event-fun symbols instead of inspecting clfswm
868 internals symbols on each mode change.
870 * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
871 a separate clfswm-expose-mode.lisp file.
873 * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
874 screen size instead of hardcoded test coordinates.
876 2010-09-24 Philippe Brochard <pbrochard@common-lisp.net>
878 * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
879 (speed-mouse-right, speed-mouse-up, speed-mouse-down)
880 (speed-mouse-undo, speed-mouse-first-history): New functions to
881 quickly move the mouse. Implemented for the second mode.
883 2010-09-16 Philippe Brochard <pbrochard@common-lisp.net>
885 * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
886 write permission on $clfswm_asd_path. So anybody can start clfswm
887 even if there is no write permission on the source directory.
889 2010-09-12 Philippe Brochard <pbrochard@common-lisp.net>
891 * contrib/clfswm: Add support to cmucl, ccl and ecl.
893 2010-09-11 Philippe Brochard <pbrochard@common-lisp.net>
895 * src/clfswm-util.lisp (set-hide-unmanaged-window)
896 (set-show-unmanaged-window, set-default-hide-unmanaged-window):
897 New functions and menu entry.
898 (set-globally-hide-unmanaged-window)
899 (set-globally-show-unmanaged-window): New functions and menu
902 * src/clfswm-internal.lisp (hide-unmanager-window-p): New
904 (show-child): Add a data slot on frame to hide or not unmanaged
907 * src/clfswm-corner.lisp (present-clfswm-terminal)
908 (present-virtual-keyboard): Use a function (generic-present-body)
909 instead of a macro (generate-present-body).
911 * src/clfswm-util.lisp (update-menus): List all directories and
912 subdirectories in $XDG_DATA_DIRS/applications.
914 2010-09-10 Philippe Brochard <pbrochard@common-lisp.net>
916 * src/clfswm-corner.lisp (generate-present-body): New macro.
917 (present-clfswm-terminal, present-virtual-keyboard): Use
918 generate-present-body.
920 2010-09-09 Philippe Brochard <pbrochard@common-lisp.net>
922 * src/clfswm-util.lisp (update-menus): Follow XDG specifications
923 instead of the non-portable Debian update-menu.
925 2010-09-07 Philippe Brochard <pbrochard@common-lisp.net>
927 * src/clfswm.lisp (error-handler): New function do handle
928 asynchronous errors and ignore them.
929 (open-display): Install the new error-handler on display.
931 2010-09-05 Philippe Brochard <pbrochard@common-lisp.net>
933 * src/xlib-util.lisp (with-xlib-protect): Add a
934 with-simple-restart on top of body execution.
936 2010-09-04 Philippe Brochard <pbrochard@common-lisp.net>
938 * src/clfswm.lisp (main-loop): Protect all xlib functions with an
941 * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
942 handle-event. Add a with-simple-restart to prevent a
943 clisp/new-lisp infinite loop.
945 2010-08-30 Philippe Brochard <pbrochard@common-lisp.net>
947 * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
948 clfswm terminal working even on xterm title changes.
950 2010-08-29 Philippe Brochard <pbrochard@common-lisp.net>
952 * src/clfswm-util.lisp (run-other-window-manager): Update for
955 * src/tools.lisp (do-execute): New parameter io to change the
958 * src/clfswm-util.lisp (hide-current-child): Prevent from removing
961 * src/clfswm-internal.lisp (child-member): New predicate.
962 (child-remove): New function.
964 * src/*.lisp: Use child-member and child-remove everywhere it's
967 2010-08-28 Philippe Brochard <pbrochard@common-lisp.net>
969 * src/clfswm.lisp (main-loop): Ensure that all events have been
970 processed after a process-event.
972 * src/clfswm-internal.lisp (is-in-current-child-p): New function.
974 2010-08-27 Philippe Brochard <pbrochard@common-lisp.net>
976 * src/clfswm.lisp (main-mode:configure-request): Raise the window
977 only when present on the current child and focus it accordingly.
979 2010-08-26 Philippe Brochard <pbrochard@common-lisp.net>
981 * src/clfswm-circulate-mode.lisp (circulate-loop-function):
982 Use is-a-key-pressed-p.
984 * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
986 * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
987 returned by xlib:keysym->keycodes.
989 * src/*.lisp: Use the new child-equal-p to compare children. This
990 prevent a bug with sbcl/cmucl when the standard equal function
991 does not work with xlib:window.
993 * src/clfswm-internal.lisp (child-equal-p): New predicate.
995 2010-08-25 Philippe Brochard <pbrochard@common-lisp.net>
997 * src/clfswm-generic-mode.lisp (generic-mode): Use an
998 xlib:event-listen before processing event with
999 xlib:process-event. This prevent a bug with CLX threaded
1000 implementation like sbcl.
1002 * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
1003 processing event with xlib:process-event. This prevent a bug with
1004 CLX threaded implementation like sbcl.
1006 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1008 * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
1010 * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
1013 * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
1014 (find-parent-frame, find-frame-window, find-frame-by-name)
1015 (find-frame-by-number): Use with-find-in-all-frames to search in
1016 frames in the right order.
1018 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
1019 unwanted flickering with unmanaged windows.
1021 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
1023 * src/package.lisp: Remove event handler hooks as they're not
1024 needed anymore (To replace them: use closure and define-handler).
1026 * src/xlib-util.lisp (move-window, resize-window)
1027 (wait-mouse-button-release): Use a generic mode.
1029 * src/*.lisp: Replace the case to handle event with a more (tricky)
1030 lispy method which bind a function to each keywords associated
1033 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
1035 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
1036 menu entry between delete-current-child and remove-current-child.
1037 ie: Delete a child and its children in all frames by default.
1039 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
1041 * src/package.lisp: Add a placement configuration group.
1043 * src/binding*.lisp: Bind control+g to escape the current action
1046 * src/clfswm-internal.lisp
1047 (delete-child-and-children-in-all-frames): New function and
1048 binding: Second mode - Control+Delete delete the current child and
1049 its children in all frames (ie: close the current child and its
1052 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
1054 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
1055 the frame window and the frame gc. Close a very annoying bug when
1056 cuting/pasting a frame or moving a child over frames with the
1059 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1060 all children in *current-root* after moving/resizing a frame.
1062 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
1064 * src/clfswm-util.lisp (delete-focus-window)
1065 (destroy-focus-window): Remove child in parent frame before
1068 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1070 * src/clfswm-util.lisp (identify-key): Add a timeout in
1072 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
1073 of the window passed by xlib:process-event.
1075 * src/xlib-util.lisp (move-window, resize-window)
1076 (wait-mouse-button-release): Add a timeout in xlib:process-event.
1078 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1080 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
1081 to launch an other window manager and to return to clfswm.
1083 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
1085 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
1088 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
1090 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
1093 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
1094 parameter and a loop timeout.
1096 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
1098 * src/clfswm.lisp (main): Add an alternate configuration filename
1101 * load.lisp: Add a debuging code example.
1103 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
1105 * src/clfswm-configuration.lisp (create-configuration-menu): New
1106 menu to configure all clfswm variables while clfswm is running.
1108 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
1110 * src/clfswm-util.lisp (save-configuration-variables): New
1111 function to save all configuration variables in clfswmrc.
1113 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
1115 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
1117 (set-default-info-keys): Add cursor key support in info mode.
1119 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
1121 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
1124 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
1125 prevent reading the configuration file (this may be useful to
1126 produce the original documentation without user modifications
1127 with the rc configuration file).
1129 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
1131 * src/bindings-second-mode.lisp (set-default-second-keys):
1132 Simplification of Escape key to close/kill/remove the focus window
1133 and unhide all windows.
1135 * src/bindings.lisp (set-default-main-keys): Simplification of
1136 Escape key to close/kill/remove the focus window and unhide all
1139 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
1140 focus and unhide all windows capabilities.
1142 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1144 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
1146 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
1148 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
1149 Keep child order and don't make unnecessary child movement.
1150 (one-column-layout, one-line-layout): New layouts.
1152 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
1154 * *: **** Release 0906 ****
1156 * contrib/cd-player.lisp: New file to handle the CD player.
1158 * contrib/xmms.lisp: New file to handle the xmms player.
1160 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1162 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
1163 Maximize windows in their frame - Leave frames to their actual
1166 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
1167 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
1169 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
1171 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
1173 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
1175 * contrib/mpd.lisp: Use a standard menu.
1177 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
1179 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
1181 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
1183 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
1185 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
1188 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
1190 * src/config.lisp (get-fullscreen-size): One pixel adjustment
1193 * src/clfswm-placement.lisp (*-child-placement): One pixel
1196 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
1198 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
1199 Ensure that all characters are printable.
1201 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
1204 * src/clfswm-placement.lisp (*-child-placement): Adjust
1205 coordinates to one pixel in the current child.
1207 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1209 * src/clfswm-query.lisp (query-enter-function): Assign font before
1210 width and height calculation.
1212 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1214 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
1215 bannish the pointer in an arbitrary place.
1217 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
1218 place the info window in an arbitrary place.
1220 * src/clfswm-query.lisp (query-enter-function): Use with-placement
1221 macro to place the query window in an arbitrary place.
1223 * src/clfswm-placement.lisp: New file. Allow to place info windows
1224 or query windows on an arbitrary place. Allow to bannish the
1225 pointer on an arbitrary place.
1227 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
1229 * src/clfswm-circulate-mode.lisp (reorder-child)
1230 (reorder-brother): Unfocus windows before reordering children or
1233 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1235 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
1236 the parent is a frame.
1238 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
1239 motion with a default modifier.
1241 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
1244 * src/clfswm-info.lisp (info-mode): Handle motion with a default
1246 (info-mode): Optimization in loop function.
1248 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1250 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
1251 root-frame correctly.
1253 * clfswm.asd: Dependency fix for clfswm-generic-mode.
1255 * src/clfswm-circulate-mode.lisp (reorder-child)
1256 (reorder-brother): Handle empty frames.
1257 (reorder-brother): Redisplay only the parent frame of the current
1260 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
1261 parent frame of the current frame.
1263 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
1265 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
1266 Maximize/Unmaximize the current frame in its parent frame.
1268 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
1269 windows and frames in their parent frame.
1271 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1273 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
1275 * src/clfswm-circulate-mode.lisp (reorder-child)
1276 (reorder-brother): Reinitialise on circulate type change
1277 child to brother or brother to child.
1279 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
1280 calls xlib:display-finish-output on each map-request. So speed up
1283 * src/xlib-util.lisp (map-window): New function. Call
1284 xlib:display-finish-output on each map request.
1286 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1288 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
1289 Optimisation when drawing second mode window.
1291 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1293 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
1296 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1298 * src/clfswm-util.lisp (run-program-from-query-string): Launch
1299 command only with a return validation.
1301 2009-04-22 Xavier Maillard <xma@gnu.org>
1303 * src/clfswm-query.lisp (query-string): Use a generic mode.
1305 2009-04-19 Xavier Maillard <xma@gnu.org>
1307 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
1309 2009-04-18 Xavier Maillard <xma@gnu.org>
1311 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
1312 to define all other modes.
1314 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1316 * src/package.lisp (): Use *default-font-string* for all
1319 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
1321 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
1323 * src/xlib-util.lisp (null-size-window-p): Better check of null
1326 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
1328 * src/clfswm.lisp (handle-map-request): Add a fix to manage
1329 correctly fullscreen windows (SDL particularly).
1331 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
1333 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
1334 a segfault with clisp/new-clx.
1336 * src/clfswm.lisp (handle-motion-notify): Add a needed window
1339 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
1340 needed window argument.
1342 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
1344 * src/xlib-util.lisp (wait-no-key-or-button-press)
1345 (wait-a-key-or-button-press): Check buttons press/release correctly"
1347 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
1349 * src/menu-def.lisp: Add children navigation menu in the movement
1350 menu (select next/previous child/brother/level).
1352 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
1354 * *: Rename 'sister' frame to 'brother' frame.
1356 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
1357 alias in a real modifier.
1359 * src/package.lisp (*modifier-alias*): New list of modifier alias
1360 For example: :alt is :mod-1, :numlock is :mod-2...
1362 * src/tools.lisp (remove-hook): New function.
1364 * src/clfswm-keys.lisp (with-capslock, without-capslock)
1365 (with-numlock, without-cnumlock): New functions.
1367 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
1369 * src/clfswm-info.lisp: Use the *binding-hook* to create info
1370 keys and mouse bindings.
1372 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
1373 second keys and mouse bindings.
1375 * src/bindings.lisp: Use the *binding-hook* to create main keys
1378 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1380 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
1383 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
1385 * src/menu-def.lisp: Use a menu instead of a function for the
1388 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
1390 * src/clfswm-util.lisp (show-standard-menu): Display the standard
1391 menu from the 'update-menus' command.
1393 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
1395 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
1396 it's already grabbed.
1398 * src/clfswm-internal.lisp (display-frame-info): Use configurable
1399 colors and fix a bug with background.
1400 (display-frame-info): Set window background when displaying info.
1402 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1404 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
1405 warning with clisp/new-clx.
1407 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
1409 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
1412 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1414 * *: **** Release 0809 ****
1416 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1418 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
1420 (ensure-unique-number): New function and menu entry.
1422 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
1424 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
1425 hook: open the next window in a named frame.
1426 (numbered-frame-nw-hook): New new window hook: open the next
1427 window in a numbered frame.
1429 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
1430 cases. So query-string can be called even in the main mode.
1432 * src/clfswm-internal.lisp (show-all-children): Do not raise a
1433 child by default => far less flickering.
1435 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
1437 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
1439 * src/menu-def.lisp: Change key binding for the CLFSWM menu
1442 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
1443 is nil. (workaround on some CLX implementation).
1445 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
1447 * src/menu-def.lisp: Add a menu to set a focus policy for all
1450 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
1451 (all-frames-set-*-focus-policy): Set a focus policy for all
1454 * src/clfswm.lisp (handle-enter-notify): sloppy-select
1455 mode. Select a child and its parents on mouse over.
1457 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
1459 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
1460 policy -> Sloppy focus only for windows in the current frame.
1461 (main-unprotected): Exit clfswm on init error (ie: when another
1462 window manager is running).
1464 * src/clfswm-util.lisp (reset-clfswm): New function.
1466 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
1468 * src/clfswm-menu.lisp (init-menu): New function.
1470 * src/clfswm-util.lisp (reload-clfswm): New function to reload
1472 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
1474 * src/clfswm.lisp (main, main-unprotected): Handle error in a
1475 superior main function. Now CLFSWM can't break the X session. It
1476 just reinitialize the display and run a new main loop.
1478 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
1479 *vt-keyboard-on* global to avoid warnings when loading clfswm.
1481 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
1482 (help-on-gimp-layout): Describe how to use the GIMP layout.
1484 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
1486 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
1487 main-window-right-layout. Change the keybinding for (shift)alt+tab
1488 to not select windows in the main window lisst.
1489 Bind F8 to add a window in the main window list.
1490 Bind F9 to remove a window in the main window list.
1491 Change the focus policy to :sloppy.
1492 (set-previous-layout): Restore the previous layout, keybinding and
1495 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
1497 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
1499 * src/clfswm-layout.lisp (main-window-left-layout)
1500 (main-window-bottom-layout, main-window-top-layout): New
1502 Factorize layouts in menu.
1504 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
1506 * src/clfswm-layout.lisp (main-window-right-layout): A possible
1507 GIMP layout: one or more main windows on one side of the
1508 frame. Others on the other size.
1510 * src/clfswm-util.lisp
1511 (current-frame-set-click/sloppy-focus-policy): Each frame can have
1512 a different focus policy (one of :click or :sloppy).
1513 The default focus policy is set with *default-focus-policy*.
1515 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
1517 * src/clfswm-info.lisp (show-config-variable): New function.
1519 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
1521 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
1523 * src/clfswm-info.lisp: Colored help for key binding and corners
1526 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
1528 * src/clfswm-util.lisp (delete-focus-window)
1529 (destroy-focus-window): Remove chid only in
1530 handle-unmap/destroy-notify. Focus *current-root* only when
1531 closing/killing the current child.
1533 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
1534 functions or corners.
1536 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1538 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
1539 action: Hide/Unhide a terminal on mouse corner action. (By default
1540 right mouse button on the top left corner).
1542 * src/config.lisp (*never-managed-window-list*): New config
1545 * src/clfswm-internal.lisp (never-managed-window-p): New function:
1546 Handle never managed window in a more simple way.
1548 * src/clfswm-corner.lisp: New file and new and more simple method
1549 to define corners actions.
1551 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
1553 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
1555 * src/clfswm-layout.lisp (fast-layout-switch)
1556 (define-fast-layout-switch): New functions: Switch between two
1559 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
1560 really in the second mode. So leave-second-mode can be used even
1563 * src/clfswm-util.lisp (switch-to-last-child): New function:
1564 Store the current child and switch to the previous one.
1566 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1568 * src/clfswm-util.lisp (display-current-window-info): Display the
1570 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
1571 (top right by default). By default 'xvkbd' is used.
1573 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1575 * src/xlib-util.lisp (move-window, resize-window): Compress motion
1578 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
1580 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
1583 * src/clfswm-info.lisp (info-mode): Compress motion events.
1585 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
1587 * src/clfswm-internal.lisp (show-all-children): Compute geometry
1588 and selection first and then show only necessary children.
1589 (show-child): remove unneeded display-p parameter.
1591 * src/config.lisp (get-fullscreen-size): Place the frame border
1592 outside the screen (this prevent the loose of 2 pixels per
1595 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
1597 * src/clfswm-internal.lisp (focus-child): Algorithm change to
1598 raise only the selected child.
1600 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
1602 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
1603 Raise only viewable children.
1605 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
1607 * src/clfswm-internal.lisp (show-all-children): Always raise all
1608 displayed children. Remove all references to raise-p.
1610 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1612 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
1615 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
1616 second mode binding on raise/lower child in its frame.
1618 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
1619 behaviour to the new raise/lower property.
1620 Call clear-nw-hook before the rest of the hook.
1622 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
1623 (mouse-click-to-focus-and-resize-window): Stop button event. This
1624 prevent a keyboard/pointer freeze.
1626 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1628 * src/clfswm-internal.lisp (frame-lower-child)
1629 (frame-raise-child): New functions to raise/lower a child in its
1632 * src/clfswm-util.lisp (have-to-present-windows)
1633 (have-to-present-all-windows): New functions to have an MaxOS
1634 expose like on mouse click in screen corner.
1636 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
1638 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
1640 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
1641 child from a choice in all frames with hidden children.
1643 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
1645 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
1647 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
1648 (unhide-all-children): New functions.
1650 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
1653 * src/clfswm-util.lisp (hide/show-frame-window): new function and
1656 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
1658 * src/clfswm-util.lisp (rename-current-child): Do not display the
1659 frame info for a window.
1661 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
1663 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
1664 frame window for the removed child and its children.
1666 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
1668 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
1671 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
1673 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
1674 the ROX pinboard (ie: leave it lowered in the root window as
1677 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
1678 (tile-left-layout, tile-right-layout, tile-top-layout)
1679 (tile-bottom-layout): Use all the frame space when there is only
1682 * src/clfswm-internal.lisp (place-window-from-hints): Center
1683 unmanaged windows in the root screen.
1685 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
1688 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1690 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
1691 typo in managed types.
1693 * src/clfswm-internal.lisp (show-child): Always display frame info
1694 even if the frame is hidden.
1696 * src/xlib-util.lisp (resize-window): Use a better algorithme to
1699 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1701 * src/clfswm-util.lisp (with-movement): Display frame info for all
1702 frames in current root.
1704 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1706 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
1708 * src/bindings-second-mode.lisp (define-second-key #\a): New
1709 binding on 'add-default-frame'.
1711 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1712 message to follow the autodocumentation process.
1714 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1716 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1717 "Space" to jump to a child. "B" to bind a slot on the current
1720 * src/bindings-second-mode.lisp: Use "Tab" instead of
1723 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
1725 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1726 unmanaged (hidden) windows.
1728 * src/clfswm-internal.lisp (place-window-from-hints): Give a
1729 minimal size for windows.
1730 (with-all-windows-frames-and-parent): New function.
1732 * src/config.lisp (*default-window-width/height*): New parameters.
1734 * src/clfswm-internal.lisp (place-window-from-hints): Center
1735 windows in the screen instead of in their frame.
1737 * src/bindings-second-mode.lisp (tile-space-current-frame): New
1740 * src/clfswm-layout.lisp (register-layout): Intern the once name
1741 in the right package.
1743 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1745 * doc/dot-clfswmrc: Update to follow the new clfswm way.
1747 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
1749 * src/clfswm-internal.lisp (set-current-child)
1750 (adapt-child-to-parent, show-child, hide-child): Handle the case
1751 where child is not a frame or a window.
1753 * src/clfswm-util.lisp
1754 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1755 Check if child is a frame.
1757 * src/clfswm-internal.lisp (managed-window-p): Handle the case
1758 where frame is null.
1759 (place-frame): Check if frame and parent are frames.
1761 * src/clfswm-info.lisp (info-mode): display all frame info before
1764 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1765 info before leaving.
1767 * src/clfswm-internal.lisp (display-all-frame-info): New function.
1769 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
1771 * src/tools.lisp (getenv): Implemented for ECL.
1772 (urun-prog): Implemented for ECL.
1774 * src/clfswm-util.lisp (identify-key): Use a double buffer to
1777 * src/clfswm-query.lisp (query-string): Use a double buffer to
1780 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1783 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1786 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
1788 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1790 * src/menu-def.lisp: New file: move all menu definition in
1793 * src/clfswm-layout.lisp (register-layout): Use a function instead
1796 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
1798 * src/clfswm-autodoc.lisp (produce-menu-doc,
1799 (produce-menu-doc-html): New functions.
1800 (produce-doc-*): Moved to clfswm-autodoc.lisp.
1802 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1803 paste a child on one of its own children. (this prevent a
1805 (move-child-to): Rename move/copy-current-child-by to
1807 (mouse-move-window-over-frame): New function to move the window
1808 under the mouse cursor to another frame.
1810 * src/clfswm-internal.lisp (find-child-in-parent): New function.
1812 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1814 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1815 windows only when its window parent is the current child.
1817 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1819 * src/clfswm-util.lisp (manage-current-window)
1820 (unmanage-current-window): New functions: Allow to force to manage
1821 or unmanage a window by its parent frame.
1823 * src/bindings-second-mode.lisp (#\o): binded to
1824 set-open-in-new-frame-in-parent-frame-nw-hook and
1825 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1827 * src/clfswm-util.lisp (with-current-window): New macro.
1829 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1830 exposure and enter-window handle event.
1832 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1833 children for the current child after the move/resize.
1835 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1837 * src/xlib-util.lisp (resize-window): Take care of window size
1840 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1841 move/resize unmanaged windows.
1843 * src/xlib-util.lisp (move-window, resize-window): New functions.
1845 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1847 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1848 user choose what window type the current frame must handle.
1849 (display-current-window-info): New function.
1850 (current-frame-manage-all-window-type)
1851 (current-frame-manage-only-normal-window-type)
1852 (current-frame-manage-no-window-type): New functions.
1854 * src/clfswm-internal.lisp (managed-window-p): New function.
1856 * src/package.lisp (frame): Managed type: new frame
1857 parameter. This allow to choose what window type a frame must
1860 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1862 * src/clfswm-nw-hooks.lisp
1863 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1865 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1868 * src/tools.lisp (ensure-printable): Return always a string even
1871 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
1873 * src/config.lisp (*default-nw-hook*): New variable to change the
1874 default new window hook.
1876 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1878 * clfswm.asd (clfswm): Add a dependency from
1879 clfswm-second-mode.lisp to clfswm.lisp.
1881 * src/clfswm-util.lisp (identify-key): Show the documentation for
1882 the function bound on a key.
1883 (with-movement): Move with-movement,
1884 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
1885 to clfswm-util.lisp.
1887 * src/clfswm-menu.lisp: New menu system that let user change keys
1888 or functions associated to keys.
1890 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
1892 * src/clfswm-internal.lisp (show-all-children): Display-child is
1893 the first child by default. Solve a bug with father-p.
1895 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
1897 * src/clfswm-internal.lisp (add-frame): Add frame return the
1899 (show-all-children): Move the size computation outside the
1902 * src/bindings-second-mode.lisp (with-movement): Redisplay only
1905 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1906 only the current child.
1908 * src/clfswm-internal.lisp (show-all-children): New display-child
1909 parameter to display only the desired child and its children.
1910 (select-next/previous-child): Only display the current child.
1912 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
1914 * src/clfswm.lisp (init-display): Move the default frame creation
1915 on the default init hook.
1917 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1918 the main mode (for example: "1" on an azerty keyboard).
1920 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
1922 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1923 keysyms. Revert to old grabbing method for the main mode.
1925 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
1927 * src/clfswm.lisp (init-display): Add key handling on no focus
1928 window and on frame windows.
1930 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1932 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1933 all keys by default and replay just what is needed. No change for
1936 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1937 (find-key-from-code): Test for shift and not shift presence.
1939 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
1941 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1942 new key parameter to have less flickering.
1944 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
1946 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1947 layout only one time and revert to no-layout to freely handle
1950 * src/clfswm-nw-hooks.lisp
1951 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1952 with new created window.
1954 * src/clfswm-layout.lisp (register-layout): Now register
1955 automatically a once layout to set the layout only one time and
1956 revert to no-layout to freely handle frames.
1958 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1960 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1961 nw-hook: Open the next window in the current frame and leave the
1962 focus to the current child.
1964 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
1966 * src/bindings-second-mode.lisp: Add keys definitions to
1967 bind-or-jump in the second mode.
1969 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
1970 macro for bind-or-jump-(1|2|3...).
1972 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
1973 arguments to function. This allow to do things like:
1974 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
1975 are passed to my-function on key press.
1977 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
1979 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
1981 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
1983 * src/clfswm-internal.lisp (child-fullname): New function
1985 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
1986 docstring in info-mode-menu. An item can be
1987 '((key function) (key function)) or with docstring
1988 '((key function "documentation 1") (key function "bla bla") (key function))
1990 * src/tools.lisp (ensure-n-elems): New function.
1992 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
1993 resize a frame or the window's father.
1995 * src/clfswm.lisp (init-display): Remove tile-space-layout by
1996 default on the root frame.
1998 * src/clfswm-util.lisp (move/resize-frame): Add standard event
1999 hooks handlers (map-request, configure-notify...)
2001 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
2004 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
2006 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
2007 or the window's father.
2009 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
2010 event only if there is a geometry change.
2011 (mouse-focus-move/resize-generic): Generic function to move or
2012 resize a frame or a window father frame.
2014 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
2016 * src/clfswm-internal.lisp (show-all-children): Return t if there
2017 is a geometry change.
2019 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
2021 * src/bindings.lisp (Up/Down): Swap select previous/next level.
2023 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
2025 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
2027 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
2028 (with-all-*): Reverse the child list to manage the first child last (like in
2031 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
2032 root window only if true.
2034 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
2035 root window only if *create-frame-on-root* is true.
2037 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
2040 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
2042 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
2043 the current child (even if it's a window).
2045 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
2047 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
2048 (mouse-click-to-focus-and-resize): New functions.
2050 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
2051 (*-px->fl): Convert pixel coordinates to float.
2053 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
2055 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
2057 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
2060 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
2061 and hide-all-children.
2062 (raise-if-needed): New function.
2063 (show-child): Use a first-p parameter to raise windows only when they are
2066 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
2068 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
2071 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
2073 * src/clfswm-info.lisp (keys-from-list): new function.
2075 * src/*: rename 'childs' in 'children'.
2077 * src/*: rename 'group' in 'frame'.
2079 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
2081 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
2083 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
2085 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
2087 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
2089 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
2090 Bind control+o to open the next window in a new group in the root group
2091 (as open in next window in a new workspace in 0801 version).
2093 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
2095 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
2098 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
2100 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
2101 instead of Tab for select-previous-child.
2103 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
2105 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
2108 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
2110 * clfswm-util.lisp (identify-key): Display the documentation
2111 associated to keys when identifying a key.
2113 2008-03-10 Xavier Maillard <xma@gnu.org>
2115 * contrib/clfswm: Complete rewrite of the script. Detect error and
2116 act accordingly. Add command line arguments to configure the
2117 script execution. User can now choose different common lisp
2118 implementation (clisp and sbcl only), choose where to store the
2119 dumped image, where to find clfswm source.
2121 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
2123 * clfswm-internal.lisp (process-new-window): Beginning of new
2124 window hook: each group have a hook to tell what he wants to do
2125 with the new created window.
2127 2008-03-08 Xavier Maillard <xma@gnu.org>
2129 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
2130 call the resulting executable.
2132 * clfswm.lisp (read-conf-file): Check for the user config file in
2133 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
2134 prefered whenever possible.
2136 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
2138 * clfswm-layout.lisp (*-layout): Add an optional raise-p
2139 parameter in each layout.
2141 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2143 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
2145 (copy/move-current-child-by-name/number): new functions
2146 (focus-group-by-name/number): new functions
2147 (delete-group-by-name/number): new functions
2149 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2151 * ************************************************************ *
2152 *: Major update - No more reference to workspaces. The main *
2153 structure is a tree of groups or application windows. *
2154 * ************************************************************ *
2156 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
2158 * clfswm.lisp (read-conf-file): Read configuration in
2159 $HOME/.clfswmrc or in /etc/clfswmrc or in
2160 $XDG_CONFIG_HOME/clfswm/clfswmrc.
2161 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
2164 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
2166 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
2169 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
2171 * clfswm-internal.lisp (find-window-group): New function.
2173 * clfswm*: Change to make clfswm run with clisp/new-clx.
2175 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
2177 * clfswm-util.lisp (query-show-paren): Add show parent matching in
2179 (query-string): Bind control+k to delete end of line.
2181 * clfswm-second-mode.lisp (draw-second-mode-window): Display
2182 the action on mouse motion in second mode.
2184 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
2185 event but do not clear the root window.
2186 (handle-configure-request): Adjust unmanaged window from their
2189 * clfswm-internal.lisp (process-new-window): Adjust new window
2190 with the specified hints (max/min/base width/height).
2192 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
2194 * clfswm.lisp (handle-configure-request): Send an Configuration
2195 Notify event. This solve a bug with xterm and rxvt who takes some
2196 times to be mapped. Now there is no delay.
2198 * bindings-second-mode.lisp (define-shell): Run programs after
2199 living the second mode.
2201 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
2203 * clfswm-internal.lisp (process-new-window): Do not crop transient
2204 window to group size.
2205 (adapt-window-to-group): Do not crop transient window to group
2208 * clfswm.lisp (handle-configure-request): Adapt just the window to
2209 its group and don't take care of the configure request. Remove the
2210 bug with the Gimp outside the group and speed up the window
2212 (handle-exposure): Remove show-all-group on exposure event
2215 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
2217 * clfswm-util.lisp (circulate-group-up-copy-window)
2218 (circulate-group-down-copy-window)
2219 (circulate-workspace-up-copy-group)
2220 (circulate-workspace-down-copy-group): Prevent the copy of the
2221 same window in the same workspace.
2223 * bindings-second-mode.lisp (release-copy-selected-window)
2224 (release-copy-selected-group): Prevent the copy of the same window
2225 in the same workspace.
2227 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
2228 (generic-pager-move-window-on-next-line): Remove the copy
2230 (generic-pager-move-group-on-next-workspace)
2231 (generic-pager-move-group-on-previous-workspace): Prevent the copy
2232 of the same window in the same workspace.
2234 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
2235 (mouse-pager-copy-selected-group-release): Prevent the copy of the
2236 same window in the same workspace.
2238 * tools.lisp (setf/=): new macro to set a variable only when
2241 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
2242 x, y... only when necessary.
2244 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
2246 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
2247 new function and hook: force windows to stay in its group (solve a
2250 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
2252 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
2253 less flickering when moving/resizing groups.
2255 * clfswm-internal.lisp (hide-group): new function.
2256 (show-all-group): clear-all: new parameter.
2258 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
2260 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
2262 * clfswm*: Color change for the pager. Typo or better description
2263 in bindings definitions. Define bindings for a qwerty keyboard by
2264 default. dot-clfswmrc show examples to switch to an azerty
2266 License change to GPL v3.
2267 * config.lisp: new file - group all globals variables in this
2270 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
2272 * xlib-util.lisp (hide-window): Remove structure-notivy events
2273 when hidding a window.
2275 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
2277 * package.lisp (*sm-property-notify-hook*): Readded
2278 property-notify-hook in second mode.
2280 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
2282 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
2284 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
2286 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
2287 Tile the current workspace with the current window on one side and
2288 others on the other (this emulate the larswm, dwm, wmii way). See
2289 the default configuration file to enable this mode by default.
2291 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
2294 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
2296 * clfswm-pager.lisp (pager-draw-window-in-group): Add
2297 ensure-printable to print windows name even with non-ascii
2300 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
2302 * clfswm-pager.lisp (pager-explode-current-group): Create a new
2303 group for each window in group.
2304 (pager-implode-current-group): Move all windows in workspace to
2305 one group and remove other groups.
2307 * clfswm-pack.lisp (explode-group): Create a new group for each
2309 (implode-group): Move all windows in workspace to one group and
2310 remove other groups.
2312 * clfswm-util.lisp (identify-key): Remove local configuration
2313 variables and made them available for configuration from
2315 (query-string): idem.
2317 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
2319 * netwm-util.lisp: Start of NetWM compliance.
2320 Add a Netwm client list gestion.
2322 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
2324 * clfswm-internal.lisp (create-group-on-request): open a new group
2325 only when the current group is not empty.
2327 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
2328 bug with null workspace.
2330 * clfswm-pager.lisp (pager-handle-event): Add a hook
2331 system. This hooks can be changed in the user configuration file.
2333 * package.lisp: All colors and font variables are set in
2334 package.lisp and can be configured in the user configuration
2336 Note: If you have configured some less ugly colors (esp. for the
2337 pager) don't hesitate to let me know :)
2339 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
2340 system. This hooks can be changed in the user configuration file.
2342 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
2343 changed in the user configuration file (~/.clfswmrc)
2345 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
2347 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
2348 arrow action, open next window in new workspace/group.
2350 * bindings.lisp (stop-all-pending-actions): new binding.
2351 (open-next-window-in-new-group-once): Open the next windows in a
2352 new group (only once) or open all new windows in a new group (like
2353 others windows managers).
2355 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
2357 * clfswm.lisp (read-conf-file): New function to read a lisp
2358 configuration file at startup.
2359 (focus-group-under-mouse): Check if group isn't the current group
2360 ( prevent a bug with unclutter ).
2362 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
2364 * bindings.lisp (run-program-from-query-string): A program can be
2365 launch from a input query window.
2367 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
2369 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
2371 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
2373 * clfswm.lisp (process-new-window): One can now open the next
2374 window in a workspace called by its number.
2376 * clfswm-util.lisp (query-font-string): Minimal editing
2378 (eval-from-string): And an REPL in the window manager... :)
2380 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2382 * clfswm.lisp (process-new-window): One can now open the next
2383 window in a new workspace or a new group.
2385 * clfswm-pager.lisp (pager-mode): Display the next arrow action
2386 with the hidden windows.
2388 * clfswm.lisp (second-key-mode): Display the current workspace
2389 number and the next arrow action in the state window.
2391 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
2392 the pager mode and then redisplay only the current workspace.
2394 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
2396 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
2397 they can be focused with a keypress, sorted or renumbered.
2399 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2401 * clfswm-pager.lisp (pager-mode): Remove multiple silly
2402 pager-draw-display. This prevent a lot of flickering in the
2405 * clfswm.lisp: Remove all display-force-output and replace them
2406 with only one display-finish-output in the event loop.
2408 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
2410 * clfswm-pager.lisp (pager-center-group): New function - center a
2411 group at the middle of the screen.
2413 * clfswm-pack.lisp (center-group): New function - center a group
2414 at the middle of the screen.
2416 * clfswm.lisp (show-group): Add a cross line under the group.
2417 (show-group): Group are showned even if fullscreened.
2418 (init-display): Add an exposure event on the root window.
2420 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
2422 * package.lisp (*default-group*): Default group is the same size
2423 of a fullscreened group.
2425 * bindings*: Use shift to move, control+shift to copy.
2427 * *.lisp: Add comments for configuration or alternatives. So grep
2428 for CONFIG to see where you can configure clfswm. And grep for
2429 Alternative to use some commented code.
2431 * clfswm.lisp (second-key-mode): Use a single window to show the
2432 second mode. See for alternatives at the end of this file.
2434 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
2436 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
2437 macro of key and mouse definitions.
2438 (define-define-key/mouse): Use state instead of modifiers list
2439 this fix a bug when the modifiers list is not in the rigth order.
2441 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
2443 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
2445 * clfswm-info.lisp (info-mode): Add an info mode.
2447 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
2449 * clfswm.lisp (process-new-window): Change border size for
2451 (show-all-windows-in-workspace): Unhide all windows even when the
2452 current group is in fullscreen mode.
2454 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
2456 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
2457 redisplay the identify window after a terminal switch.
2459 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
2460 redisplay the pager after a terminal switch.
2462 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
2464 * clfswm-util.lisp (identify-key): Add a window to display
2465 the keys to identify on screen.
2467 * bindings.lisp, bindings-pager.lisp: Define same keys to
2468 move/copy groups/windows in second mode and in pager.
2470 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
2472 (show-all-windows-in-workspace): unhide window before adapting it
2475 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
2477 * clfswm.lisp (handle-event): Revert to an older version.
2479 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
2481 * clfswm-util.lisp (force-window-in-group)
2482 (force-window-center-in-group): New functions for transient windows.
2484 * clfswm-pager.lisp (pager-remove-current-workspace/group):
2485 bugfix: hide all windows before removing group or workspace.
2487 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
2489 * bindings-pager.lisp (mouse-pager-move-selected-group)
2490 (mouse-pager-copy-selected-group)
2491 (mouse-pager-move-selected-window)
2492 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
2493 (mouse-pager-rotate-window-down): New functions to have mouse in
2496 * clfswm-pager.lisp (pager-swap-window)
2497 (pager-copy-group-on-next/previous-workspace)
2498 (pager-copy-window-on-next/previous-line): New functions
2500 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
2502 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
2503 (pager-move-group-on-next/previous-workspace): new functions.
2505 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
2506 to its half size (new functions).
2508 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
2510 * clfswm-pager.lisp: workspaces, groups and windows can now be
2511 selectionned with the keyboard or the mouse.
2513 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
2515 * clfswm-pager.lisp (pager-select-workspace-right/left):
2516 workspaces can now be selectionned with the keyboard.
2518 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
2520 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
2521 new function to remove a previous defined key or mouse combination.
2523 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
2525 * clfswm.lisp (main): Check for access error in init-display.
2527 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
2528 keycode before grabbing.
2530 * bindings.lisp: Remove nlambda and use defun to keep the function
2531 documentation with clisp.
2532 (define-shell): new macro to define shell command for the second
2535 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
2537 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
2540 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
2542 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
2543 workspace circulation.
2545 * clfswm-util.lisp (absorb-orphan-window): new function.
2547 * clfswm-keys.lisp: Keysyms support.
2549 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
2551 * clfswm.lisp (show-group): Use one gc for all groups and not one
2554 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
2556 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
2558 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
2559 width and height outside group.
2561 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
2563 * clfswm.lisp: First public release.