1 2012-08-28 Philippe Brochard <pbrochard@common-lisp.net>
3 * src/clfswm-expose-mode.lisp (expose-query-key-press-hook): Add
4 an option to immediately select child if they can be directly
7 2012-08-25 Philippe Brochard <pbrochard@common-lisp.net>
9 * contrib/volume-mode.lisp: Add mouse buttons actions in volume
10 mode. Add a volume button toolbar module.
12 2012-08-24 Philippe Brochard <pbrochard@common-lisp.net>
14 * contrib/mpd.lisp: New toolbar modules (available only if
15 toolbar.lisp is loaded).
16 Add a small parameter for toolbar modules useful with vertical
19 2012-08-21 Philippe Brochard <pbrochard@common-lisp.net>
21 * contrib/reboot-halt.lisp: Add configuration command for system
24 * contrib/toolbar.lisp (toggle-toolbar-hide-state): New function.
26 2012-08-20 Philippe Brochard <pbrochard@common-lisp.net>
28 * src/clfswm-internal.lisp (add-in-never-managed-window-list): New
31 2012-08-20 Philipp Kroos <philipp.kroos@t-online.de>
33 * src/clfswm-placement.lisp (here-placement): Evaluates to current
36 2012-08-20 Philipp Kroos <philipp.kroos@t-online.de>
38 * contrib/toolbar.lisp: Add an expose-mode-button-module.
40 2012-08-19 Philippe Brochard <pbrochard@common-lisp.net>
42 * contrib/toolbar.lisp (remove-toolbar): New function.
44 2012-08-18 Philippe Brochard <pbrochard@common-lisp.net>
46 * contrib/toolbar.lisp: Add configurable colors in toolbar
49 2012-08-16 Philippe Brochard <pbrochard@common-lisp.net>
51 * src/tools.lisp: Factorize system usage information collection.
52 (start-system-poll): Use a lock file instead of a local variable.
54 * contrib/toolbar.lisp: Add memory, cpu and battery usage module
55 with a poll methode. More responsive but up to date every 10s by
58 2012-08-15 Philippe Brochard <pbrochard@common-lisp.net>
60 * contrib/toolbar.lisp: Add a clickable label module for toolbar.
61 Add a clickable entry to open the CLFSWM main menu.
62 Add memory, cpu and battery usage module.
64 * src/clfswm-menu.lisp (open-menu): Prevent to reopen an opened
65 menu. Fixe a but with negative selected-item.
67 2012-08-14 Philippe Brochard <pbrochard@common-lisp.net>
69 * src/clfswm-util.lisp (eval-from-query-string): Show a notify
70 window when updating symobls list for REPL completion.
71 (show-current-root): New function and configuration menu to
72 display a message on the current root.
74 * contrib/toolbar.lisp: Add arguments in toolbar modules.
76 * src/xlib-util.lisp (event-hook-name): Intern hook name symbol
79 2012-08-13 Philippe Brochard <pbrochard@common-lisp.net>
81 * contrib/toolbar.lisp (toolbar-module-text): Print a formatted
82 text at module position centered in toolbar.
84 * src/xlib-util.lisp (optimize-event-hook): Remove unused event
87 2012-08-12 Philippe Brochard <pbrochard@common-lisp.net>
89 * contrib/toolbar.lisp: End of toolbar framework.
90 (list-toolbar-modules): Add a list toolbar modules function.
92 2012-08-03 Philippe Brochard <pbrochard@common-lisp.net>
94 * src/clfswm-internal.lisp (show-child): Show unmanaged windows
95 on (maybe) current child in all roots.
97 * src/clfswm-util.lisp (find-child-under-mouse-in-child-tree):
98 Handle children from all roots instead of from *root-frame*.
100 2012-07-23 Philippe Brochard <pbrochard@common-lisp.net>
102 * src/clfswm-expose-mode.lisp: New expose mode based on standard
105 2012-06-27 Philippe Brochard <pbrochard@common-lisp.net>
107 * src/clfswm-util.lisp (eval-from-query-string): Add completion
108 for eval for query string.
110 2012-06-26 Philippe Brochard <pbrochard@common-lisp.net>
112 * src/clfswm-query.lisp: Add completion for shell commands.
114 2012-06-18 Philippe Brochard <pbrochard@common-lisp.net>
116 * src/clfswm-placement.lisp: Each child can have its own border
117 size. New binding to change the child border size on the fly.
119 2012-06-08 Philippe Brochard <pbrochard@common-lisp.net>
121 * src/tools.lisp (process-timers): Call get-internal-real-time
122 only once for all times.
124 2012-06-07 Philippe Brochard <pbrochard@common-lisp.net>
126 * contrib/toolbar.lisp (define-toolbar-hooks): Add auto-hide
128 (define-toolbar-hooks): Add auto-hide toolbar (show/hide on mouse
131 2012-06-06 Philippe Brochard <pbrochard@common-lisp.net>
133 * src/xlib-util.lisp (handle-event): Add an additional hook event
134 system to handle events in contrib code.
136 2012-06-03 Philippe Brochard <pbrochard@common-lisp.net>
138 * src/clfswm-placement.lisp: Add an optional border size in all
141 2012-05-30 Philippe Brochard <pbrochard@common-lisp.net>
143 * contrib/toolbar.lisp (clock): Add a clock module.
145 2012-05-28 Philippe Brochard <pbrochard@common-lisp.net>
147 * contrib/toolbar.lisp: begining of toolbar support.
149 2012-05-24 Philippe Brochard <pbrochard@common-lisp.net>
151 * src/clfswm-internal.lisp (rotate-root-geometry): Do not use
152 rotatef but a simpler algorithm.
154 2012-05-19 Philippe Brochard <pbrochard@common-lisp.net>
156 * src/clfswm-placement.lisp: Adjust width and height in child and
157 root placement to prevent too big child size.
159 2012-05-18 Philippe Brochard <pbrochard@common-lisp.net>
161 * src/clfswm-placement.lisp: New root placement possibility.
163 * src/clfswm-util.lisp (change-current-root-geometry): New
166 2012-05-17 Philippe Brochard <pbrochard@common-lisp.net>
168 * src/clfswm-util.lisp (exchange-root-geometry-with-mouse): New
171 2012-05-16 Philippe Brochard <pbrochard@common-lisp.net>
173 * src/menu-def.lisp: New root menu.
175 2012-05-15 Philippe Brochard <pbrochard@common-lisp.net>
177 * src/clfswm-circulate-mode.lisp (rotate-root-geometry-next)
178 (rotate-root-geometry-previous): New second mode binding to change
181 2012-05-13 Philippe Brochard <pbrochard@common-lisp.net>
183 * src/clfswm-internal.lisp: Remove the *current-child* variable
184 and use a setfable function (current-child) instead.
185 (current-child-setter): Store root current child before apllying
186 current child change.
188 2012-05-09 Philippe Brochard <pbrochard@common-lisp.net>
190 * src/clfswm-internal.lisp: Use xdpyinfo/xinerama informations
191 instead of xrandr informations.
193 2012-05-06 Philippe Brochard <pbrochard@common-lisp.net>
195 * src/clfswm-internal.lisp : Use only one list for root
197 (*root*): Root management API simplification.
199 2012-04-30 Philippe Brochard <pbrochard@common-lisp.net>
201 * src/clfswm-internal.lisp: Big change to replace *current-root*
202 variable to support multiple root.
204 2012-04-18 Philippe Brochard <pbrochard@common-lisp.net>
206 * src/tools.lisp (add-new-hook, add-hook): New macro. Do not
207 duplicate hooks by default. Use add-new-hook if you want to
210 2012-04-16 Philippe Brochard <pbrochard@common-lisp.net>
212 * src/clfswm-corner.lisp (wait-window-in-query-tree): Add a limit
213 of try to wait the command window.
215 2012-02-25 Philippe Brochard <pbrochard@common-lisp.net>
217 * src/clfswm-util.lisp (place-frames-from-xrandr)
218 (swap-frame-geometry, rotate-frame-geometry): New helper functions
219 for multiple physical screen.
220 (jump-to-slot, add-frame-in-parent-frame): Change *current-root*
223 2012-01-18 Philippe Brochard <pbrochard@common-lisp.net>
225 * src/*.lisp: Use create-symbol and create-symbol-in-package
226 instead of the shorter symb. (Thanks Aad Versteden).
228 * src/bindings-second-mode.lisp (set-default-second-keys): New
229 key binding to set window and frame transparency.
231 * src/bindings.lisp (set-default-main-mouse): New mouse binding to
232 set window and frame transparency.
234 * src/clfswm-keys.lisp (define-keys): New macro to ease multiple
235 keys definitions. (Thanks Valentin Plechinger for the request).
237 * src/*.lisp: Add full transparency support with xcompmgr.
239 2012-01-14 Philippe Brochard <pbrochard@common-lisp.net>
241 * src/*.lisp: Add transparency support.
243 2012-01-09 Ales Guzik <ales.guzik@gmail.com>
245 * src/clfswm-layout.lisp (tile-layout-mix): New layout to
246 automatically choose between vertival and horizontal tile layout.
247 (tile-space-layout): Fix to have space between screen border and
248 frame the same as between frames.
250 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
252 * load.lisp: Support clisp 2.49+ module system to load CLX.
254 2012-01-04 Ales Guzik <ales.guzik@gmail.com>
256 * src/clfswm-layout.lisp (update-layout-managed-children-keep-position):
257 Fix an inattention error.
259 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
261 * src/xlib-util.lisp (with-xlib-protect): Protect from
262 xlib:lookup-error. This prevent an error in clisp/new-clx when
263 sometimes an xlib:colormap is expected instead of an xlib:window.
265 2012-01-03 Philippe Brochard <pbrochard@common-lisp.net>
267 * src/xlib-util.lisp (handle-event): Fix a clisp/new-clx error
268 when sometimes window slot of event-slots is a pixmap instead of a
271 2011-12-26 Philippe Brochard <pbrochard@common-lisp.net>
273 * src/clfswm-query.lisp: Fill the history list with a non-nil
276 2011-12-25 Philippe Brochard <pbrochard@common-lisp.net>
278 * src/package.lisp (make-x-drawable): Drawable wrapper to prevent
279 type error in some CLX versions.
280 Replace xlib:drawable-* functions with x-drawable-* equivalents
282 2011-12-14 Philippe Brochard <pbrochard@common-lisp.net>
284 * src/clfswm-util.lisp (um-create-xdg-section-list): Add at least
285 the 'Utility menu entry.
287 * src/config.lisp (*xdg-section-list*): moved to config.lisp.
289 * src/clfswm-util.lisp (update-menus): Set a default value for
290 searching .desktop files when XDG_DATA_DIRS is not set.
292 2011-10-15 Philippe Brochard <pbrochard@common-lisp.net>
294 * src/clfswm-internal.lisp (place-window-from-hints): Use
295 with-placement macro to place unmanaged windows in an arbitrary
298 2011-06-16 Philippe Brochard <pbrochard@common-lisp.net>
300 * src/clfswm-internal.lisp (clean-windows-in-all-frames): Prevent
301 current root and current child being equal to child.
303 2011-06-13 Philippe Brochard <pbrochard@common-lisp.net>
305 * src/keysyms.lisp: Repeat Page_Down/Up keysym definitions at the
306 end of the file to change keysyms priority.
308 2011-06-13 Sylvain HENRY <hsyl20@gmail.com>
310 * *.*: Minor spelling fix.
312 2011-06-12 Philippe Brochard <pbrochard@common-lisp.net>
314 * src/clfswm.lisp (:unmap-notify, :destroy-notify): Show all
315 children just after the xlib tree cleanup -> reduce the
316 flickering when a window is deleted or destroyed.
318 * src/clfswm-internal.lisp (process-existing-windows): Do not
319 process the notify window.
321 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
323 * *: **** Release 1106 ****
325 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
327 * src/clfswm-internal.lisp (clean-windows-in-all-frames): New
328 function to prevent xlib error when a window is deleted.
330 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
332 * src/clfswm-internal.lisp
333 (delete-child-and-children-in-all-frames): Delete or destroy
334 children before displaying all children.
336 2011-06-05 Philippe Brochard <pbrochard@common-lisp.net>
338 * src/clfswm-util.lisp (add-frame-in-parent-frame): New function
341 2011-06-04 Philippe Brochard <pbrochard@common-lisp.net>
343 * src/clfswm.lisp (main-unprotected): Destroy all frames windows
344 before closing the display (not really needed).
346 2011-06-02 Philippe Brochard <pbrochard@common-lisp.net>
348 * src/clfswm-layout.lisp (inc-tile-layout-size)
349 (dec-tile-layout-size, inc-slow-tile-layout-size)
350 (dec-slow-tile-layout-size): New functions and bindings.
352 2011-06-01 Philippe Brochard <pbrochard@common-lisp.net>
354 * src/clfswm-expose-mode.lisp (define-expose-letter-keys): Add
355 0..1 and A..Z keys to select a child in exposé mode.
357 * src/clfswm-internal.lisp (display-frame-info): Remove hidden
358 infos in frames windows.
360 * src/clfswm-util.lisp (ask-close/kill-current-window): Menu
363 2011-05-30 Philippe Brochard <pbrochard@common-lisp.net>
365 * src/clfswm-internal.lisp (get-parent-layout): Minor fullscreen
368 2011-05-29 Philippe Brochard <pbrochard@common-lisp.net>
370 * src/clfswm-internal.lisp
371 (delete-child-and-children-in-all-frames): Show all children
372 before deleting/destroying a windows, so prevent a flickering.
373 (get-parent-layout): Return the fullscreen size when the current
376 2011-05-28 Philippe Brochard <pbrochard@common-lisp.net>
378 * src/clfswm-internal.lisp (get-parent-layout): Handle correctly
381 * src/clfswm-util.lisp (delete-focus-window-generic): Do not hide
382 child before removing, so prevent a flickering.
384 * src/clfswm-internal.lisp (show-all-children): Rectangular
385 optimization to display only needed children.
386 (show-all-children): Remove flickering on
387 select-next/previous-brother.
389 2011-05-17 Philippe Brochard <pbrochard@common-lisp.net>
391 * src/clfswm-util.lisp (copy-focus-window, cut-focus-window): New
392 functions and ask-close/kill-current-window menu and bindings
395 2011-05-16 Philippe Brochard <pbrochard@common-lisp.net>
397 * src/clfswm-util.lisp (ask-close/kill-current-window): Add an
398 *ask-close/kill-placement* placement window variable.
400 2011-05-09 Philippe Brochard <pbrochard@common-lisp.net>
402 * contrib/osd.lisp (funcall-button-from-code): Display osd
403 documention for buttons and fix some redefining warnings.
405 2011-05-07 Philippe Brochard <pbrochard@common-lisp.net>
407 * src/clfswm-nw-hooks.lisp (make-permanent-nw-hook-frame): New
408 function. Prevent to add or delete a new window hook for this
411 * src/clfswm-layout.lisp (update-layout-managed-children-position):
414 2011-05-06 Philippe Brochard <pbrochard@common-lisp.net>
416 * src/bindings-second-mode.lisp (set-default-second-keys):
417 select-brother-spatial-move-* binding update.
419 * src/clfswm-layout.lisp (tile-left|right|top|bottom-layout): Ask
420 to keep children positions or not.
422 * src/clfswm-internal.lisp (fixe-real-size): Takes care of border
425 * src/clfswm-layout.lisp (update-layout-managed-children): Fix a
426 bug by using the parent frame instead of the current child.
428 * src/clfswm-circulate-mode.lisp
429 (select-brother-generic-spatial-move+right/left/up/down): New
430 function to select a brother from another in a spatial move.
432 2011-04-19 Philippe Brochard <pbrochard@common-lisp.net>
434 * src/clfswm-pack.lisp (move-frame-constrained)
435 (resize-frame-constrained): Use pixels instead of floating
438 2011-04-18 Philippe Brochard <pbrochard@common-lisp.net>
440 * src/clfswm-pack.lisp (resize-frame-constrained): Takes care of
442 (implode-frame, implode-current-frame): New functions. Absorb all
443 frames subchildren in frame. Explode frame opposite.
445 2011-04-17 Philippe Brochard <pbrochard@common-lisp.net>
447 * src/clfswm-pack.lisp (move-frame-constrained)
448 (resize-frame-constrained): New function. Move and resize frame
449 with the mouse constrained by other frame brothers.
451 2011-04-14 Philippe Brochard <pbrochard@common-lisp.net>
453 * src/clfswm-util.lisp (with-movement-select-next-brother)
454 (with-movement-select-previous-brother)
455 (with-movement-select-next-child): Use a simple method (do not
456 enter in the circulate mode) to allow to circulate in all children
459 * src/clfswm-menu.lisp (open-menu): Save info hash table keys
460 instead of deleting newly created keys.
462 2011-03-21 Philippe Brochard <pbrochard@common-lisp.net>
464 * src/clfswm-internal.lisp (x-px->fl, y-px->fl): Takes care of
467 2011-03-20 Philippe Brochard <pbrochard@common-lisp.net>
469 * src/clfswm-info.lisp (show-config-variable): call
470 produce-conf-var-doc.
472 2011-03-18 Philippe Brochard <pbrochard@common-lisp.net>
474 * src/clfswm-autodoc.lisp (produce-conf-var-doc-html): Produce a
475 documentation for all configurable variables in CLFSWM -
478 * src/clfswm-internal.lisp (leave-frame): Hide all children except
481 2011-03-16 Philippe Brochard <pbrochard@common-lisp.net>
483 * src/clfswm-autodoc.lisp (produce-all-docs): Produce a
484 documentation for all configurable variables in CLFSWM.
486 * src/clfswm-layout.lisp (set-gimp-layout): Display a notify
487 window with the help on the GIMP layout.
489 2011-03-12 Philippe Brochard <pbrochard@common-lisp.net>
491 * src/menu-def.lisp: Menu update to prevent cursor keys clash.
493 * clfswm.asd: Change compilation order to prevent undefined
496 * src/clfswm-internal.lisp (show-child(frame)): Handle properly
497 the show-root-frame-p parameter.
499 2011-03-11 Philippe Brochard <pbrochard@common-lisp.net>
501 * src/clfswm-util.lisp (move-frame, resize-frame): Do not move or
502 resize a frame when it's the current root.
504 2011-03-10 Philippe Brochard <pbrochard@common-lisp.net>
506 * src/clfswm-internal.lisp (show-all-children): Handle properly
507 duplicated child in multipe frames.
509 2011-03-09 Philippe Brochard <pbrochard@common-lisp.net>
511 * contrib/volume-mode.lisp (set-default-volume-keys): Add more
512 keybindings (up/down, right/left) to raise/lower the volume.
514 * src/clfswm-layout.lisp: Add a variable border size for frames
517 2011-03-08 Philippe Brochard <pbrochard@common-lisp.net>
519 * src/clfswm-util.lisp (cut-current-child, remove-current-child)
520 (delete-current-child): Hide the current child before doing the
523 * src/clfswm-internal.lisp (show-all-children): Hide windows not
524 in the current root before displaying those in current root.
525 Remove all hide-all unnecessary calls.
527 * src/clfswm-configuration.lisp (save-variables-in-conf-file):
528 Save only variables with a different value than their original
531 2011-03-07 Philippe Brochard <pbrochard@common-lisp.net>
533 * src/clfswm-info.lisp (show-config-variable): Use the new
536 * src/clfswm-autodoc.lisp (produce-configuration-variables): Use
537 the new defconfig method.
539 * src/clfswm-configuration.lisp (create-configuration-menu):
540 Change the config system with a more lispy one and a less string
541 based one: (defconfig name value group doc).
544 2011-03-06 Philippe Brochard <pbrochard@common-lisp.net>
546 * src/clfswm-internal.lisp (show-all-children): Simplify the
548 (show-child): Display an unmanaged window whe it's the current
550 (show-all-children): add the ability to display all child from
551 *root-frame* and hide all those who are not in *current-root*.
552 -> remove hide-all-children when needed.
554 * src/xlib-util.lisp (move-window,resize-window): Add a
555 *color-move-window* border when moving or resizing a window.
557 2011-03-04 Philippe Brochard <pbrochard@common-lisp.net>
559 * src/clfswm-internal.lisp (show-all-children): Perform only one
560 recusion on the clfswm tree: calculate geometry and place child in
563 2011-03-03 Philippe Brochard <pbrochard@common-lisp.net>
565 * src/clfswm-internal.lisp (show-all-children): Rethink of display
566 child order to prevent very annoying flickering.
568 2011-02-27 Philippe Brochard <pbrochard@common-lisp.net>
570 * src/clfswm-util.lisp (query-yes-or-no): New function.
572 * src/clfswm-configuration.lisp (reset-all-config-variables): New
573 function and menu entry.
574 (query-conf-value): Add the ability to leave the field blank to
575 reset the variable to its default value.
577 2011-02-26 Philippe Brochard <pbrochard@common-lisp.net>
579 * src/clfswm-configuration.lisp
580 (add-all-configuration-default-value): Add a default value to
581 configurable variables.
583 2011-02-23 Philippe Brochard <pbrochard@common-lisp.net>
585 * src/clfswm.lisp (main-unprotected): Create the configuration
586 menu only once at startup.
588 2011-02-22 Desmond O. Chang <dochang@gmail.com>
590 * contrib/amixer.lisp: Add a volume mode inspired by the emms
591 volume package. Alsa mixer interface.
593 * contrib/volume-mode.lisp: Add a volume mode inspired by the emms
596 2011-02-22 Desmond O. Chang <dochang@gmail.com>
598 * src/clfswm.lisp (main): Use ASDF:SYSTEM-SOURCE-DIRECTORY instead
599 of *LOAD-TRUENAME*. *LOAD-TRUENAME* is only bound during a call to
600 LOAD. If one eval CLFSWM:MAIN in repl, BASE-DIR will be an empty
601 string. Use ASDF:SYSTEM-SOURCE-DIRECTORY to fix it.
603 2011-02-16 Philippe Brochard <pbrochard@common-lisp.net>
605 * src/clfswm.lisp (main-unprotected): Add a close hook. And close
606 the notify window, the virtual keyboard and the clfswm terminal by
609 2011-02-15 Philippe Brochard <pbrochard@common-lisp.net>
611 * src/clfswm.lisp (main-unprotected): Destroy the notify window
612 before closing the display. This fix a bug when resetting/reloading
615 2011-02-12 Philippe Brochard <pbrochard@common-lisp.net>
617 * src/xlib-util.lisp (equal-wm-class-fun, equal-wm-name-fun)
618 (raise-window-fun, raise-and-focus-window-fun): New functions.
620 * src/config.lisp (*clfswm-terminal-cmd*): Switch from xterm to
622 (*never-managed-window-list*): Structure change to be more
623 flexible. Let the choice to focus, raise and do nothing on never
626 2011-02-09 Philippe Brochard <pbrochard@common-lisp.net>
628 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Take
629 care of never managed windows to move or resize them if the raise
632 * src/clfswm-internal.lisp (in-frame, in-window, in-child): New
635 2011-02-08 Philippe Brochard <pbrochard@common-lisp.net>
637 * src/clfswm.lisp (main-mode): Raise or not unmanaged windows
638 following request in *never-managed-window-list*.
640 2011-02-05 Philippe Brochard <pbrochard@common-lisp.net>
642 * *: **** Release 1102 ****
644 2011-02-05 Desmond O. Chang <dochang@gmail.com>
646 * src/keysyms.lisp: Add extended keysyms from stumpwm.
648 2011-02-01 Desmond O. Chang <dochang@gmail.com>
650 * src/clfswm-util.lisp (run-or-raise): New function (thanks to
653 * src/clfswm-internal.lisp (with-all-*): add a nil block.
655 2011-01-28 Desmond O. Chang <dochang@gmail.com>
657 * src/clfswm-util.lisp (xdg-config-home): XDG_CONFIG_HOME should
658 be $HOME/.config by default.
660 2010-12-29 Philippe Brochard <pbrochard@common-lisp.net>
662 * contrib/osd.lisp (display-doc): Add another method where a
663 CLFSWM native window is used to display the key documentation.
665 2010-12-27 Philippe Brochard <pbrochard@common-lisp.net>
667 * src/xlib-util.lisp (with-xlib-protect): Force to revert to the
670 2010-12-25 Philippe Brochard <pbrochard@common-lisp.net>
672 * src/clfswm-second-mode.lisp (second-key-mode): Call the second
673 mode leave function only when the generic mode was ended.
675 2010-12-08 Philippe Brochard <pbrochard@common-lisp.net>
677 * src/clfswm-second-mode.lisp (sm-leave-function): Do not use
678 *second-mode-program* anymore.
680 2010-12-07 Philippe Brochard <pbrochard@common-lisp.net>
682 * src/clfswm-second-mode.lisp (*second-mode-leave-function*): New
683 variable bound to a function executed (when not null) on second
686 2010-11-14 Philippe Brochard <pbrochard@common-lisp.net>
688 * src/clfswm-util.lisp (find-child-under-mouse): Do not find
691 2010-11-13 Philippe Brochard <pbrochard@common-lisp.net>
693 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
694 Do not display the accel window for unmanaged windows.
696 2010-11-11 Philippe Brochard <pbrochard@common-lisp.net>
698 * src/clfswm-internal.lisp (set-current-root): Handle
699 window-parent in set-current-root.
701 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
702 focus the parent child when the current root is a window.
704 2010-11-09 Philippe Brochard <pbrochard@common-lisp.net>
706 * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
707 New function an bindings.
709 * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
712 2010-11-07 Philippe Brochard <pbrochard@common-lisp.net>
714 * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
715 function to let the user choose to keep child position with
718 * src/clfswm-internal.lisp (remove-frame-data-slot): New
721 2010-11-05 Philippe Brochard <pbrochard@common-lisp.net>
723 * src/clfswm-internal.lisp (frame-select-next-child)
724 (frame-select-previous-child): New functions and bindings. Select
725 the next/previous child in the current frame.
727 2010-10-31 Philippe Brochard <pbrochard@common-lisp.net>
729 * src/clfswm-query.lisp (query-mode-complet): New function: Handle
730 completion in query-mode.
732 2010-10-30 Philippe Brochard <pbrochard@common-lisp.net>
734 * src/clfswm-query.lisp (query-print-string): Handle long lines
737 2010-10-27 Philippe Brochard <pbrochard@common-lisp.net>
739 * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
740 all characters are printable.
742 2010-10-25 Philippe Brochard <pbrochard@common-lisp.net>
744 * contrib/server/server.lisp: Load clfswm client code in the main
745 program and let the user start it with a --client command line
748 * src/package.lisp (*main-entrance-hook*): New hook executed after
749 loading configuration file and before opening the display.
751 2010-10-23 Philippe Brochard <pbrochard@common-lisp.net>
753 * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
755 * src/clfswm-internal.lisp (show-child): Show window only if not
758 * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
759 change modifiers after binding definition.
761 2010-10-21 Philippe Brochard <pbrochard@common-lisp.net>
763 * contrib/osd.lisp: New file: OSD (On Screen Display) for
766 * src/clfswm-menu.lisp (open-menu): Modularise function.
768 2010-10-13 Philippe Brochard <pbrochard@common-lisp.net>
770 * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
771 key binding in main and second mode.
773 2010-10-10 Philippe Brochard <pbrochard@common-lisp.net>
775 * src/clfswm-util.lisp (open-notify-window): Convert hello-window
776 functions to a more generic Notify-window system.
778 * src/tools.lisp (add-timer): Add an id to identify the timer.
780 2010-10-09 Philippe Brochard <pbrochard@common-lisp.net>
782 * src/tools.lisp (erase-timer): New function.
784 * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
785 the hello window. Add Configuration variables.
787 2010-10-08 Philippe Brochard <pbrochard@common-lisp.net>
789 * src/clfswm-util.lisp (): Add an Hello window at startup.
791 * src/tools.lisp (process-timers): Add a timer system.
793 2010-10-07 Philippe Brochard <pbrochard@common-lisp.net>
795 * src/clfswm-query.lisp (add-in-query-string): Handle correctly
798 2010-10-06 Philippe Brochard <pbrochard@common-lisp.net>
800 * src/clfswm-query.lisp (query-print-string): Change cursor color
801 and show parenthesis matching with colors (on match and on
804 2010-10-05 Philippe Brochard <pbrochard@common-lisp.net>
806 * src/clfswm-internal.lisp (show-all-children): Do not raise a
807 child when its parent is hidden.
809 2010-10-02 Philippe Brochard <pbrochard@common-lisp.net>
811 * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
812 possibility to circulate over subchild of the current child.
814 * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
815 (expose-windows-generic): Add an escape-body function to return to
816 the original state on escape key.
818 * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
819 to bind the current child from the configuration file.
821 2010-10-01 Philippe Brochard <pbrochard@common-lisp.net>
823 * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
824 window hook: the frame absorb all new windows that match
825 nw-absorb-test frame data slot.
827 2010-09-30 Philippe Brochard <pbrochard@common-lisp.net>
829 * src/clfswm-expose-mode.lisp (expose-create-window): Show window
830 title in accel window.
832 2010-09-29 Philippe Brochard <pbrochard@common-lisp.net>
834 * configure: Use the Xavier Maillard clfswm script in contrib to
835 build an executable in the standard way.
837 2010-09-26 Philippe Brochard <pbrochard@common-lisp.net>
839 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
840 New functions. Add a window on each child in the expose mode to
843 * src/clfswm-internal.lisp (child-x, child-y, child-width)
844 (child-height): New methods to get real child coordinates.
846 2010-09-25 Philippe Brochard <pbrochard@common-lisp.net>
848 * src/clfswm-layout.lisp (*-layout): Use child-position.
850 * src/clfswm-internal.lisp (child-position): New function.
852 * src/clfswm-expose-mode.lisp (expose-windows-mode)
853 (expose-all-windows-mode): Use a generic mode.
855 * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
856 with handle-event-fun symbols instead of inspecting clfswm
857 internals symbols on each mode change.
859 * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
860 a separate clfswm-expose-mode.lisp file.
862 * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
863 screen size instead of hardcoded test coordinates.
865 2010-09-24 Philippe Brochard <pbrochard@common-lisp.net>
867 * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
868 (speed-mouse-right, speed-mouse-up, speed-mouse-down)
869 (speed-mouse-undo, speed-mouse-first-history): New functions to
870 quickly move the mouse. Implemented for the second mode.
872 2010-09-16 Philippe Brochard <pbrochard@common-lisp.net>
874 * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
875 write permission on $clfswm_asd_path. So anybody can start clfswm
876 even if there is no write permission on the source directory.
878 2010-09-12 Philippe Brochard <pbrochard@common-lisp.net>
880 * contrib/clfswm: Add support to cmucl, ccl and ecl.
882 2010-09-11 Philippe Brochard <pbrochard@common-lisp.net>
884 * src/clfswm-util.lisp (set-hide-unmanaged-window)
885 (set-show-unmanaged-window, set-default-hide-unmanaged-window):
886 New functions and menu entry.
887 (set-globally-hide-unmanaged-window)
888 (set-globally-show-unmanaged-window): New functions and menu
891 * src/clfswm-internal.lisp (hide-unmanager-window-p): New
893 (show-child): Add a data slot on frame to hide or not unmanaged
896 * src/clfswm-corner.lisp (present-clfswm-terminal)
897 (present-virtual-keyboard): Use a function (generic-present-body)
898 instead of a macro (generate-present-body).
900 * src/clfswm-util.lisp (update-menus): List all directories and
901 subdirectories in $XDG_DATA_DIRS/applications.
903 2010-09-10 Philippe Brochard <pbrochard@common-lisp.net>
905 * src/clfswm-corner.lisp (generate-present-body): New macro.
906 (present-clfswm-terminal, present-virtual-keyboard): Use
907 generate-present-body.
909 2010-09-09 Philippe Brochard <pbrochard@common-lisp.net>
911 * src/clfswm-util.lisp (update-menus): Follow XDG specifications
912 instead of the non-portable Debian update-menu.
914 2010-09-07 Philippe Brochard <pbrochard@common-lisp.net>
916 * src/clfswm.lisp (error-handler): New function do handle
917 asynchronous errors and ignore them.
918 (open-display): Install the new error-handler on display.
920 2010-09-05 Philippe Brochard <pbrochard@common-lisp.net>
922 * src/xlib-util.lisp (with-xlib-protect): Add a
923 with-simple-restart on top of body execution.
925 2010-09-04 Philippe Brochard <pbrochard@common-lisp.net>
927 * src/clfswm.lisp (main-loop): Protect all xlib functions with an
930 * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
931 handle-event. Add a with-simple-restart to prevent a
932 clisp/new-lisp infinite loop.
934 2010-08-30 Philippe Brochard <pbrochard@common-lisp.net>
936 * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
937 clfswm terminal working even on xterm title changes.
939 2010-08-29 Philippe Brochard <pbrochard@common-lisp.net>
941 * src/clfswm-util.lisp (run-other-window-manager): Update for
944 * src/tools.lisp (do-execute): New parameter io to change the
947 * src/clfswm-util.lisp (hide-current-child): Prevent from removing
950 * src/clfswm-internal.lisp (child-member): New predicate.
951 (child-remove): New function.
953 * src/*.lisp: Use child-member and child-remove everywhere it's
956 2010-08-28 Philippe Brochard <pbrochard@common-lisp.net>
958 * src/clfswm.lisp (main-loop): Ensure that all events have been
959 processed after a process-event.
961 * src/clfswm-internal.lisp (is-in-current-child-p): New function.
963 2010-08-27 Philippe Brochard <pbrochard@common-lisp.net>
965 * src/clfswm.lisp (main-mode:configure-request): Raise the window
966 only when present on the current child and focus it accordingly.
968 2010-08-26 Philippe Brochard <pbrochard@common-lisp.net>
970 * src/clfswm-circulate-mode.lisp (circulate-loop-function):
971 Use is-a-key-pressed-p.
973 * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
975 * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
976 returned by xlib:keysym->keycodes.
978 * src/*.lisp: Use the new child-equal-p to compare children. This
979 prevent a bug with sbcl/cmucl when the standard equal function
980 does not work with xlib:window.
982 * src/clfswm-internal.lisp (child-equal-p): New predicate.
984 2010-08-25 Philippe Brochard <pbrochard@common-lisp.net>
986 * src/clfswm-generic-mode.lisp (generic-mode): Use an
987 xlib:event-listen before processing event with
988 xlib:process-event. This prevent a bug with CLX threaded
989 implementation like sbcl.
991 * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
992 processing event with xlib:process-event. This prevent a bug with
993 CLX threaded implementation like sbcl.
995 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
997 * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
999 * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
1002 * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
1003 (find-parent-frame, find-frame-window, find-frame-by-name)
1004 (find-frame-by-number): Use with-find-in-all-frames to search in
1005 frames in the right order.
1007 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
1008 unwanted flickering with unmanaged windows.
1010 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
1012 * src/package.lisp: Remove event handler hooks as they're not
1013 needed anymore (To replace them: use closure and define-handler).
1015 * src/xlib-util.lisp (move-window, resize-window)
1016 (wait-mouse-button-release): Use a generic mode.
1018 * src/*.lisp: Replace the case to handle event with a more (tricky)
1019 lispy method which bind a function to each keywords associated
1022 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
1024 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
1025 menu entry between delete-current-child and remove-current-child.
1026 ie: Delete a child and its children in all frames by default.
1028 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
1030 * src/package.lisp: Add a placement configuration group.
1032 * src/binding*.lisp: Bind control+g to escape the current action
1035 * src/clfswm-internal.lisp
1036 (delete-child-and-children-in-all-frames): New function and
1037 binding: Second mode - Control+Delete delete the current child and
1038 its children in all frames (ie: close the current child and its
1041 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
1043 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
1044 the frame window and the frame gc. Close a very annoying bug when
1045 cuting/pasting a frame or moving a child over frames with the
1048 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1049 all children in *current-root* after moving/resizing a frame.
1051 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
1053 * src/clfswm-util.lisp (delete-focus-window)
1054 (destroy-focus-window): Remove child in parent frame before
1057 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1059 * src/clfswm-util.lisp (identify-key): Add a timeout in
1061 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
1062 of the window passed by xlib:process-event.
1064 * src/xlib-util.lisp (move-window, resize-window)
1065 (wait-mouse-button-release): Add a timeout in xlib:process-event.
1067 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1069 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
1070 to launch an other window manager and to return to clfswm.
1072 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
1074 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
1077 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
1079 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
1082 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
1083 parameter and a loop timeout.
1085 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
1087 * src/clfswm.lisp (main): Add an alternate configuration filename
1090 * load.lisp: Add a debuging code example.
1092 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
1094 * src/clfswm-configuration.lisp (create-configuration-menu): New
1095 menu to configure all clfswm variables while clfswm is running.
1097 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
1099 * src/clfswm-util.lisp (save-configuration-variables): New
1100 function to save all configuration variables in clfswmrc.
1102 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
1104 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
1106 (set-default-info-keys): Add cursor key support in info mode.
1108 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
1110 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
1113 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
1114 prevent reading the configuration file (this may be useful to
1115 produce the original documentation without user modifications
1116 with the rc configuration file).
1118 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
1120 * src/bindings-second-mode.lisp (set-default-second-keys):
1121 Simplification of Escape key to close/kill/remove the focus window
1122 and unhide all windows.
1124 * src/bindings.lisp (set-default-main-keys): Simplification of
1125 Escape key to close/kill/remove the focus window and unhide all
1128 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
1129 focus and unhide all windows capabilities.
1131 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1133 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
1135 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
1137 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
1138 Keep child order and don't make unnecessary child movement.
1139 (one-column-layout, one-line-layout): New layouts.
1141 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
1143 * *: **** Release 0906 ****
1145 * contrib/cd-player.lisp: New file to handle the CD player.
1147 * contrib/xmms.lisp: New file to handle the xmms player.
1149 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1151 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
1152 Maximize windows in their frame - Leave frames to their actual
1155 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
1156 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
1158 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
1160 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
1162 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
1164 * contrib/mpd.lisp: Use a standard menu.
1166 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
1168 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
1170 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
1172 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
1174 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
1177 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
1179 * src/config.lisp (get-fullscreen-size): One pixel adjustment
1182 * src/clfswm-placement.lisp (*-child-placement): One pixel
1185 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
1187 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
1188 Ensure that all characters are printable.
1190 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
1193 * src/clfswm-placement.lisp (*-child-placement): Adjust
1194 coordinates to one pixel in the current child.
1196 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1198 * src/clfswm-query.lisp (query-enter-function): Assign font before
1199 width and height calculation.
1201 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1203 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
1204 bannish the pointer in an arbitrary place.
1206 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
1207 place the info window in an arbitrary place.
1209 * src/clfswm-query.lisp (query-enter-function): Use with-placement
1210 macro to place the query window in an arbitrary place.
1212 * src/clfswm-placement.lisp: New file. Allow to place info windows
1213 or query windows on an arbitrary place. Allow to bannish the
1214 pointer on an arbitrary place.
1216 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
1218 * src/clfswm-circulate-mode.lisp (reorder-child)
1219 (reorder-brother): Unfocus windows before reordering children or
1222 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1224 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
1225 the parent is a frame.
1227 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
1228 motion with a default modifier.
1230 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
1233 * src/clfswm-info.lisp (info-mode): Handle motion with a default
1235 (info-mode): Optimization in loop function.
1237 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1239 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
1240 root-frame correctly.
1242 * clfswm.asd: Dependency fix for clfswm-generic-mode.
1244 * src/clfswm-circulate-mode.lisp (reorder-child)
1245 (reorder-brother): Handle empty frames.
1246 (reorder-brother): Redisplay only the parent frame of the current
1249 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
1250 parent frame of the current frame.
1252 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
1254 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
1255 Maximize/Unmaximize the current frame in its parent frame.
1257 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
1258 windows and frames in their parent frame.
1260 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1262 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
1264 * src/clfswm-circulate-mode.lisp (reorder-child)
1265 (reorder-brother): Reinitialise on circulate type change
1266 child to brother or brother to child.
1268 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
1269 calls xlib:display-finish-output on each map-request. So speed up
1272 * src/xlib-util.lisp (map-window): New function. Call
1273 xlib:display-finish-output on each map request.
1275 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1277 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
1278 Optimisation when drawing second mode window.
1280 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1282 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
1285 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1287 * src/clfswm-util.lisp (run-program-from-query-string): Launch
1288 command only with a return validation.
1290 2009-04-22 Xavier Maillard <xma@gnu.org>
1292 * src/clfswm-query.lisp (query-string): Use a generic mode.
1294 2009-04-19 Xavier Maillard <xma@gnu.org>
1296 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
1298 2009-04-18 Xavier Maillard <xma@gnu.org>
1300 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
1301 to define all other modes.
1303 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1305 * src/package.lisp (): Use *default-font-string* for all
1308 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
1310 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
1312 * src/xlib-util.lisp (null-size-window-p): Better check of null
1315 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
1317 * src/clfswm.lisp (handle-map-request): Add a fix to manage
1318 correctly fullscreen windows (SDL particularly).
1320 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
1322 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
1323 a segfault with clisp/new-clx.
1325 * src/clfswm.lisp (handle-motion-notify): Add a needed window
1328 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
1329 needed window argument.
1331 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
1333 * src/xlib-util.lisp (wait-no-key-or-button-press)
1334 (wait-a-key-or-button-press): Check buttons press/release correctly"
1336 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
1338 * src/menu-def.lisp: Add children navigation menu in the movement
1339 menu (select next/previous child/brother/level).
1341 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
1343 * *: Rename 'sister' frame to 'brother' frame.
1345 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
1346 alias in a real modifier.
1348 * src/package.lisp (*modifier-alias*): New list of modifier alias
1349 For example: :alt is :mod-1, :numlock is :mod-2...
1351 * src/tools.lisp (remove-hook): New function.
1353 * src/clfswm-keys.lisp (with-capslock, without-capslock)
1354 (with-numlock, without-cnumlock): New functions.
1356 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
1358 * src/clfswm-info.lisp: Use the *binding-hook* to create info
1359 keys and mouse bindings.
1361 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
1362 second keys and mouse bindings.
1364 * src/bindings.lisp: Use the *binding-hook* to create main keys
1367 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1369 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
1372 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
1374 * src/menu-def.lisp: Use a menu instead of a function for the
1377 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
1379 * src/clfswm-util.lisp (show-standard-menu): Display the standard
1380 menu from the 'update-menus' command.
1382 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
1384 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
1385 it's already grabbed.
1387 * src/clfswm-internal.lisp (display-frame-info): Use configurable
1388 colors and fix a bug with background.
1389 (display-frame-info): Set window background when displaying info.
1391 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1393 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
1394 warning with clisp/new-clx.
1396 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
1398 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
1401 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1403 * *: **** Release 0809 ****
1405 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1407 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
1409 (ensure-unique-number): New function and menu entry.
1411 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
1413 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
1414 hook: open the next window in a named frame.
1415 (numbered-frame-nw-hook): New new window hook: open the next
1416 window in a numbered frame.
1418 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
1419 cases. So query-string can be called even in the main mode.
1421 * src/clfswm-internal.lisp (show-all-children): Do not raise a
1422 child by default => far less flickering.
1424 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
1426 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
1428 * src/menu-def.lisp: Change key binding for the CLFSWM menu
1431 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
1432 is nil. (workaround on some CLX implementation).
1434 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
1436 * src/menu-def.lisp: Add a menu to set a focus policy for all
1439 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
1440 (all-frames-set-*-focus-policy): Set a focus policy for all
1443 * src/clfswm.lisp (handle-enter-notify): sloppy-select
1444 mode. Select a child and its parents on mouse over.
1446 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
1448 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
1449 policy -> Sloppy focus only for windows in the current frame.
1450 (main-unprotected): Exit clfswm on init error (ie: when another
1451 window manager is running).
1453 * src/clfswm-util.lisp (reset-clfswm): New function.
1455 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
1457 * src/clfswm-menu.lisp (init-menu): New function.
1459 * src/clfswm-util.lisp (reload-clfswm): New function to reload
1461 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
1463 * src/clfswm.lisp (main, main-unprotected): Handle error in a
1464 superior main function. Now CLFSWM can't break the X session. It
1465 just reinitialize the display and run a new main loop.
1467 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
1468 *vt-keyboard-on* global to avoid warnings when loading clfswm.
1470 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
1471 (help-on-gimp-layout): Describe how to use the GIMP layout.
1473 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
1475 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
1476 main-window-right-layout. Change the keybinding for (shift)alt+tab
1477 to not select windows in the main window lisst.
1478 Bind F8 to add a window in the main window list.
1479 Bind F9 to remove a window in the main window list.
1480 Change the focus policy to :sloppy.
1481 (set-previous-layout): Restore the previous layout, keybinding and
1484 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
1486 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
1488 * src/clfswm-layout.lisp (main-window-left-layout)
1489 (main-window-bottom-layout, main-window-top-layout): New
1491 Factorize layouts in menu.
1493 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
1495 * src/clfswm-layout.lisp (main-window-right-layout): A possible
1496 GIMP layout: one or more main windows on one side of the
1497 frame. Others on the other size.
1499 * src/clfswm-util.lisp
1500 (current-frame-set-click/sloppy-focus-policy): Each frame can have
1501 a different focus policy (one of :click or :sloppy).
1502 The default focus policy is set with *default-focus-policy*.
1504 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
1506 * src/clfswm-info.lisp (show-config-variable): New function.
1508 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
1510 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
1512 * src/clfswm-info.lisp: Colored help for key binding and corners
1515 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
1517 * src/clfswm-util.lisp (delete-focus-window)
1518 (destroy-focus-window): Remove chid only in
1519 handle-unmap/destroy-notify. Focus *current-root* only when
1520 closing/killing the current child.
1522 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
1523 functions or corners.
1525 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1527 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
1528 action: Hide/Unhide a terminal on mouse corner action. (By default
1529 right mouse button on the top left corner).
1531 * src/config.lisp (*never-managed-window-list*): New config
1534 * src/clfswm-internal.lisp (never-managed-window-p): New function:
1535 Handle never managed window in a more simple way.
1537 * src/clfswm-corner.lisp: New file and new and more simple method
1538 to define corners actions.
1540 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
1542 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
1544 * src/clfswm-layout.lisp (fast-layout-switch)
1545 (define-fast-layout-switch): New functions: Switch between two
1548 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
1549 really in the second mode. So leave-second-mode can be used even
1552 * src/clfswm-util.lisp (switch-to-last-child): New function:
1553 Store the current child and switch to the previous one.
1555 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1557 * src/clfswm-util.lisp (display-current-window-info): Display the
1559 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
1560 (top right by default). By default 'xvkbd' is used.
1562 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1564 * src/xlib-util.lisp (move-window, resize-window): Compress motion
1567 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
1569 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
1572 * src/clfswm-info.lisp (info-mode): Compress motion events.
1574 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
1576 * src/clfswm-internal.lisp (show-all-children): Compute geometry
1577 and selection first and then show only necessary children.
1578 (show-child): remove unneeded display-p parameter.
1580 * src/config.lisp (get-fullscreen-size): Place the frame border
1581 outside the screen (this prevent the loose of 2 pixels per
1584 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
1586 * src/clfswm-internal.lisp (focus-child): Algorithm change to
1587 raise only the selected child.
1589 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
1591 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
1592 Raise only viewable children.
1594 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
1596 * src/clfswm-internal.lisp (show-all-children): Always raise all
1597 displayed children. Remove all references to raise-p.
1599 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1601 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
1604 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
1605 second mode binding on raise/lower child in its frame.
1607 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
1608 behaviour to the new raise/lower property.
1609 Call clear-nw-hook before the rest of the hook.
1611 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
1612 (mouse-click-to-focus-and-resize-window): Stop button event. This
1613 prevent a keyboard/pointer freeze.
1615 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1617 * src/clfswm-internal.lisp (frame-lower-child)
1618 (frame-raise-child): New functions to raise/lower a child in its
1621 * src/clfswm-util.lisp (have-to-present-windows)
1622 (have-to-present-all-windows): New functions to have an MaxOS
1623 expose like on mouse click in screen corner.
1625 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
1627 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
1629 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
1630 child from a choice in all frames with hidden children.
1632 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
1634 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
1636 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
1637 (unhide-all-children): New functions.
1639 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
1642 * src/clfswm-util.lisp (hide/show-frame-window): new function and
1645 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
1647 * src/clfswm-util.lisp (rename-current-child): Do not display the
1648 frame info for a window.
1650 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
1652 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
1653 frame window for the removed child and its children.
1655 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
1657 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
1660 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
1662 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
1663 the ROX pinboard (ie: leave it lowered in the root window as
1666 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
1667 (tile-left-layout, tile-right-layout, tile-top-layout)
1668 (tile-bottom-layout): Use all the frame space when there is only
1671 * src/clfswm-internal.lisp (place-window-from-hints): Center
1672 unmanaged windows in the root screen.
1674 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
1677 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1679 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
1680 typo in managed types.
1682 * src/clfswm-internal.lisp (show-child): Always display frame info
1683 even if the frame is hidden.
1685 * src/xlib-util.lisp (resize-window): Use a better algorithme to
1688 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1690 * src/clfswm-util.lisp (with-movement): Display frame info for all
1691 frames in current root.
1693 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1695 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
1697 * src/bindings-second-mode.lisp (define-second-key #\a): New
1698 binding on 'add-default-frame'.
1700 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1701 message to follow the autodocumentation process.
1703 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1705 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1706 "Space" to jump to a child. "B" to bind a slot on the current
1709 * src/bindings-second-mode.lisp: Use "Tab" instead of
1712 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
1714 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1715 unmanaged (hidden) windows.
1717 * src/clfswm-internal.lisp (place-window-from-hints): Give a
1718 minimal size for windows.
1719 (with-all-windows-frames-and-parent): New function.
1721 * src/config.lisp (*default-window-width/height*): New parameters.
1723 * src/clfswm-internal.lisp (place-window-from-hints): Center
1724 windows in the screen instead of in their frame.
1726 * src/bindings-second-mode.lisp (tile-space-current-frame): New
1729 * src/clfswm-layout.lisp (register-layout): Intern the once name
1730 in the right package.
1732 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1734 * doc/dot-clfswmrc: Update to follow the new clfswm way.
1736 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
1738 * src/clfswm-internal.lisp (set-current-child)
1739 (adapt-child-to-parent, show-child, hide-child): Handle the case
1740 where child is not a frame or a window.
1742 * src/clfswm-util.lisp
1743 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1744 Check if child is a frame.
1746 * src/clfswm-internal.lisp (managed-window-p): Handle the case
1747 where frame is null.
1748 (place-frame): Check if frame and parent are frames.
1750 * src/clfswm-info.lisp (info-mode): display all frame info before
1753 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1754 info before leaving.
1756 * src/clfswm-internal.lisp (display-all-frame-info): New function.
1758 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
1760 * src/tools.lisp (getenv): Implemented for ECL.
1761 (urun-prog): Implemented for ECL.
1763 * src/clfswm-util.lisp (identify-key): Use a double buffer to
1766 * src/clfswm-query.lisp (query-string): Use a double buffer to
1769 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1772 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1775 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
1777 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1779 * src/menu-def.lisp: New file: move all menu definition in
1782 * src/clfswm-layout.lisp (register-layout): Use a function instead
1785 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
1787 * src/clfswm-autodoc.lisp (produce-menu-doc,
1788 (produce-menu-doc-html): New functions.
1789 (produce-doc-*): Moved to clfswm-autodoc.lisp.
1791 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1792 paste a child on one of its own children. (this prevent a
1794 (move-child-to): Rename move/copy-current-child-by to
1796 (mouse-move-window-over-frame): New function to move the window
1797 under the mouse cursor to another frame.
1799 * src/clfswm-internal.lisp (find-child-in-parent): New function.
1801 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1803 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1804 windows only when its window parent is the current child.
1806 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1808 * src/clfswm-util.lisp (manage-current-window)
1809 (unmanage-current-window): New functions: Allow to force to manage
1810 or unmanage a window by its parent frame.
1812 * src/bindings-second-mode.lisp (#\o): binded to
1813 set-open-in-new-frame-in-parent-frame-nw-hook and
1814 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1816 * src/clfswm-util.lisp (with-current-window): New macro.
1818 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1819 exposure and enter-window handle event.
1821 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1822 children for the current child after the move/resize.
1824 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1826 * src/xlib-util.lisp (resize-window): Take care of window size
1829 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1830 move/resize unmanaged windows.
1832 * src/xlib-util.lisp (move-window, resize-window): New functions.
1834 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1836 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1837 user choose what window type the current frame must handle.
1838 (display-current-window-info): New function.
1839 (current-frame-manage-all-window-type)
1840 (current-frame-manage-only-normal-window-type)
1841 (current-frame-manage-no-window-type): New functions.
1843 * src/clfswm-internal.lisp (managed-window-p): New function.
1845 * src/package.lisp (frame): Managed type: new frame
1846 parameter. This allow to choose what window type a frame must
1849 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1851 * src/clfswm-nw-hooks.lisp
1852 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1854 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1857 * src/tools.lisp (ensure-printable): Return always a string even
1860 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
1862 * src/config.lisp (*default-nw-hook*): New variable to change the
1863 default new window hook.
1865 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1867 * clfswm.asd (clfswm): Add a dependency from
1868 clfswm-second-mode.lisp to clfswm.lisp.
1870 * src/clfswm-util.lisp (identify-key): Show the documentation for
1871 the function bound on a key.
1872 (with-movement): Move with-movement,
1873 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
1874 to clfswm-util.lisp.
1876 * src/clfswm-menu.lisp: New menu system that let user change keys
1877 or functions associated to keys.
1879 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
1881 * src/clfswm-internal.lisp (show-all-children): Display-child is
1882 the first child by default. Solve a bug with father-p.
1884 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
1886 * src/clfswm-internal.lisp (add-frame): Add frame return the
1888 (show-all-children): Move the size computation outside the
1891 * src/bindings-second-mode.lisp (with-movement): Redisplay only
1894 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1895 only the current child.
1897 * src/clfswm-internal.lisp (show-all-children): New display-child
1898 parameter to display only the desired child and its children.
1899 (select-next/previous-child): Only display the current child.
1901 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
1903 * src/clfswm.lisp (init-display): Move the default frame creation
1904 on the default init hook.
1906 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1907 the main mode (for example: "1" on an azerty keyboard).
1909 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
1911 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1912 keysyms. Revert to old grabbing method for the main mode.
1914 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
1916 * src/clfswm.lisp (init-display): Add key handling on no focus
1917 window and on frame windows.
1919 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1921 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1922 all keys by default and replay just what is needed. No change for
1925 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1926 (find-key-from-code): Test for shift and not shift presence.
1928 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
1930 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1931 new key parameter to have less flickering.
1933 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
1935 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1936 layout only one time and revert to no-layout to freely handle
1939 * src/clfswm-nw-hooks.lisp
1940 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1941 with new created window.
1943 * src/clfswm-layout.lisp (register-layout): Now register
1944 automatically a once layout to set the layout only one time and
1945 revert to no-layout to freely handle frames.
1947 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1949 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1950 nw-hook: Open the next window in the current frame and leave the
1951 focus to the current child.
1953 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
1955 * src/bindings-second-mode.lisp: Add keys definitions to
1956 bind-or-jump in the second mode.
1958 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
1959 macro for bind-or-jump-(1|2|3...).
1961 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
1962 arguments to function. This allow to do things like:
1963 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
1964 are passed to my-function on key press.
1966 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
1968 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
1970 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
1972 * src/clfswm-internal.lisp (child-fullname): New function
1974 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
1975 docstring in info-mode-menu. An item can be
1976 '((key function) (key function)) or with docstring
1977 '((key function "documentation 1") (key function "bla bla") (key function))
1979 * src/tools.lisp (ensure-n-elems): New function.
1981 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
1982 resize a frame or the window's father.
1984 * src/clfswm.lisp (init-display): Remove tile-space-layout by
1985 default on the root frame.
1987 * src/clfswm-util.lisp (move/resize-frame): Add standard event
1988 hooks handlers (map-request, configure-notify...)
1990 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
1993 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1995 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
1996 or the window's father.
1998 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
1999 event only if there is a geometry change.
2000 (mouse-focus-move/resize-generic): Generic function to move or
2001 resize a frame or a window father frame.
2003 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
2005 * src/clfswm-internal.lisp (show-all-children): Return t if there
2006 is a geometry change.
2008 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
2010 * src/bindings.lisp (Up/Down): Swap select previous/next level.
2012 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
2014 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
2016 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
2017 (with-all-*): Reverse the child list to manage the first child last (like in
2020 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
2021 root window only if true.
2023 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
2024 root window only if *create-frame-on-root* is true.
2026 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
2029 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
2031 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
2032 the current child (even if it's a window).
2034 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
2036 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
2037 (mouse-click-to-focus-and-resize): New functions.
2039 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
2040 (*-px->fl): Convert pixel coordinates to float.
2042 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
2044 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
2046 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
2049 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
2050 and hide-all-children.
2051 (raise-if-needed): New function.
2052 (show-child): Use a first-p parameter to raise windows only when they are
2055 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
2057 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
2060 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
2062 * src/clfswm-info.lisp (keys-from-list): new function.
2064 * src/*: rename 'childs' in 'children'.
2066 * src/*: rename 'group' in 'frame'.
2068 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
2070 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
2072 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
2074 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
2076 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
2078 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
2079 Bind control+o to open the next window in a new group in the root group
2080 (as open in next window in a new workspace in 0801 version).
2082 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
2084 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
2087 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
2089 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
2090 instead of Tab for select-previous-child.
2092 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
2094 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
2097 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
2099 * clfswm-util.lisp (identify-key): Display the documentation
2100 associated to keys when identifying a key.
2102 2008-03-10 Xavier Maillard <xma@gnu.org>
2104 * contrib/clfswm: Complete rewrite of the script. Detect error and
2105 act accordingly. Add command line arguments to configure the
2106 script execution. User can now choose different common lisp
2107 implementation (clisp and sbcl only), choose where to store the
2108 dumped image, where to find clfswm source.
2110 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
2112 * clfswm-internal.lisp (process-new-window): Beginning of new
2113 window hook: each group have a hook to tell what he wants to do
2114 with the new created window.
2116 2008-03-08 Xavier Maillard <xma@gnu.org>
2118 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
2119 call the resulting executable.
2121 * clfswm.lisp (read-conf-file): Check for the user config file in
2122 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
2123 prefered whenever possible.
2125 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
2127 * clfswm-layout.lisp (*-layout): Add an optional raise-p
2128 parameter in each layout.
2130 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2132 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
2134 (copy/move-current-child-by-name/number): new functions
2135 (focus-group-by-name/number): new functions
2136 (delete-group-by-name/number): new functions
2138 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2140 * ************************************************************ *
2141 *: Major update - No more reference to workspaces. The main *
2142 structure is a tree of groups or application windows. *
2143 * ************************************************************ *
2145 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
2147 * clfswm.lisp (read-conf-file): Read configuration in
2148 $HOME/.clfswmrc or in /etc/clfswmrc or in
2149 $XDG_CONFIG_HOME/clfswm/clfswmrc.
2150 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
2153 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
2155 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
2158 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
2160 * clfswm-internal.lisp (find-window-group): New function.
2162 * clfswm*: Change to make clfswm run with clisp/new-clx.
2164 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
2166 * clfswm-util.lisp (query-show-paren): Add show parent matching in
2168 (query-string): Bind control+k to delete end of line.
2170 * clfswm-second-mode.lisp (draw-second-mode-window): Display
2171 the action on mouse motion in second mode.
2173 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
2174 event but do not clear the root window.
2175 (handle-configure-request): Adjust unmanaged window from their
2178 * clfswm-internal.lisp (process-new-window): Adjust new window
2179 with the specified hints (max/min/base width/height).
2181 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
2183 * clfswm.lisp (handle-configure-request): Send an Configuration
2184 Notify event. This solve a bug with xterm and rxvt who takes some
2185 times to be mapped. Now there is no delay.
2187 * bindings-second-mode.lisp (define-shell): Run programs after
2188 living the second mode.
2190 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
2192 * clfswm-internal.lisp (process-new-window): Do not crop transient
2193 window to group size.
2194 (adapt-window-to-group): Do not crop transient window to group
2197 * clfswm.lisp (handle-configure-request): Adapt just the window to
2198 its group and don't take care of the configure request. Remove the
2199 bug with the Gimp outside the group and speed up the window
2201 (handle-exposure): Remove show-all-group on exposure event
2204 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
2206 * clfswm-util.lisp (circulate-group-up-copy-window)
2207 (circulate-group-down-copy-window)
2208 (circulate-workspace-up-copy-group)
2209 (circulate-workspace-down-copy-group): Prevent the copy of the
2210 same window in the same workspace.
2212 * bindings-second-mode.lisp (release-copy-selected-window)
2213 (release-copy-selected-group): Prevent the copy of the same window
2214 in the same workspace.
2216 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
2217 (generic-pager-move-window-on-next-line): Remove the copy
2219 (generic-pager-move-group-on-next-workspace)
2220 (generic-pager-move-group-on-previous-workspace): Prevent the copy
2221 of the same window in the same workspace.
2223 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
2224 (mouse-pager-copy-selected-group-release): Prevent the copy of the
2225 same window in the same workspace.
2227 * tools.lisp (setf/=): new macro to set a variable only when
2230 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
2231 x, y... only when necessary.
2233 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
2235 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
2236 new function and hook: force windows to stay in its group (solve a
2239 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
2241 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
2242 less flickering when moving/resizing groups.
2244 * clfswm-internal.lisp (hide-group): new function.
2245 (show-all-group): clear-all: new parameter.
2247 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
2249 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
2251 * clfswm*: Color change for the pager. Typo or better description
2252 in bindings definitions. Define bindings for a qwerty keyboard by
2253 default. dot-clfswmrc show examples to switch to an azerty
2255 License change to GPL v3.
2256 * config.lisp: new file - group all globals variables in this
2259 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
2261 * xlib-util.lisp (hide-window): Remove structure-notivy events
2262 when hidding a window.
2264 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
2266 * package.lisp (*sm-property-notify-hook*): Readded
2267 property-notify-hook in second mode.
2269 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
2271 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
2273 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
2275 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
2276 Tile the current workspace with the current window on one side and
2277 others on the other (this emulate the larswm, dwm, wmii way). See
2278 the default configuration file to enable this mode by default.
2280 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
2283 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
2285 * clfswm-pager.lisp (pager-draw-window-in-group): Add
2286 ensure-printable to print windows name even with non-ascii
2289 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
2291 * clfswm-pager.lisp (pager-explode-current-group): Create a new
2292 group for each window in group.
2293 (pager-implode-current-group): Move all windows in workspace to
2294 one group and remove other groups.
2296 * clfswm-pack.lisp (explode-group): Create a new group for each
2298 (implode-group): Move all windows in workspace to one group and
2299 remove other groups.
2301 * clfswm-util.lisp (identify-key): Remove local configuration
2302 variables and made them available for configuration from
2304 (query-string): idem.
2306 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
2308 * netwm-util.lisp: Start of NetWM compliance.
2309 Add a Netwm client list gestion.
2311 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
2313 * clfswm-internal.lisp (create-group-on-request): open a new group
2314 only when the current group is not empty.
2316 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
2317 bug with null workspace.
2319 * clfswm-pager.lisp (pager-handle-event): Add a hook
2320 system. This hooks can be changed in the user configuration file.
2322 * package.lisp: All colors and font variables are set in
2323 package.lisp and can be configured in the user configuration
2325 Note: If you have configured some less ugly colors (esp. for the
2326 pager) don't hesitate to let me know :)
2328 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
2329 system. This hooks can be changed in the user configuration file.
2331 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
2332 changed in the user configuration file (~/.clfswmrc)
2334 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
2336 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
2337 arrow action, open next window in new workspace/group.
2339 * bindings.lisp (stop-all-pending-actions): new binding.
2340 (open-next-window-in-new-group-once): Open the next windows in a
2341 new group (only once) or open all new windows in a new group (like
2342 others windows managers).
2344 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
2346 * clfswm.lisp (read-conf-file): New function to read a lisp
2347 configuration file at startup.
2348 (focus-group-under-mouse): Check if group isn't the current group
2349 ( prevent a bug with unclutter ).
2351 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
2353 * bindings.lisp (run-program-from-query-string): A program can be
2354 launch from a input query window.
2356 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
2358 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
2360 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
2362 * clfswm.lisp (process-new-window): One can now open the next
2363 window in a workspace called by its number.
2365 * clfswm-util.lisp (query-font-string): Minimal editing
2367 (eval-from-string): And an REPL in the window manager... :)
2369 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2371 * clfswm.lisp (process-new-window): One can now open the next
2372 window in a new workspace or a new group.
2374 * clfswm-pager.lisp (pager-mode): Display the next arrow action
2375 with the hidden windows.
2377 * clfswm.lisp (second-key-mode): Display the current workspace
2378 number and the next arrow action in the state window.
2380 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
2381 the pager mode and then redisplay only the current workspace.
2383 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
2385 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
2386 they can be focused with a keypress, sorted or renumbered.
2388 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2390 * clfswm-pager.lisp (pager-mode): Remove multiple silly
2391 pager-draw-display. This prevent a lot of flickering in the
2394 * clfswm.lisp: Remove all display-force-output and replace them
2395 with only one display-finish-output in the event loop.
2397 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
2399 * clfswm-pager.lisp (pager-center-group): New function - center a
2400 group at the middle of the screen.
2402 * clfswm-pack.lisp (center-group): New function - center a group
2403 at the middle of the screen.
2405 * clfswm.lisp (show-group): Add a cross line under the group.
2406 (show-group): Group are showned even if fullscreened.
2407 (init-display): Add an exposure event on the root window.
2409 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
2411 * package.lisp (*default-group*): Default group is the same size
2412 of a fullscreened group.
2414 * bindings*: Use shift to move, control+shift to copy.
2416 * *.lisp: Add comments for configuration or alternatives. So grep
2417 for CONFIG to see where you can configure clfswm. And grep for
2418 Alternative to use some commented code.
2420 * clfswm.lisp (second-key-mode): Use a single window to show the
2421 second mode. See for alternatives at the end of this file.
2423 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
2425 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
2426 macro of key and mouse definitions.
2427 (define-define-key/mouse): Use state instead of modifiers list
2428 this fix a bug when the modifiers list is not in the rigth order.
2430 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
2432 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
2434 * clfswm-info.lisp (info-mode): Add an info mode.
2436 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
2438 * clfswm.lisp (process-new-window): Change border size for
2440 (show-all-windows-in-workspace): Unhide all windows even when the
2441 current group is in fullscreen mode.
2443 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
2445 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
2446 redisplay the identify window after a terminal switch.
2448 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
2449 redisplay the pager after a terminal switch.
2451 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
2453 * clfswm-util.lisp (identify-key): Add a window to display
2454 the keys to identify on screen.
2456 * bindings.lisp, bindings-pager.lisp: Define same keys to
2457 move/copy groups/windows in second mode and in pager.
2459 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
2461 (show-all-windows-in-workspace): unhide window before adapting it
2464 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
2466 * clfswm.lisp (handle-event): Revert to an older version.
2468 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
2470 * clfswm-util.lisp (force-window-in-group)
2471 (force-window-center-in-group): New functions for transient windows.
2473 * clfswm-pager.lisp (pager-remove-current-workspace/group):
2474 bugfix: hide all windows before removing group or workspace.
2476 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
2478 * bindings-pager.lisp (mouse-pager-move-selected-group)
2479 (mouse-pager-copy-selected-group)
2480 (mouse-pager-move-selected-window)
2481 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
2482 (mouse-pager-rotate-window-down): New functions to have mouse in
2485 * clfswm-pager.lisp (pager-swap-window)
2486 (pager-copy-group-on-next/previous-workspace)
2487 (pager-copy-window-on-next/previous-line): New functions
2489 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
2491 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
2492 (pager-move-group-on-next/previous-workspace): new functions.
2494 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
2495 to its half size (new functions).
2497 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
2499 * clfswm-pager.lisp: workspaces, groups and windows can now be
2500 selectionned with the keyboard or the mouse.
2502 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
2504 * clfswm-pager.lisp (pager-select-workspace-right/left):
2505 workspaces can now be selectionned with the keyboard.
2507 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
2509 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
2510 new function to remove a previous defined key or mouse combination.
2512 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
2514 * clfswm.lisp (main): Check for access error in init-display.
2516 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
2517 keycode before grabbing.
2519 * bindings.lisp: Remove nlambda and use defun to keep the function
2520 documentation with clisp.
2521 (define-shell): new macro to define shell command for the second
2524 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
2526 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
2529 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
2531 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
2532 workspace circulation.
2534 * clfswm-util.lisp (absorb-orphan-window): new function.
2536 * clfswm-keys.lisp: Keysyms support.
2538 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
2540 * clfswm.lisp (show-group): Use one gc for all groups and not one
2543 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
2545 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
2547 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
2548 width and height outside group.
2550 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
2552 * clfswm.lisp: First public release.