1 2012-08-20 Philippe Brochard <pbrochard@common-lisp.net>
3 * src/clfswm-internal.lisp (add-in-never-managed-window-list): New
6 2012-08-20 Philipp Kroos <philipp.kroos@t-online.de>
8 * src/clfswm-placement.lisp (here-placement): Evaluates to current
11 2012-08-20 Philipp Kroos <philipp.kroos@t-online.de>
13 * contrib/toolbar.lisp: Add an expose-mode-button-module.
15 2012-08-19 Philippe Brochard <pbrochard@common-lisp.net>
17 * contrib/toolbar.lisp (remove-toolbar): New function.
19 2012-08-18 Philippe Brochard <pbrochard@common-lisp.net>
21 * contrib/toolbar.lisp: Add configurable colors in toolbar
24 2012-08-16 Philippe Brochard <pbrochard@common-lisp.net>
26 * src/tools.lisp: Factorize system usage information collection.
27 (start-system-poll): Use a lock file instead of a local variable.
29 * contrib/toolbar.lisp: Add memory, cpu and battery usage module
30 with a poll methode. More responsive but up to date every 10s by
33 2012-08-15 Philippe Brochard <pbrochard@common-lisp.net>
35 * contrib/toolbar.lisp: Add a clickable label module for toolbar.
36 Add a clickable entry to open the CLFSWM main menu.
37 Add memory, cpu and battery usage module.
39 * src/clfswm-menu.lisp (open-menu): Prevent to reopen an opened
40 menu. Fixe a but with negative selected-item.
42 2012-08-14 Philippe Brochard <pbrochard@common-lisp.net>
44 * src/clfswm-util.lisp (eval-from-query-string): Show a notify
45 window when updating symobls list for REPL completion.
46 (show-current-root): New function and configuration menu to
47 display a message on the current root.
49 * contrib/toolbar.lisp: Add arguments in toolbar modules.
51 * src/xlib-util.lisp (event-hook-name): Intern hook name symbol
54 2012-08-13 Philippe Brochard <pbrochard@common-lisp.net>
56 * contrib/toolbar.lisp (toolbar-module-text): Print a formatted
57 text at module position centered in toolbar.
59 * src/xlib-util.lisp (optimize-event-hook): Remove unused event
62 2012-08-12 Philippe Brochard <pbrochard@common-lisp.net>
64 * contrib/toolbar.lisp: End of toolbar framework.
65 (list-toolbar-modules): Add a list toolbar modules function.
67 2012-08-03 Philippe Brochard <pbrochard@common-lisp.net>
69 * src/clfswm-internal.lisp (show-child): Show unmanaged windows
70 on (maybe) current child in all roots.
72 * src/clfswm-util.lisp (find-child-under-mouse-in-child-tree):
73 Handle children from all roots instead of from *root-frame*.
75 2012-07-23 Philippe Brochard <pbrochard@common-lisp.net>
77 * src/clfswm-expose-mode.lisp: New expose mode based on standard
80 2012-06-27 Philippe Brochard <pbrochard@common-lisp.net>
82 * src/clfswm-util.lisp (eval-from-query-string): Add completion
83 for eval for query string.
85 2012-06-26 Philippe Brochard <pbrochard@common-lisp.net>
87 * src/clfswm-query.lisp: Add completion for shell commands.
89 2012-06-18 Philippe Brochard <pbrochard@common-lisp.net>
91 * src/clfswm-placement.lisp: Each child can have its own border
92 size. New binding to change the child border size on the fly.
94 2012-06-08 Philippe Brochard <pbrochard@common-lisp.net>
96 * src/tools.lisp (process-timers): Call get-internal-real-time
97 only once for all times.
99 2012-06-07 Philippe Brochard <pbrochard@common-lisp.net>
101 * contrib/toolbar.lisp (define-toolbar-hooks): Add auto-hide
103 (define-toolbar-hooks): Add auto-hide toolbar (show/hide on mouse
106 2012-06-06 Philippe Brochard <pbrochard@common-lisp.net>
108 * src/xlib-util.lisp (handle-event): Add an additional hook event
109 system to handle events in contrib code.
111 2012-06-03 Philippe Brochard <pbrochard@common-lisp.net>
113 * src/clfswm-placement.lisp: Add an optional border size in all
116 2012-05-30 Philippe Brochard <pbrochard@common-lisp.net>
118 * contrib/toolbar.lisp (clock): Add a clock module.
120 2012-05-28 Philippe Brochard <pbrochard@common-lisp.net>
122 * contrib/toolbar.lisp: begining of toolbar support.
124 2012-05-24 Philippe Brochard <pbrochard@common-lisp.net>
126 * src/clfswm-internal.lisp (rotate-root-geometry): Do not use
127 rotatef but a simpler algorithm.
129 2012-05-19 Philippe Brochard <pbrochard@common-lisp.net>
131 * src/clfswm-placement.lisp: Adjust width and height in child and
132 root placement to prevent too big child size.
134 2012-05-18 Philippe Brochard <pbrochard@common-lisp.net>
136 * src/clfswm-placement.lisp: New root placement possibility.
138 * src/clfswm-util.lisp (change-current-root-geometry): New
141 2012-05-17 Philippe Brochard <pbrochard@common-lisp.net>
143 * src/clfswm-util.lisp (exchange-root-geometry-with-mouse): New
146 2012-05-16 Philippe Brochard <pbrochard@common-lisp.net>
148 * src/menu-def.lisp: New root menu.
150 2012-05-15 Philippe Brochard <pbrochard@common-lisp.net>
152 * src/clfswm-circulate-mode.lisp (rotate-root-geometry-next)
153 (rotate-root-geometry-previous): New second mode binding to change
156 2012-05-13 Philippe Brochard <pbrochard@common-lisp.net>
158 * src/clfswm-internal.lisp: Remove the *current-child* variable
159 and use a setfable function (current-child) instead.
160 (current-child-setter): Store root current child before apllying
161 current child change.
163 2012-05-09 Philippe Brochard <pbrochard@common-lisp.net>
165 * src/clfswm-internal.lisp: Use xdpyinfo/xinerama informations
166 instead of xrandr informations.
168 2012-05-06 Philippe Brochard <pbrochard@common-lisp.net>
170 * src/clfswm-internal.lisp : Use only one list for root
172 (*root*): Root management API simplification.
174 2012-04-30 Philippe Brochard <pbrochard@common-lisp.net>
176 * src/clfswm-internal.lisp: Big change to replace *current-root*
177 variable to support multiple root.
179 2012-04-18 Philippe Brochard <pbrochard@common-lisp.net>
181 * src/tools.lisp (add-new-hook, add-hook): New macro. Do not
182 duplicate hooks by default. Use add-new-hook if you want to
185 2012-04-16 Philippe Brochard <pbrochard@common-lisp.net>
187 * src/clfswm-corner.lisp (wait-window-in-query-tree): Add a limit
188 of try to wait the command window.
190 2012-02-25 Philippe Brochard <pbrochard@common-lisp.net>
192 * src/clfswm-util.lisp (place-frames-from-xrandr)
193 (swap-frame-geometry, rotate-frame-geometry): New helper functions
194 for multiple physical screen.
195 (jump-to-slot, add-frame-in-parent-frame): Change *current-root*
198 2012-01-18 Philippe Brochard <pbrochard@common-lisp.net>
200 * src/*.lisp: Use create-symbol and create-symbol-in-package
201 instead of the shorter symb. (Thanks Aad Versteden).
203 * src/bindings-second-mode.lisp (set-default-second-keys): New
204 key binding to set window and frame transparency.
206 * src/bindings.lisp (set-default-main-mouse): New mouse binding to
207 set window and frame transparency.
209 * src/clfswm-keys.lisp (define-keys): New macro to ease multiple
210 keys definitions. (Thanks Valentin Plechinger for the request).
212 * src/*.lisp: Add full transparency support with xcompmgr.
214 2012-01-14 Philippe Brochard <pbrochard@common-lisp.net>
216 * src/*.lisp: Add transparency support.
218 2012-01-09 Ales Guzik <ales.guzik@gmail.com>
220 * src/clfswm-layout.lisp (tile-layout-mix): New layout to
221 automatically choose between vertival and horizontal tile layout.
222 (tile-space-layout): Fix to have space between screen border and
223 frame the same as between frames.
225 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
227 * load.lisp: Support clisp 2.49+ module system to load CLX.
229 2012-01-04 Ales Guzik <ales.guzik@gmail.com>
231 * src/clfswm-layout.lisp (update-layout-managed-children-keep-position):
232 Fix an inattention error.
234 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
236 * src/xlib-util.lisp (with-xlib-protect): Protect from
237 xlib:lookup-error. This prevent an error in clisp/new-clx when
238 sometimes an xlib:colormap is expected instead of an xlib:window.
240 2012-01-03 Philippe Brochard <pbrochard@common-lisp.net>
242 * src/xlib-util.lisp (handle-event): Fix a clisp/new-clx error
243 when sometimes window slot of event-slots is a pixmap instead of a
246 2011-12-26 Philippe Brochard <pbrochard@common-lisp.net>
248 * src/clfswm-query.lisp: Fill the history list with a non-nil
251 2011-12-25 Philippe Brochard <pbrochard@common-lisp.net>
253 * src/package.lisp (make-x-drawable): Drawable wrapper to prevent
254 type error in some CLX versions.
255 Replace xlib:drawable-* functions with x-drawable-* equivalents
257 2011-12-14 Philippe Brochard <pbrochard@common-lisp.net>
259 * src/clfswm-util.lisp (um-create-xdg-section-list): Add at least
260 the 'Utility menu entry.
262 * src/config.lisp (*xdg-section-list*): moved to config.lisp.
264 * src/clfswm-util.lisp (update-menus): Set a default value for
265 searching .desktop files when XDG_DATA_DIRS is not set.
267 2011-10-15 Philippe Brochard <pbrochard@common-lisp.net>
269 * src/clfswm-internal.lisp (place-window-from-hints): Use
270 with-placement macro to place unmanaged windows in an arbitrary
273 2011-06-16 Philippe Brochard <pbrochard@common-lisp.net>
275 * src/clfswm-internal.lisp (clean-windows-in-all-frames): Prevent
276 current root and current child being equal to child.
278 2011-06-13 Philippe Brochard <pbrochard@common-lisp.net>
280 * src/keysyms.lisp: Repeat Page_Down/Up keysym definitions at the
281 end of the file to change keysyms priority.
283 2011-06-13 Sylvain HENRY <hsyl20@gmail.com>
285 * *.*: Minor spelling fix.
287 2011-06-12 Philippe Brochard <pbrochard@common-lisp.net>
289 * src/clfswm.lisp (:unmap-notify, :destroy-notify): Show all
290 children just after the xlib tree cleanup -> reduce the
291 flickering when a window is deleted or destroyed.
293 * src/clfswm-internal.lisp (process-existing-windows): Do not
294 process the notify window.
296 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
298 * *: **** Release 1106 ****
300 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
302 * src/clfswm-internal.lisp (clean-windows-in-all-frames): New
303 function to prevent xlib error when a window is deleted.
305 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
307 * src/clfswm-internal.lisp
308 (delete-child-and-children-in-all-frames): Delete or destroy
309 children before displaying all children.
311 2011-06-05 Philippe Brochard <pbrochard@common-lisp.net>
313 * src/clfswm-util.lisp (add-frame-in-parent-frame): New function
316 2011-06-04 Philippe Brochard <pbrochard@common-lisp.net>
318 * src/clfswm.lisp (main-unprotected): Destroy all frames windows
319 before closing the display (not really needed).
321 2011-06-02 Philippe Brochard <pbrochard@common-lisp.net>
323 * src/clfswm-layout.lisp (inc-tile-layout-size)
324 (dec-tile-layout-size, inc-slow-tile-layout-size)
325 (dec-slow-tile-layout-size): New functions and bindings.
327 2011-06-01 Philippe Brochard <pbrochard@common-lisp.net>
329 * src/clfswm-expose-mode.lisp (define-expose-letter-keys): Add
330 0..1 and A..Z keys to select a child in exposé mode.
332 * src/clfswm-internal.lisp (display-frame-info): Remove hidden
333 infos in frames windows.
335 * src/clfswm-util.lisp (ask-close/kill-current-window): Menu
338 2011-05-30 Philippe Brochard <pbrochard@common-lisp.net>
340 * src/clfswm-internal.lisp (get-parent-layout): Minor fullscreen
343 2011-05-29 Philippe Brochard <pbrochard@common-lisp.net>
345 * src/clfswm-internal.lisp
346 (delete-child-and-children-in-all-frames): Show all children
347 before deleting/destroying a windows, so prevent a flickering.
348 (get-parent-layout): Return the fullscreen size when the current
351 2011-05-28 Philippe Brochard <pbrochard@common-lisp.net>
353 * src/clfswm-internal.lisp (get-parent-layout): Handle correctly
356 * src/clfswm-util.lisp (delete-focus-window-generic): Do not hide
357 child before removing, so prevent a flickering.
359 * src/clfswm-internal.lisp (show-all-children): Rectangular
360 optimization to display only needed children.
361 (show-all-children): Remove flickering on
362 select-next/previous-brother.
364 2011-05-17 Philippe Brochard <pbrochard@common-lisp.net>
366 * src/clfswm-util.lisp (copy-focus-window, cut-focus-window): New
367 functions and ask-close/kill-current-window menu and bindings
370 2011-05-16 Philippe Brochard <pbrochard@common-lisp.net>
372 * src/clfswm-util.lisp (ask-close/kill-current-window): Add an
373 *ask-close/kill-placement* placement window variable.
375 2011-05-09 Philippe Brochard <pbrochard@common-lisp.net>
377 * contrib/osd.lisp (funcall-button-from-code): Display osd
378 documention for buttons and fix some redefining warnings.
380 2011-05-07 Philippe Brochard <pbrochard@common-lisp.net>
382 * src/clfswm-nw-hooks.lisp (make-permanent-nw-hook-frame): New
383 function. Prevent to add or delete a new window hook for this
386 * src/clfswm-layout.lisp (update-layout-managed-children-position):
389 2011-05-06 Philippe Brochard <pbrochard@common-lisp.net>
391 * src/bindings-second-mode.lisp (set-default-second-keys):
392 select-brother-spatial-move-* binding update.
394 * src/clfswm-layout.lisp (tile-left|right|top|bottom-layout): Ask
395 to keep children positions or not.
397 * src/clfswm-internal.lisp (fixe-real-size): Takes care of border
400 * src/clfswm-layout.lisp (update-layout-managed-children): Fix a
401 bug by using the parent frame instead of the current child.
403 * src/clfswm-circulate-mode.lisp
404 (select-brother-generic-spatial-move+right/left/up/down): New
405 function to select a brother from another in a spatial move.
407 2011-04-19 Philippe Brochard <pbrochard@common-lisp.net>
409 * src/clfswm-pack.lisp (move-frame-constrained)
410 (resize-frame-constrained): Use pixels instead of floating
413 2011-04-18 Philippe Brochard <pbrochard@common-lisp.net>
415 * src/clfswm-pack.lisp (resize-frame-constrained): Takes care of
417 (implode-frame, implode-current-frame): New functions. Absorb all
418 frames subchildren in frame. Explode frame opposite.
420 2011-04-17 Philippe Brochard <pbrochard@common-lisp.net>
422 * src/clfswm-pack.lisp (move-frame-constrained)
423 (resize-frame-constrained): New function. Move and resize frame
424 with the mouse constrained by other frame brothers.
426 2011-04-14 Philippe Brochard <pbrochard@common-lisp.net>
428 * src/clfswm-util.lisp (with-movement-select-next-brother)
429 (with-movement-select-previous-brother)
430 (with-movement-select-next-child): Use a simple method (do not
431 enter in the circulate mode) to allow to circulate in all children
434 * src/clfswm-menu.lisp (open-menu): Save info hash table keys
435 instead of deleting newly created keys.
437 2011-03-21 Philippe Brochard <pbrochard@common-lisp.net>
439 * src/clfswm-internal.lisp (x-px->fl, y-px->fl): Takes care of
442 2011-03-20 Philippe Brochard <pbrochard@common-lisp.net>
444 * src/clfswm-info.lisp (show-config-variable): call
445 produce-conf-var-doc.
447 2011-03-18 Philippe Brochard <pbrochard@common-lisp.net>
449 * src/clfswm-autodoc.lisp (produce-conf-var-doc-html): Produce a
450 documentation for all configurable variables in CLFSWM -
453 * src/clfswm-internal.lisp (leave-frame): Hide all children except
456 2011-03-16 Philippe Brochard <pbrochard@common-lisp.net>
458 * src/clfswm-autodoc.lisp (produce-all-docs): Produce a
459 documentation for all configurable variables in CLFSWM.
461 * src/clfswm-layout.lisp (set-gimp-layout): Display a notify
462 window with the help on the GIMP layout.
464 2011-03-12 Philippe Brochard <pbrochard@common-lisp.net>
466 * src/menu-def.lisp: Menu update to prevent cursor keys clash.
468 * clfswm.asd: Change compilation order to prevent undefined
471 * src/clfswm-internal.lisp (show-child(frame)): Handle properly
472 the show-root-frame-p parameter.
474 2011-03-11 Philippe Brochard <pbrochard@common-lisp.net>
476 * src/clfswm-util.lisp (move-frame, resize-frame): Do not move or
477 resize a frame when it's the current root.
479 2011-03-10 Philippe Brochard <pbrochard@common-lisp.net>
481 * src/clfswm-internal.lisp (show-all-children): Handle properly
482 duplicated child in multipe frames.
484 2011-03-09 Philippe Brochard <pbrochard@common-lisp.net>
486 * contrib/volume-mode.lisp (set-default-volume-keys): Add more
487 keybindings (up/down, right/left) to raise/lower the volume.
489 * src/clfswm-layout.lisp: Add a variable border size for frames
492 2011-03-08 Philippe Brochard <pbrochard@common-lisp.net>
494 * src/clfswm-util.lisp (cut-current-child, remove-current-child)
495 (delete-current-child): Hide the current child before doing the
498 * src/clfswm-internal.lisp (show-all-children): Hide windows not
499 in the current root before displaying those in current root.
500 Remove all hide-all unnecessary calls.
502 * src/clfswm-configuration.lisp (save-variables-in-conf-file):
503 Save only variables with a different value than their original
506 2011-03-07 Philippe Brochard <pbrochard@common-lisp.net>
508 * src/clfswm-info.lisp (show-config-variable): Use the new
511 * src/clfswm-autodoc.lisp (produce-configuration-variables): Use
512 the new defconfig method.
514 * src/clfswm-configuration.lisp (create-configuration-menu):
515 Change the config system with a more lispy one and a less string
516 based one: (defconfig name value group doc).
519 2011-03-06 Philippe Brochard <pbrochard@common-lisp.net>
521 * src/clfswm-internal.lisp (show-all-children): Simplify the
523 (show-child): Display an unmanaged window whe it's the current
525 (show-all-children): add the ability to display all child from
526 *root-frame* and hide all those who are not in *current-root*.
527 -> remove hide-all-children when needed.
529 * src/xlib-util.lisp (move-window,resize-window): Add a
530 *color-move-window* border when moving or resizing a window.
532 2011-03-04 Philippe Brochard <pbrochard@common-lisp.net>
534 * src/clfswm-internal.lisp (show-all-children): Perform only one
535 recusion on the clfswm tree: calculate geometry and place child in
538 2011-03-03 Philippe Brochard <pbrochard@common-lisp.net>
540 * src/clfswm-internal.lisp (show-all-children): Rethink of display
541 child order to prevent very annoying flickering.
543 2011-02-27 Philippe Brochard <pbrochard@common-lisp.net>
545 * src/clfswm-util.lisp (query-yes-or-no): New function.
547 * src/clfswm-configuration.lisp (reset-all-config-variables): New
548 function and menu entry.
549 (query-conf-value): Add the ability to leave the field blank to
550 reset the variable to its default value.
552 2011-02-26 Philippe Brochard <pbrochard@common-lisp.net>
554 * src/clfswm-configuration.lisp
555 (add-all-configuration-default-value): Add a default value to
556 configurable variables.
558 2011-02-23 Philippe Brochard <pbrochard@common-lisp.net>
560 * src/clfswm.lisp (main-unprotected): Create the configuration
561 menu only once at startup.
563 2011-02-22 Desmond O. Chang <dochang@gmail.com>
565 * contrib/amixer.lisp: Add a volume mode inspired by the emms
566 volume package. Alsa mixer interface.
568 * contrib/volume-mode.lisp: Add a volume mode inspired by the emms
571 2011-02-22 Desmond O. Chang <dochang@gmail.com>
573 * src/clfswm.lisp (main): Use ASDF:SYSTEM-SOURCE-DIRECTORY instead
574 of *LOAD-TRUENAME*. *LOAD-TRUENAME* is only bound during a call to
575 LOAD. If one eval CLFSWM:MAIN in repl, BASE-DIR will be an empty
576 string. Use ASDF:SYSTEM-SOURCE-DIRECTORY to fix it.
578 2011-02-16 Philippe Brochard <pbrochard@common-lisp.net>
580 * src/clfswm.lisp (main-unprotected): Add a close hook. And close
581 the notify window, the virtual keyboard and the clfswm terminal by
584 2011-02-15 Philippe Brochard <pbrochard@common-lisp.net>
586 * src/clfswm.lisp (main-unprotected): Destroy the notify window
587 before closing the display. This fix a bug when resetting/reloading
590 2011-02-12 Philippe Brochard <pbrochard@common-lisp.net>
592 * src/xlib-util.lisp (equal-wm-class-fun, equal-wm-name-fun)
593 (raise-window-fun, raise-and-focus-window-fun): New functions.
595 * src/config.lisp (*clfswm-terminal-cmd*): Switch from xterm to
597 (*never-managed-window-list*): Structure change to be more
598 flexible. Let the choice to focus, raise and do nothing on never
601 2011-02-09 Philippe Brochard <pbrochard@common-lisp.net>
603 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Take
604 care of never managed windows to move or resize them if the raise
607 * src/clfswm-internal.lisp (in-frame, in-window, in-child): New
610 2011-02-08 Philippe Brochard <pbrochard@common-lisp.net>
612 * src/clfswm.lisp (main-mode): Raise or not unmanaged windows
613 following request in *never-managed-window-list*.
615 2011-02-05 Philippe Brochard <pbrochard@common-lisp.net>
617 * *: **** Release 1102 ****
619 2011-02-05 Desmond O. Chang <dochang@gmail.com>
621 * src/keysyms.lisp: Add extended keysyms from stumpwm.
623 2011-02-01 Desmond O. Chang <dochang@gmail.com>
625 * src/clfswm-util.lisp (run-or-raise): New function (thanks to
628 * src/clfswm-internal.lisp (with-all-*): add a nil block.
630 2011-01-28 Desmond O. Chang <dochang@gmail.com>
632 * src/clfswm-util.lisp (xdg-config-home): XDG_CONFIG_HOME should
633 be $HOME/.config by default.
635 2010-12-29 Philippe Brochard <pbrochard@common-lisp.net>
637 * contrib/osd.lisp (display-doc): Add another method where a
638 CLFSWM native window is used to display the key documentation.
640 2010-12-27 Philippe Brochard <pbrochard@common-lisp.net>
642 * src/xlib-util.lisp (with-xlib-protect): Force to revert to the
645 2010-12-25 Philippe Brochard <pbrochard@common-lisp.net>
647 * src/clfswm-second-mode.lisp (second-key-mode): Call the second
648 mode leave function only when the generic mode was ended.
650 2010-12-08 Philippe Brochard <pbrochard@common-lisp.net>
652 * src/clfswm-second-mode.lisp (sm-leave-function): Do not use
653 *second-mode-program* anymore.
655 2010-12-07 Philippe Brochard <pbrochard@common-lisp.net>
657 * src/clfswm-second-mode.lisp (*second-mode-leave-function*): New
658 variable bound to a function executed (when not null) on second
661 2010-11-14 Philippe Brochard <pbrochard@common-lisp.net>
663 * src/clfswm-util.lisp (find-child-under-mouse): Do not find
666 2010-11-13 Philippe Brochard <pbrochard@common-lisp.net>
668 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
669 Do not display the accel window for unmanaged windows.
671 2010-11-11 Philippe Brochard <pbrochard@common-lisp.net>
673 * src/clfswm-internal.lisp (set-current-root): Handle
674 window-parent in set-current-root.
676 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
677 focus the parent child when the current root is a window.
679 2010-11-09 Philippe Brochard <pbrochard@common-lisp.net>
681 * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
682 New function an bindings.
684 * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
687 2010-11-07 Philippe Brochard <pbrochard@common-lisp.net>
689 * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
690 function to let the user choose to keep child position with
693 * src/clfswm-internal.lisp (remove-frame-data-slot): New
696 2010-11-05 Philippe Brochard <pbrochard@common-lisp.net>
698 * src/clfswm-internal.lisp (frame-select-next-child)
699 (frame-select-previous-child): New functions and bindings. Select
700 the next/previous child in the current frame.
702 2010-10-31 Philippe Brochard <pbrochard@common-lisp.net>
704 * src/clfswm-query.lisp (query-mode-complet): New function: Handle
705 completion in query-mode.
707 2010-10-30 Philippe Brochard <pbrochard@common-lisp.net>
709 * src/clfswm-query.lisp (query-print-string): Handle long lines
712 2010-10-27 Philippe Brochard <pbrochard@common-lisp.net>
714 * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
715 all characters are printable.
717 2010-10-25 Philippe Brochard <pbrochard@common-lisp.net>
719 * contrib/server/server.lisp: Load clfswm client code in the main
720 program and let the user start it with a --client command line
723 * src/package.lisp (*main-entrance-hook*): New hook executed after
724 loading configuration file and before opening the display.
726 2010-10-23 Philippe Brochard <pbrochard@common-lisp.net>
728 * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
730 * src/clfswm-internal.lisp (show-child): Show window only if not
733 * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
734 change modifiers after binding definition.
736 2010-10-21 Philippe Brochard <pbrochard@common-lisp.net>
738 * contrib/osd.lisp: New file: OSD (On Screen Display) for
741 * src/clfswm-menu.lisp (open-menu): Modularise function.
743 2010-10-13 Philippe Brochard <pbrochard@common-lisp.net>
745 * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
746 key binding in main and second mode.
748 2010-10-10 Philippe Brochard <pbrochard@common-lisp.net>
750 * src/clfswm-util.lisp (open-notify-window): Convert hello-window
751 functions to a more generic Notify-window system.
753 * src/tools.lisp (add-timer): Add an id to identify the timer.
755 2010-10-09 Philippe Brochard <pbrochard@common-lisp.net>
757 * src/tools.lisp (erase-timer): New function.
759 * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
760 the hello window. Add Configuration variables.
762 2010-10-08 Philippe Brochard <pbrochard@common-lisp.net>
764 * src/clfswm-util.lisp (): Add an Hello window at startup.
766 * src/tools.lisp (process-timers): Add a timer system.
768 2010-10-07 Philippe Brochard <pbrochard@common-lisp.net>
770 * src/clfswm-query.lisp (add-in-query-string): Handle correctly
773 2010-10-06 Philippe Brochard <pbrochard@common-lisp.net>
775 * src/clfswm-query.lisp (query-print-string): Change cursor color
776 and show parenthesis matching with colors (on match and on
779 2010-10-05 Philippe Brochard <pbrochard@common-lisp.net>
781 * src/clfswm-internal.lisp (show-all-children): Do not raise a
782 child when its parent is hidden.
784 2010-10-02 Philippe Brochard <pbrochard@common-lisp.net>
786 * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
787 possibility to circulate over subchild of the current child.
789 * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
790 (expose-windows-generic): Add an escape-body function to return to
791 the original state on escape key.
793 * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
794 to bind the current child from the configuration file.
796 2010-10-01 Philippe Brochard <pbrochard@common-lisp.net>
798 * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
799 window hook: the frame absorb all new windows that match
800 nw-absorb-test frame data slot.
802 2010-09-30 Philippe Brochard <pbrochard@common-lisp.net>
804 * src/clfswm-expose-mode.lisp (expose-create-window): Show window
805 title in accel window.
807 2010-09-29 Philippe Brochard <pbrochard@common-lisp.net>
809 * configure: Use the Xavier Maillard clfswm script in contrib to
810 build an executable in the standard way.
812 2010-09-26 Philippe Brochard <pbrochard@common-lisp.net>
814 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
815 New functions. Add a window on each child in the expose mode to
818 * src/clfswm-internal.lisp (child-x, child-y, child-width)
819 (child-height): New methods to get real child coordinates.
821 2010-09-25 Philippe Brochard <pbrochard@common-lisp.net>
823 * src/clfswm-layout.lisp (*-layout): Use child-position.
825 * src/clfswm-internal.lisp (child-position): New function.
827 * src/clfswm-expose-mode.lisp (expose-windows-mode)
828 (expose-all-windows-mode): Use a generic mode.
830 * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
831 with handle-event-fun symbols instead of inspecting clfswm
832 internals symbols on each mode change.
834 * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
835 a separate clfswm-expose-mode.lisp file.
837 * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
838 screen size instead of hardcoded test coordinates.
840 2010-09-24 Philippe Brochard <pbrochard@common-lisp.net>
842 * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
843 (speed-mouse-right, speed-mouse-up, speed-mouse-down)
844 (speed-mouse-undo, speed-mouse-first-history): New functions to
845 quickly move the mouse. Implemented for the second mode.
847 2010-09-16 Philippe Brochard <pbrochard@common-lisp.net>
849 * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
850 write permission on $clfswm_asd_path. So anybody can start clfswm
851 even if there is no write permission on the source directory.
853 2010-09-12 Philippe Brochard <pbrochard@common-lisp.net>
855 * contrib/clfswm: Add support to cmucl, ccl and ecl.
857 2010-09-11 Philippe Brochard <pbrochard@common-lisp.net>
859 * src/clfswm-util.lisp (set-hide-unmanaged-window)
860 (set-show-unmanaged-window, set-default-hide-unmanaged-window):
861 New functions and menu entry.
862 (set-globally-hide-unmanaged-window)
863 (set-globally-show-unmanaged-window): New functions and menu
866 * src/clfswm-internal.lisp (hide-unmanager-window-p): New
868 (show-child): Add a data slot on frame to hide or not unmanaged
871 * src/clfswm-corner.lisp (present-clfswm-terminal)
872 (present-virtual-keyboard): Use a function (generic-present-body)
873 instead of a macro (generate-present-body).
875 * src/clfswm-util.lisp (update-menus): List all directories and
876 subdirectories in $XDG_DATA_DIRS/applications.
878 2010-09-10 Philippe Brochard <pbrochard@common-lisp.net>
880 * src/clfswm-corner.lisp (generate-present-body): New macro.
881 (present-clfswm-terminal, present-virtual-keyboard): Use
882 generate-present-body.
884 2010-09-09 Philippe Brochard <pbrochard@common-lisp.net>
886 * src/clfswm-util.lisp (update-menus): Follow XDG specifications
887 instead of the non-portable Debian update-menu.
889 2010-09-07 Philippe Brochard <pbrochard@common-lisp.net>
891 * src/clfswm.lisp (error-handler): New function do handle
892 asynchronous errors and ignore them.
893 (open-display): Install the new error-handler on display.
895 2010-09-05 Philippe Brochard <pbrochard@common-lisp.net>
897 * src/xlib-util.lisp (with-xlib-protect): Add a
898 with-simple-restart on top of body execution.
900 2010-09-04 Philippe Brochard <pbrochard@common-lisp.net>
902 * src/clfswm.lisp (main-loop): Protect all xlib functions with an
905 * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
906 handle-event. Add a with-simple-restart to prevent a
907 clisp/new-lisp infinite loop.
909 2010-08-30 Philippe Brochard <pbrochard@common-lisp.net>
911 * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
912 clfswm terminal working even on xterm title changes.
914 2010-08-29 Philippe Brochard <pbrochard@common-lisp.net>
916 * src/clfswm-util.lisp (run-other-window-manager): Update for
919 * src/tools.lisp (do-execute): New parameter io to change the
922 * src/clfswm-util.lisp (hide-current-child): Prevent from removing
925 * src/clfswm-internal.lisp (child-member): New predicate.
926 (child-remove): New function.
928 * src/*.lisp: Use child-member and child-remove everywhere it's
931 2010-08-28 Philippe Brochard <pbrochard@common-lisp.net>
933 * src/clfswm.lisp (main-loop): Ensure that all events have been
934 processed after a process-event.
936 * src/clfswm-internal.lisp (is-in-current-child-p): New function.
938 2010-08-27 Philippe Brochard <pbrochard@common-lisp.net>
940 * src/clfswm.lisp (main-mode:configure-request): Raise the window
941 only when present on the current child and focus it accordingly.
943 2010-08-26 Philippe Brochard <pbrochard@common-lisp.net>
945 * src/clfswm-circulate-mode.lisp (circulate-loop-function):
946 Use is-a-key-pressed-p.
948 * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
950 * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
951 returned by xlib:keysym->keycodes.
953 * src/*.lisp: Use the new child-equal-p to compare children. This
954 prevent a bug with sbcl/cmucl when the standard equal function
955 does not work with xlib:window.
957 * src/clfswm-internal.lisp (child-equal-p): New predicate.
959 2010-08-25 Philippe Brochard <pbrochard@common-lisp.net>
961 * src/clfswm-generic-mode.lisp (generic-mode): Use an
962 xlib:event-listen before processing event with
963 xlib:process-event. This prevent a bug with CLX threaded
964 implementation like sbcl.
966 * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
967 processing event with xlib:process-event. This prevent a bug with
968 CLX threaded implementation like sbcl.
970 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
972 * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
974 * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
977 * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
978 (find-parent-frame, find-frame-window, find-frame-by-name)
979 (find-frame-by-number): Use with-find-in-all-frames to search in
980 frames in the right order.
982 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
983 unwanted flickering with unmanaged windows.
985 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
987 * src/package.lisp: Remove event handler hooks as they're not
988 needed anymore (To replace them: use closure and define-handler).
990 * src/xlib-util.lisp (move-window, resize-window)
991 (wait-mouse-button-release): Use a generic mode.
993 * src/*.lisp: Replace the case to handle event with a more (tricky)
994 lispy method which bind a function to each keywords associated
997 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
999 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
1000 menu entry between delete-current-child and remove-current-child.
1001 ie: Delete a child and its children in all frames by default.
1003 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
1005 * src/package.lisp: Add a placement configuration group.
1007 * src/binding*.lisp: Bind control+g to escape the current action
1010 * src/clfswm-internal.lisp
1011 (delete-child-and-children-in-all-frames): New function and
1012 binding: Second mode - Control+Delete delete the current child and
1013 its children in all frames (ie: close the current child and its
1016 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
1018 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
1019 the frame window and the frame gc. Close a very annoying bug when
1020 cuting/pasting a frame or moving a child over frames with the
1023 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1024 all children in *current-root* after moving/resizing a frame.
1026 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
1028 * src/clfswm-util.lisp (delete-focus-window)
1029 (destroy-focus-window): Remove child in parent frame before
1032 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1034 * src/clfswm-util.lisp (identify-key): Add a timeout in
1036 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
1037 of the window passed by xlib:process-event.
1039 * src/xlib-util.lisp (move-window, resize-window)
1040 (wait-mouse-button-release): Add a timeout in xlib:process-event.
1042 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1044 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
1045 to launch an other window manager and to return to clfswm.
1047 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
1049 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
1052 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
1054 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
1057 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
1058 parameter and a loop timeout.
1060 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
1062 * src/clfswm.lisp (main): Add an alternate configuration filename
1065 * load.lisp: Add a debuging code example.
1067 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
1069 * src/clfswm-configuration.lisp (create-configuration-menu): New
1070 menu to configure all clfswm variables while clfswm is running.
1072 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
1074 * src/clfswm-util.lisp (save-configuration-variables): New
1075 function to save all configuration variables in clfswmrc.
1077 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
1079 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
1081 (set-default-info-keys): Add cursor key support in info mode.
1083 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
1085 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
1088 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
1089 prevent reading the configuration file (this may be useful to
1090 produce the original documentation without user modifications
1091 with the rc configuration file).
1093 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
1095 * src/bindings-second-mode.lisp (set-default-second-keys):
1096 Simplification of Escape key to close/kill/remove the focus window
1097 and unhide all windows.
1099 * src/bindings.lisp (set-default-main-keys): Simplification of
1100 Escape key to close/kill/remove the focus window and unhide all
1103 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
1104 focus and unhide all windows capabilities.
1106 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1108 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
1110 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
1112 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
1113 Keep child order and don't make unnecessary child movement.
1114 (one-column-layout, one-line-layout): New layouts.
1116 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
1118 * *: **** Release 0906 ****
1120 * contrib/cd-player.lisp: New file to handle the CD player.
1122 * contrib/xmms.lisp: New file to handle the xmms player.
1124 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1126 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
1127 Maximize windows in their frame - Leave frames to their actual
1130 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
1131 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
1133 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
1135 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
1137 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
1139 * contrib/mpd.lisp: Use a standard menu.
1141 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
1143 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
1145 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
1147 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
1149 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
1152 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
1154 * src/config.lisp (get-fullscreen-size): One pixel adjustment
1157 * src/clfswm-placement.lisp (*-child-placement): One pixel
1160 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
1162 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
1163 Ensure that all characters are printable.
1165 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
1168 * src/clfswm-placement.lisp (*-child-placement): Adjust
1169 coordinates to one pixel in the current child.
1171 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1173 * src/clfswm-query.lisp (query-enter-function): Assign font before
1174 width and height calculation.
1176 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1178 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
1179 bannish the pointer in an arbitrary place.
1181 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
1182 place the info window in an arbitrary place.
1184 * src/clfswm-query.lisp (query-enter-function): Use with-placement
1185 macro to place the query window in an arbitrary place.
1187 * src/clfswm-placement.lisp: New file. Allow to place info windows
1188 or query windows on an arbitrary place. Allow to bannish the
1189 pointer on an arbitrary place.
1191 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
1193 * src/clfswm-circulate-mode.lisp (reorder-child)
1194 (reorder-brother): Unfocus windows before reordering children or
1197 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1199 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
1200 the parent is a frame.
1202 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
1203 motion with a default modifier.
1205 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
1208 * src/clfswm-info.lisp (info-mode): Handle motion with a default
1210 (info-mode): Optimization in loop function.
1212 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1214 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
1215 root-frame correctly.
1217 * clfswm.asd: Dependency fix for clfswm-generic-mode.
1219 * src/clfswm-circulate-mode.lisp (reorder-child)
1220 (reorder-brother): Handle empty frames.
1221 (reorder-brother): Redisplay only the parent frame of the current
1224 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
1225 parent frame of the current frame.
1227 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
1229 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
1230 Maximize/Unmaximize the current frame in its parent frame.
1232 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
1233 windows and frames in their parent frame.
1235 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1237 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
1239 * src/clfswm-circulate-mode.lisp (reorder-child)
1240 (reorder-brother): Reinitialise on circulate type change
1241 child to brother or brother to child.
1243 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
1244 calls xlib:display-finish-output on each map-request. So speed up
1247 * src/xlib-util.lisp (map-window): New function. Call
1248 xlib:display-finish-output on each map request.
1250 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1252 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
1253 Optimisation when drawing second mode window.
1255 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1257 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
1260 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1262 * src/clfswm-util.lisp (run-program-from-query-string): Launch
1263 command only with a return validation.
1265 2009-04-22 Xavier Maillard <xma@gnu.org>
1267 * src/clfswm-query.lisp (query-string): Use a generic mode.
1269 2009-04-19 Xavier Maillard <xma@gnu.org>
1271 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
1273 2009-04-18 Xavier Maillard <xma@gnu.org>
1275 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
1276 to define all other modes.
1278 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1280 * src/package.lisp (): Use *default-font-string* for all
1283 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
1285 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
1287 * src/xlib-util.lisp (null-size-window-p): Better check of null
1290 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
1292 * src/clfswm.lisp (handle-map-request): Add a fix to manage
1293 correctly fullscreen windows (SDL particularly).
1295 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
1297 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
1298 a segfault with clisp/new-clx.
1300 * src/clfswm.lisp (handle-motion-notify): Add a needed window
1303 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
1304 needed window argument.
1306 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
1308 * src/xlib-util.lisp (wait-no-key-or-button-press)
1309 (wait-a-key-or-button-press): Check buttons press/release correctly"
1311 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
1313 * src/menu-def.lisp: Add children navigation menu in the movement
1314 menu (select next/previous child/brother/level).
1316 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
1318 * *: Rename 'sister' frame to 'brother' frame.
1320 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
1321 alias in a real modifier.
1323 * src/package.lisp (*modifier-alias*): New list of modifier alias
1324 For example: :alt is :mod-1, :numlock is :mod-2...
1326 * src/tools.lisp (remove-hook): New function.
1328 * src/clfswm-keys.lisp (with-capslock, without-capslock)
1329 (with-numlock, without-cnumlock): New functions.
1331 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
1333 * src/clfswm-info.lisp: Use the *binding-hook* to create info
1334 keys and mouse bindings.
1336 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
1337 second keys and mouse bindings.
1339 * src/bindings.lisp: Use the *binding-hook* to create main keys
1342 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1344 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
1347 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
1349 * src/menu-def.lisp: Use a menu instead of a function for the
1352 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
1354 * src/clfswm-util.lisp (show-standard-menu): Display the standard
1355 menu from the 'update-menus' command.
1357 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
1359 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
1360 it's already grabbed.
1362 * src/clfswm-internal.lisp (display-frame-info): Use configurable
1363 colors and fix a bug with background.
1364 (display-frame-info): Set window background when displaying info.
1366 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1368 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
1369 warning with clisp/new-clx.
1371 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
1373 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
1376 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1378 * *: **** Release 0809 ****
1380 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1382 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
1384 (ensure-unique-number): New function and menu entry.
1386 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
1388 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
1389 hook: open the next window in a named frame.
1390 (numbered-frame-nw-hook): New new window hook: open the next
1391 window in a numbered frame.
1393 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
1394 cases. So query-string can be called even in the main mode.
1396 * src/clfswm-internal.lisp (show-all-children): Do not raise a
1397 child by default => far less flickering.
1399 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
1401 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
1403 * src/menu-def.lisp: Change key binding for the CLFSWM menu
1406 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
1407 is nil. (workaround on some CLX implementation).
1409 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
1411 * src/menu-def.lisp: Add a menu to set a focus policy for all
1414 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
1415 (all-frames-set-*-focus-policy): Set a focus policy for all
1418 * src/clfswm.lisp (handle-enter-notify): sloppy-select
1419 mode. Select a child and its parents on mouse over.
1421 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
1423 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
1424 policy -> Sloppy focus only for windows in the current frame.
1425 (main-unprotected): Exit clfswm on init error (ie: when another
1426 window manager is running).
1428 * src/clfswm-util.lisp (reset-clfswm): New function.
1430 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
1432 * src/clfswm-menu.lisp (init-menu): New function.
1434 * src/clfswm-util.lisp (reload-clfswm): New function to reload
1436 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
1438 * src/clfswm.lisp (main, main-unprotected): Handle error in a
1439 superior main function. Now CLFSWM can't break the X session. It
1440 just reinitialize the display and run a new main loop.
1442 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
1443 *vt-keyboard-on* global to avoid warnings when loading clfswm.
1445 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
1446 (help-on-gimp-layout): Describe how to use the GIMP layout.
1448 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
1450 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
1451 main-window-right-layout. Change the keybinding for (shift)alt+tab
1452 to not select windows in the main window lisst.
1453 Bind F8 to add a window in the main window list.
1454 Bind F9 to remove a window in the main window list.
1455 Change the focus policy to :sloppy.
1456 (set-previous-layout): Restore the previous layout, keybinding and
1459 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
1461 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
1463 * src/clfswm-layout.lisp (main-window-left-layout)
1464 (main-window-bottom-layout, main-window-top-layout): New
1466 Factorize layouts in menu.
1468 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
1470 * src/clfswm-layout.lisp (main-window-right-layout): A possible
1471 GIMP layout: one or more main windows on one side of the
1472 frame. Others on the other size.
1474 * src/clfswm-util.lisp
1475 (current-frame-set-click/sloppy-focus-policy): Each frame can have
1476 a different focus policy (one of :click or :sloppy).
1477 The default focus policy is set with *default-focus-policy*.
1479 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
1481 * src/clfswm-info.lisp (show-config-variable): New function.
1483 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
1485 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
1487 * src/clfswm-info.lisp: Colored help for key binding and corners
1490 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
1492 * src/clfswm-util.lisp (delete-focus-window)
1493 (destroy-focus-window): Remove chid only in
1494 handle-unmap/destroy-notify. Focus *current-root* only when
1495 closing/killing the current child.
1497 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
1498 functions or corners.
1500 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1502 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
1503 action: Hide/Unhide a terminal on mouse corner action. (By default
1504 right mouse button on the top left corner).
1506 * src/config.lisp (*never-managed-window-list*): New config
1509 * src/clfswm-internal.lisp (never-managed-window-p): New function:
1510 Handle never managed window in a more simple way.
1512 * src/clfswm-corner.lisp: New file and new and more simple method
1513 to define corners actions.
1515 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
1517 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
1519 * src/clfswm-layout.lisp (fast-layout-switch)
1520 (define-fast-layout-switch): New functions: Switch between two
1523 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
1524 really in the second mode. So leave-second-mode can be used even
1527 * src/clfswm-util.lisp (switch-to-last-child): New function:
1528 Store the current child and switch to the previous one.
1530 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1532 * src/clfswm-util.lisp (display-current-window-info): Display the
1534 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
1535 (top right by default). By default 'xvkbd' is used.
1537 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1539 * src/xlib-util.lisp (move-window, resize-window): Compress motion
1542 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
1544 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
1547 * src/clfswm-info.lisp (info-mode): Compress motion events.
1549 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
1551 * src/clfswm-internal.lisp (show-all-children): Compute geometry
1552 and selection first and then show only necessary children.
1553 (show-child): remove unneeded display-p parameter.
1555 * src/config.lisp (get-fullscreen-size): Place the frame border
1556 outside the screen (this prevent the loose of 2 pixels per
1559 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
1561 * src/clfswm-internal.lisp (focus-child): Algorithm change to
1562 raise only the selected child.
1564 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
1566 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
1567 Raise only viewable children.
1569 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
1571 * src/clfswm-internal.lisp (show-all-children): Always raise all
1572 displayed children. Remove all references to raise-p.
1574 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1576 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
1579 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
1580 second mode binding on raise/lower child in its frame.
1582 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
1583 behaviour to the new raise/lower property.
1584 Call clear-nw-hook before the rest of the hook.
1586 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
1587 (mouse-click-to-focus-and-resize-window): Stop button event. This
1588 prevent a keyboard/pointer freeze.
1590 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1592 * src/clfswm-internal.lisp (frame-lower-child)
1593 (frame-raise-child): New functions to raise/lower a child in its
1596 * src/clfswm-util.lisp (have-to-present-windows)
1597 (have-to-present-all-windows): New functions to have an MaxOS
1598 expose like on mouse click in screen corner.
1600 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
1602 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
1604 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
1605 child from a choice in all frames with hidden children.
1607 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
1609 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
1611 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
1612 (unhide-all-children): New functions.
1614 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
1617 * src/clfswm-util.lisp (hide/show-frame-window): new function and
1620 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
1622 * src/clfswm-util.lisp (rename-current-child): Do not display the
1623 frame info for a window.
1625 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
1627 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
1628 frame window for the removed child and its children.
1630 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
1632 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
1635 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
1637 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
1638 the ROX pinboard (ie: leave it lowered in the root window as
1641 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
1642 (tile-left-layout, tile-right-layout, tile-top-layout)
1643 (tile-bottom-layout): Use all the frame space when there is only
1646 * src/clfswm-internal.lisp (place-window-from-hints): Center
1647 unmanaged windows in the root screen.
1649 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
1652 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1654 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
1655 typo in managed types.
1657 * src/clfswm-internal.lisp (show-child): Always display frame info
1658 even if the frame is hidden.
1660 * src/xlib-util.lisp (resize-window): Use a better algorithme to
1663 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1665 * src/clfswm-util.lisp (with-movement): Display frame info for all
1666 frames in current root.
1668 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1670 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
1672 * src/bindings-second-mode.lisp (define-second-key #\a): New
1673 binding on 'add-default-frame'.
1675 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1676 message to follow the autodocumentation process.
1678 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1680 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1681 "Space" to jump to a child. "B" to bind a slot on the current
1684 * src/bindings-second-mode.lisp: Use "Tab" instead of
1687 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
1689 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1690 unmanaged (hidden) windows.
1692 * src/clfswm-internal.lisp (place-window-from-hints): Give a
1693 minimal size for windows.
1694 (with-all-windows-frames-and-parent): New function.
1696 * src/config.lisp (*default-window-width/height*): New parameters.
1698 * src/clfswm-internal.lisp (place-window-from-hints): Center
1699 windows in the screen instead of in their frame.
1701 * src/bindings-second-mode.lisp (tile-space-current-frame): New
1704 * src/clfswm-layout.lisp (register-layout): Intern the once name
1705 in the right package.
1707 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1709 * doc/dot-clfswmrc: Update to follow the new clfswm way.
1711 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
1713 * src/clfswm-internal.lisp (set-current-child)
1714 (adapt-child-to-parent, show-child, hide-child): Handle the case
1715 where child is not a frame or a window.
1717 * src/clfswm-util.lisp
1718 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1719 Check if child is a frame.
1721 * src/clfswm-internal.lisp (managed-window-p): Handle the case
1722 where frame is null.
1723 (place-frame): Check if frame and parent are frames.
1725 * src/clfswm-info.lisp (info-mode): display all frame info before
1728 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1729 info before leaving.
1731 * src/clfswm-internal.lisp (display-all-frame-info): New function.
1733 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
1735 * src/tools.lisp (getenv): Implemented for ECL.
1736 (urun-prog): Implemented for ECL.
1738 * src/clfswm-util.lisp (identify-key): Use a double buffer to
1741 * src/clfswm-query.lisp (query-string): Use a double buffer to
1744 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1747 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1750 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
1752 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1754 * src/menu-def.lisp: New file: move all menu definition in
1757 * src/clfswm-layout.lisp (register-layout): Use a function instead
1760 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
1762 * src/clfswm-autodoc.lisp (produce-menu-doc,
1763 (produce-menu-doc-html): New functions.
1764 (produce-doc-*): Moved to clfswm-autodoc.lisp.
1766 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1767 paste a child on one of its own children. (this prevent a
1769 (move-child-to): Rename move/copy-current-child-by to
1771 (mouse-move-window-over-frame): New function to move the window
1772 under the mouse cursor to another frame.
1774 * src/clfswm-internal.lisp (find-child-in-parent): New function.
1776 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1778 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1779 windows only when its window parent is the current child.
1781 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1783 * src/clfswm-util.lisp (manage-current-window)
1784 (unmanage-current-window): New functions: Allow to force to manage
1785 or unmanage a window by its parent frame.
1787 * src/bindings-second-mode.lisp (#\o): binded to
1788 set-open-in-new-frame-in-parent-frame-nw-hook and
1789 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1791 * src/clfswm-util.lisp (with-current-window): New macro.
1793 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1794 exposure and enter-window handle event.
1796 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1797 children for the current child after the move/resize.
1799 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1801 * src/xlib-util.lisp (resize-window): Take care of window size
1804 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1805 move/resize unmanaged windows.
1807 * src/xlib-util.lisp (move-window, resize-window): New functions.
1809 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1811 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1812 user choose what window type the current frame must handle.
1813 (display-current-window-info): New function.
1814 (current-frame-manage-all-window-type)
1815 (current-frame-manage-only-normal-window-type)
1816 (current-frame-manage-no-window-type): New functions.
1818 * src/clfswm-internal.lisp (managed-window-p): New function.
1820 * src/package.lisp (frame): Managed type: new frame
1821 parameter. This allow to choose what window type a frame must
1824 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1826 * src/clfswm-nw-hooks.lisp
1827 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1829 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1832 * src/tools.lisp (ensure-printable): Return always a string even
1835 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
1837 * src/config.lisp (*default-nw-hook*): New variable to change the
1838 default new window hook.
1840 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1842 * clfswm.asd (clfswm): Add a dependency from
1843 clfswm-second-mode.lisp to clfswm.lisp.
1845 * src/clfswm-util.lisp (identify-key): Show the documentation for
1846 the function bound on a key.
1847 (with-movement): Move with-movement,
1848 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
1849 to clfswm-util.lisp.
1851 * src/clfswm-menu.lisp: New menu system that let user change keys
1852 or functions associated to keys.
1854 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
1856 * src/clfswm-internal.lisp (show-all-children): Display-child is
1857 the first child by default. Solve a bug with father-p.
1859 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
1861 * src/clfswm-internal.lisp (add-frame): Add frame return the
1863 (show-all-children): Move the size computation outside the
1866 * src/bindings-second-mode.lisp (with-movement): Redisplay only
1869 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1870 only the current child.
1872 * src/clfswm-internal.lisp (show-all-children): New display-child
1873 parameter to display only the desired child and its children.
1874 (select-next/previous-child): Only display the current child.
1876 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
1878 * src/clfswm.lisp (init-display): Move the default frame creation
1879 on the default init hook.
1881 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1882 the main mode (for example: "1" on an azerty keyboard).
1884 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
1886 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1887 keysyms. Revert to old grabbing method for the main mode.
1889 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
1891 * src/clfswm.lisp (init-display): Add key handling on no focus
1892 window and on frame windows.
1894 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1896 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1897 all keys by default and replay just what is needed. No change for
1900 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1901 (find-key-from-code): Test for shift and not shift presence.
1903 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
1905 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1906 new key parameter to have less flickering.
1908 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
1910 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1911 layout only one time and revert to no-layout to freely handle
1914 * src/clfswm-nw-hooks.lisp
1915 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1916 with new created window.
1918 * src/clfswm-layout.lisp (register-layout): Now register
1919 automatically a once layout to set the layout only one time and
1920 revert to no-layout to freely handle frames.
1922 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1924 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1925 nw-hook: Open the next window in the current frame and leave the
1926 focus to the current child.
1928 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
1930 * src/bindings-second-mode.lisp: Add keys definitions to
1931 bind-or-jump in the second mode.
1933 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
1934 macro for bind-or-jump-(1|2|3...).
1936 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
1937 arguments to function. This allow to do things like:
1938 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
1939 are passed to my-function on key press.
1941 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
1943 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
1945 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
1947 * src/clfswm-internal.lisp (child-fullname): New function
1949 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
1950 docstring in info-mode-menu. An item can be
1951 '((key function) (key function)) or with docstring
1952 '((key function "documentation 1") (key function "bla bla") (key function))
1954 * src/tools.lisp (ensure-n-elems): New function.
1956 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
1957 resize a frame or the window's father.
1959 * src/clfswm.lisp (init-display): Remove tile-space-layout by
1960 default on the root frame.
1962 * src/clfswm-util.lisp (move/resize-frame): Add standard event
1963 hooks handlers (map-request, configure-notify...)
1965 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
1968 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1970 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
1971 or the window's father.
1973 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
1974 event only if there is a geometry change.
1975 (mouse-focus-move/resize-generic): Generic function to move or
1976 resize a frame or a window father frame.
1978 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1980 * src/clfswm-internal.lisp (show-all-children): Return t if there
1981 is a geometry change.
1983 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
1985 * src/bindings.lisp (Up/Down): Swap select previous/next level.
1987 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
1989 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
1991 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
1992 (with-all-*): Reverse the child list to manage the first child last (like in
1995 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
1996 root window only if true.
1998 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
1999 root window only if *create-frame-on-root* is true.
2001 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
2004 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
2006 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
2007 the current child (even if it's a window).
2009 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
2011 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
2012 (mouse-click-to-focus-and-resize): New functions.
2014 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
2015 (*-px->fl): Convert pixel coordinates to float.
2017 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
2019 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
2021 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
2024 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
2025 and hide-all-children.
2026 (raise-if-needed): New function.
2027 (show-child): Use a first-p parameter to raise windows only when they are
2030 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
2032 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
2035 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
2037 * src/clfswm-info.lisp (keys-from-list): new function.
2039 * src/*: rename 'childs' in 'children'.
2041 * src/*: rename 'group' in 'frame'.
2043 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
2045 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
2047 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
2049 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
2051 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
2053 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
2054 Bind control+o to open the next window in a new group in the root group
2055 (as open in next window in a new workspace in 0801 version).
2057 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
2059 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
2062 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
2064 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
2065 instead of Tab for select-previous-child.
2067 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
2069 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
2072 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
2074 * clfswm-util.lisp (identify-key): Display the documentation
2075 associated to keys when identifying a key.
2077 2008-03-10 Xavier Maillard <xma@gnu.org>
2079 * contrib/clfswm: Complete rewrite of the script. Detect error and
2080 act accordingly. Add command line arguments to configure the
2081 script execution. User can now choose different common lisp
2082 implementation (clisp and sbcl only), choose where to store the
2083 dumped image, where to find clfswm source.
2085 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
2087 * clfswm-internal.lisp (process-new-window): Beginning of new
2088 window hook: each group have a hook to tell what he wants to do
2089 with the new created window.
2091 2008-03-08 Xavier Maillard <xma@gnu.org>
2093 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
2094 call the resulting executable.
2096 * clfswm.lisp (read-conf-file): Check for the user config file in
2097 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
2098 prefered whenever possible.
2100 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
2102 * clfswm-layout.lisp (*-layout): Add an optional raise-p
2103 parameter in each layout.
2105 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2107 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
2109 (copy/move-current-child-by-name/number): new functions
2110 (focus-group-by-name/number): new functions
2111 (delete-group-by-name/number): new functions
2113 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2115 * ************************************************************ *
2116 *: Major update - No more reference to workspaces. The main *
2117 structure is a tree of groups or application windows. *
2118 * ************************************************************ *
2120 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
2122 * clfswm.lisp (read-conf-file): Read configuration in
2123 $HOME/.clfswmrc or in /etc/clfswmrc or in
2124 $XDG_CONFIG_HOME/clfswm/clfswmrc.
2125 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
2128 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
2130 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
2133 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
2135 * clfswm-internal.lisp (find-window-group): New function.
2137 * clfswm*: Change to make clfswm run with clisp/new-clx.
2139 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
2141 * clfswm-util.lisp (query-show-paren): Add show parent matching in
2143 (query-string): Bind control+k to delete end of line.
2145 * clfswm-second-mode.lisp (draw-second-mode-window): Display
2146 the action on mouse motion in second mode.
2148 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
2149 event but do not clear the root window.
2150 (handle-configure-request): Adjust unmanaged window from their
2153 * clfswm-internal.lisp (process-new-window): Adjust new window
2154 with the specified hints (max/min/base width/height).
2156 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
2158 * clfswm.lisp (handle-configure-request): Send an Configuration
2159 Notify event. This solve a bug with xterm and rxvt who takes some
2160 times to be mapped. Now there is no delay.
2162 * bindings-second-mode.lisp (define-shell): Run programs after
2163 living the second mode.
2165 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
2167 * clfswm-internal.lisp (process-new-window): Do not crop transient
2168 window to group size.
2169 (adapt-window-to-group): Do not crop transient window to group
2172 * clfswm.lisp (handle-configure-request): Adapt just the window to
2173 its group and don't take care of the configure request. Remove the
2174 bug with the Gimp outside the group and speed up the window
2176 (handle-exposure): Remove show-all-group on exposure event
2179 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
2181 * clfswm-util.lisp (circulate-group-up-copy-window)
2182 (circulate-group-down-copy-window)
2183 (circulate-workspace-up-copy-group)
2184 (circulate-workspace-down-copy-group): Prevent the copy of the
2185 same window in the same workspace.
2187 * bindings-second-mode.lisp (release-copy-selected-window)
2188 (release-copy-selected-group): Prevent the copy of the same window
2189 in the same workspace.
2191 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
2192 (generic-pager-move-window-on-next-line): Remove the copy
2194 (generic-pager-move-group-on-next-workspace)
2195 (generic-pager-move-group-on-previous-workspace): Prevent the copy
2196 of the same window in the same workspace.
2198 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
2199 (mouse-pager-copy-selected-group-release): Prevent the copy of the
2200 same window in the same workspace.
2202 * tools.lisp (setf/=): new macro to set a variable only when
2205 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
2206 x, y... only when necessary.
2208 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
2210 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
2211 new function and hook: force windows to stay in its group (solve a
2214 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
2216 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
2217 less flickering when moving/resizing groups.
2219 * clfswm-internal.lisp (hide-group): new function.
2220 (show-all-group): clear-all: new parameter.
2222 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
2224 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
2226 * clfswm*: Color change for the pager. Typo or better description
2227 in bindings definitions. Define bindings for a qwerty keyboard by
2228 default. dot-clfswmrc show examples to switch to an azerty
2230 License change to GPL v3.
2231 * config.lisp: new file - group all globals variables in this
2234 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
2236 * xlib-util.lisp (hide-window): Remove structure-notivy events
2237 when hidding a window.
2239 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
2241 * package.lisp (*sm-property-notify-hook*): Readded
2242 property-notify-hook in second mode.
2244 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
2246 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
2248 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
2250 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
2251 Tile the current workspace with the current window on one side and
2252 others on the other (this emulate the larswm, dwm, wmii way). See
2253 the default configuration file to enable this mode by default.
2255 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
2258 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
2260 * clfswm-pager.lisp (pager-draw-window-in-group): Add
2261 ensure-printable to print windows name even with non-ascii
2264 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
2266 * clfswm-pager.lisp (pager-explode-current-group): Create a new
2267 group for each window in group.
2268 (pager-implode-current-group): Move all windows in workspace to
2269 one group and remove other groups.
2271 * clfswm-pack.lisp (explode-group): Create a new group for each
2273 (implode-group): Move all windows in workspace to one group and
2274 remove other groups.
2276 * clfswm-util.lisp (identify-key): Remove local configuration
2277 variables and made them available for configuration from
2279 (query-string): idem.
2281 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
2283 * netwm-util.lisp: Start of NetWM compliance.
2284 Add a Netwm client list gestion.
2286 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
2288 * clfswm-internal.lisp (create-group-on-request): open a new group
2289 only when the current group is not empty.
2291 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
2292 bug with null workspace.
2294 * clfswm-pager.lisp (pager-handle-event): Add a hook
2295 system. This hooks can be changed in the user configuration file.
2297 * package.lisp: All colors and font variables are set in
2298 package.lisp and can be configured in the user configuration
2300 Note: If you have configured some less ugly colors (esp. for the
2301 pager) don't hesitate to let me know :)
2303 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
2304 system. This hooks can be changed in the user configuration file.
2306 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
2307 changed in the user configuration file (~/.clfswmrc)
2309 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
2311 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
2312 arrow action, open next window in new workspace/group.
2314 * bindings.lisp (stop-all-pending-actions): new binding.
2315 (open-next-window-in-new-group-once): Open the next windows in a
2316 new group (only once) or open all new windows in a new group (like
2317 others windows managers).
2319 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
2321 * clfswm.lisp (read-conf-file): New function to read a lisp
2322 configuration file at startup.
2323 (focus-group-under-mouse): Check if group isn't the current group
2324 ( prevent a bug with unclutter ).
2326 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
2328 * bindings.lisp (run-program-from-query-string): A program can be
2329 launch from a input query window.
2331 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
2333 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
2335 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
2337 * clfswm.lisp (process-new-window): One can now open the next
2338 window in a workspace called by its number.
2340 * clfswm-util.lisp (query-font-string): Minimal editing
2342 (eval-from-string): And an REPL in the window manager... :)
2344 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2346 * clfswm.lisp (process-new-window): One can now open the next
2347 window in a new workspace or a new group.
2349 * clfswm-pager.lisp (pager-mode): Display the next arrow action
2350 with the hidden windows.
2352 * clfswm.lisp (second-key-mode): Display the current workspace
2353 number and the next arrow action in the state window.
2355 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
2356 the pager mode and then redisplay only the current workspace.
2358 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
2360 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
2361 they can be focused with a keypress, sorted or renumbered.
2363 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2365 * clfswm-pager.lisp (pager-mode): Remove multiple silly
2366 pager-draw-display. This prevent a lot of flickering in the
2369 * clfswm.lisp: Remove all display-force-output and replace them
2370 with only one display-finish-output in the event loop.
2372 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
2374 * clfswm-pager.lisp (pager-center-group): New function - center a
2375 group at the middle of the screen.
2377 * clfswm-pack.lisp (center-group): New function - center a group
2378 at the middle of the screen.
2380 * clfswm.lisp (show-group): Add a cross line under the group.
2381 (show-group): Group are showned even if fullscreened.
2382 (init-display): Add an exposure event on the root window.
2384 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
2386 * package.lisp (*default-group*): Default group is the same size
2387 of a fullscreened group.
2389 * bindings*: Use shift to move, control+shift to copy.
2391 * *.lisp: Add comments for configuration or alternatives. So grep
2392 for CONFIG to see where you can configure clfswm. And grep for
2393 Alternative to use some commented code.
2395 * clfswm.lisp (second-key-mode): Use a single window to show the
2396 second mode. See for alternatives at the end of this file.
2398 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
2400 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
2401 macro of key and mouse definitions.
2402 (define-define-key/mouse): Use state instead of modifiers list
2403 this fix a bug when the modifiers list is not in the rigth order.
2405 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
2407 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
2409 * clfswm-info.lisp (info-mode): Add an info mode.
2411 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
2413 * clfswm.lisp (process-new-window): Change border size for
2415 (show-all-windows-in-workspace): Unhide all windows even when the
2416 current group is in fullscreen mode.
2418 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
2420 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
2421 redisplay the identify window after a terminal switch.
2423 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
2424 redisplay the pager after a terminal switch.
2426 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
2428 * clfswm-util.lisp (identify-key): Add a window to display
2429 the keys to identify on screen.
2431 * bindings.lisp, bindings-pager.lisp: Define same keys to
2432 move/copy groups/windows in second mode and in pager.
2434 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
2436 (show-all-windows-in-workspace): unhide window before adapting it
2439 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
2441 * clfswm.lisp (handle-event): Revert to an older version.
2443 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
2445 * clfswm-util.lisp (force-window-in-group)
2446 (force-window-center-in-group): New functions for transient windows.
2448 * clfswm-pager.lisp (pager-remove-current-workspace/group):
2449 bugfix: hide all windows before removing group or workspace.
2451 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
2453 * bindings-pager.lisp (mouse-pager-move-selected-group)
2454 (mouse-pager-copy-selected-group)
2455 (mouse-pager-move-selected-window)
2456 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
2457 (mouse-pager-rotate-window-down): New functions to have mouse in
2460 * clfswm-pager.lisp (pager-swap-window)
2461 (pager-copy-group-on-next/previous-workspace)
2462 (pager-copy-window-on-next/previous-line): New functions
2464 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
2466 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
2467 (pager-move-group-on-next/previous-workspace): new functions.
2469 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
2470 to its half size (new functions).
2472 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
2474 * clfswm-pager.lisp: workspaces, groups and windows can now be
2475 selectionned with the keyboard or the mouse.
2477 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
2479 * clfswm-pager.lisp (pager-select-workspace-right/left):
2480 workspaces can now be selectionned with the keyboard.
2482 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
2484 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
2485 new function to remove a previous defined key or mouse combination.
2487 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
2489 * clfswm.lisp (main): Check for access error in init-display.
2491 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
2492 keycode before grabbing.
2494 * bindings.lisp: Remove nlambda and use defun to keep the function
2495 documentation with clisp.
2496 (define-shell): new macro to define shell command for the second
2499 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
2501 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
2504 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
2506 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
2507 workspace circulation.
2509 * clfswm-util.lisp (absorb-orphan-window): new function.
2511 * clfswm-keys.lisp: Keysyms support.
2513 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
2515 * clfswm.lisp (show-group): Use one gc for all groups and not one
2518 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
2520 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
2522 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
2523 width and height outside group.
2525 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
2527 * clfswm.lisp: First public release.