1 2012-08-12 Philippe Brochard <pbrochard@common-lisp.net>
3 * contrib/toolbar.lisp: End of toolbar framework.
4 (list-toolbar-modules): Add a list toolbar modules function.
6 2012-08-03 Philippe Brochard <pbrochard@common-lisp.net>
8 * src/clfswm-internal.lisp (show-child): Show unmanaged windows
9 on (maybe) current child in all roots.
11 * src/clfswm-util.lisp (find-child-under-mouse-in-child-tree):
12 Handle children from all roots instead of from *root-frame*.
14 2012-07-23 Philippe Brochard <pbrochard@common-lisp.net>
16 * src/clfswm-expose-mode.lisp: New expose mode based on standard
19 2012-06-27 Philippe Brochard <pbrochard@common-lisp.net>
21 * src/clfswm-util.lisp (eval-from-query-string): Add completion
22 for eval for query string.
24 2012-06-26 Philippe Brochard <pbrochard@common-lisp.net>
26 * src/clfswm-query.lisp: Add completion for shell commands.
28 2012-06-18 Philippe Brochard <pbrochard@common-lisp.net>
30 * src/clfswm-placement.lisp: Each child can have its own border
31 size. New binding to change the child border size on the fly.
33 2012-06-08 Philippe Brochard <pbrochard@common-lisp.net>
35 * src/tools.lisp (process-timers): Call get-internal-real-time
36 only once for all times.
38 2012-06-07 Philippe Brochard <pbrochard@common-lisp.net>
40 * contrib/toolbar.lisp (define-toolbar-hooks): Add auto-hide
42 (define-toolbar-hooks): Add auto-hide toolbar (show/hide on mouse
45 2012-06-06 Philippe Brochard <pbrochard@common-lisp.net>
47 * src/xlib-util.lisp (handle-event): Add an additional hook event
48 system to handle events in contrib code.
50 2012-06-03 Philippe Brochard <pbrochard@common-lisp.net>
52 * src/clfswm-placement.lisp: Add an optional border size in all
55 2012-05-30 Philippe Brochard <pbrochard@common-lisp.net>
57 * contrib/toolbar.lisp (clock): Add a clock module.
59 2012-05-28 Philippe Brochard <pbrochard@common-lisp.net>
61 * contrib/toolbar.lisp: begining of toolbar support.
63 2012-05-24 Philippe Brochard <pbrochard@common-lisp.net>
65 * src/clfswm-internal.lisp (rotate-root-geometry): Do not use
66 rotatef but a simpler algorithm.
68 2012-05-19 Philippe Brochard <pbrochard@common-lisp.net>
70 * src/clfswm-placement.lisp: Adjust width and height in child and
71 root placement to prevent too big child size.
73 2012-05-18 Philippe Brochard <pbrochard@common-lisp.net>
75 * src/clfswm-placement.lisp: New root placement possibility.
77 * src/clfswm-util.lisp (change-current-root-geometry): New
80 2012-05-17 Philippe Brochard <pbrochard@common-lisp.net>
82 * src/clfswm-util.lisp (exchange-root-geometry-with-mouse): New
85 2012-05-16 Philippe Brochard <pbrochard@common-lisp.net>
87 * src/menu-def.lisp: New root menu.
89 2012-05-15 Philippe Brochard <pbrochard@common-lisp.net>
91 * src/clfswm-circulate-mode.lisp (rotate-root-geometry-next)
92 (rotate-root-geometry-previous): New second mode binding to change
95 2012-05-13 Philippe Brochard <pbrochard@common-lisp.net>
97 * src/clfswm-internal.lisp: Remove the *current-child* variable
98 and use a setfable function (current-child) instead.
99 (current-child-setter): Store root current child before apllying
100 current child change.
102 2012-05-09 Philippe Brochard <pbrochard@common-lisp.net>
104 * src/clfswm-internal.lisp: Use xdpyinfo/xinerama informations
105 instead of xrandr informations.
107 2012-05-06 Philippe Brochard <pbrochard@common-lisp.net>
109 * src/clfswm-internal.lisp : Use only one list for root
111 (*root*): Root management API simplification.
113 2012-04-30 Philippe Brochard <pbrochard@common-lisp.net>
115 * src/clfswm-internal.lisp: Big change to replace *current-root*
116 variable to support multiple root.
118 2012-04-18 Philippe Brochard <pbrochard@common-lisp.net>
120 * src/tools.lisp (add-new-hook, add-hook): New macro. Do not
121 duplicate hooks by default. Use add-new-hook if you want to
124 2012-04-16 Philippe Brochard <pbrochard@common-lisp.net>
126 * src/clfswm-corner.lisp (wait-window-in-query-tree): Add a limit
127 of try to wait the command window.
129 2012-02-25 Philippe Brochard <pbrochard@common-lisp.net>
131 * src/clfswm-util.lisp (place-frames-from-xrandr)
132 (swap-frame-geometry, rotate-frame-geometry): New helper functions
133 for multiple physical screen.
134 (jump-to-slot, add-frame-in-parent-frame): Change *current-root*
137 2012-01-18 Philippe Brochard <pbrochard@common-lisp.net>
139 * src/*.lisp: Use create-symbol and create-symbol-in-package
140 instead of the shorter symb. (Thanks Aad Versteden).
142 * src/bindings-second-mode.lisp (set-default-second-keys): New
143 key binding to set window and frame transparency.
145 * src/bindings.lisp (set-default-main-mouse): New mouse binding to
146 set window and frame transparency.
148 * src/clfswm-keys.lisp (define-keys): New macro to ease multiple
149 keys definitions. (Thanks Valentin Plechinger for the request).
151 * src/*.lisp: Add full transparency support with xcompmgr.
153 2012-01-14 Philippe Brochard <pbrochard@common-lisp.net>
155 * src/*.lisp: Add transparency support.
157 2012-01-09 Ales Guzik <ales.guzik@gmail.com>
159 * src/clfswm-layout.lisp (tile-layout-mix): New layout to
160 automatically choose between vertival and horizontal tile layout.
161 (tile-space-layout): Fix to have space between screen border and
162 frame the same as between frames.
164 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
166 * load.lisp: Support clisp 2.49+ module system to load CLX.
168 2012-01-04 Ales Guzik <ales.guzik@gmail.com>
170 * src/clfswm-layout.lisp (update-layout-managed-children-keep-position):
171 Fix an inattention error.
173 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
175 * src/xlib-util.lisp (with-xlib-protect): Protect from
176 xlib:lookup-error. This prevent an error in clisp/new-clx when
177 sometimes an xlib:colormap is expected instead of an xlib:window.
179 2012-01-03 Philippe Brochard <pbrochard@common-lisp.net>
181 * src/xlib-util.lisp (handle-event): Fix a clisp/new-clx error
182 when sometimes window slot of event-slots is a pixmap instead of a
185 2011-12-26 Philippe Brochard <pbrochard@common-lisp.net>
187 * src/clfswm-query.lisp: Fill the history list with a non-nil
190 2011-12-25 Philippe Brochard <pbrochard@common-lisp.net>
192 * src/package.lisp (make-x-drawable): Drawable wrapper to prevent
193 type error in some CLX versions.
194 Replace xlib:drawable-* functions with x-drawable-* equivalents
196 2011-12-14 Philippe Brochard <pbrochard@common-lisp.net>
198 * src/clfswm-util.lisp (um-create-xdg-section-list): Add at least
199 the 'Utility menu entry.
201 * src/config.lisp (*xdg-section-list*): moved to config.lisp.
203 * src/clfswm-util.lisp (update-menus): Set a default value for
204 searching .desktop files when XDG_DATA_DIRS is not set.
206 2011-10-15 Philippe Brochard <pbrochard@common-lisp.net>
208 * src/clfswm-internal.lisp (place-window-from-hints): Use
209 with-placement macro to place unmanaged windows in an arbitrary
212 2011-06-16 Philippe Brochard <pbrochard@common-lisp.net>
214 * src/clfswm-internal.lisp (clean-windows-in-all-frames): Prevent
215 current root and current child being equal to child.
217 2011-06-13 Philippe Brochard <pbrochard@common-lisp.net>
219 * src/keysyms.lisp: Repeat Page_Down/Up keysym definitions at the
220 end of the file to change keysyms priority.
222 2011-06-13 Sylvain HENRY <hsyl20@gmail.com>
224 * *.*: Minor spelling fix.
226 2011-06-12 Philippe Brochard <pbrochard@common-lisp.net>
228 * src/clfswm.lisp (:unmap-notify, :destroy-notify): Show all
229 children just after the xlib tree cleanup -> reduce the
230 flickering when a window is deleted or destroyed.
232 * src/clfswm-internal.lisp (process-existing-windows): Do not
233 process the notify window.
235 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
237 * *: **** Release 1106 ****
239 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
241 * src/clfswm-internal.lisp (clean-windows-in-all-frames): New
242 function to prevent xlib error when a window is deleted.
244 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
246 * src/clfswm-internal.lisp
247 (delete-child-and-children-in-all-frames): Delete or destroy
248 children before displaying all children.
250 2011-06-05 Philippe Brochard <pbrochard@common-lisp.net>
252 * src/clfswm-util.lisp (add-frame-in-parent-frame): New function
255 2011-06-04 Philippe Brochard <pbrochard@common-lisp.net>
257 * src/clfswm.lisp (main-unprotected): Destroy all frames windows
258 before closing the display (not really needed).
260 2011-06-02 Philippe Brochard <pbrochard@common-lisp.net>
262 * src/clfswm-layout.lisp (inc-tile-layout-size)
263 (dec-tile-layout-size, inc-slow-tile-layout-size)
264 (dec-slow-tile-layout-size): New functions and bindings.
266 2011-06-01 Philippe Brochard <pbrochard@common-lisp.net>
268 * src/clfswm-expose-mode.lisp (define-expose-letter-keys): Add
269 0..1 and A..Z keys to select a child in exposé mode.
271 * src/clfswm-internal.lisp (display-frame-info): Remove hidden
272 infos in frames windows.
274 * src/clfswm-util.lisp (ask-close/kill-current-window): Menu
277 2011-05-30 Philippe Brochard <pbrochard@common-lisp.net>
279 * src/clfswm-internal.lisp (get-parent-layout): Minor fullscreen
282 2011-05-29 Philippe Brochard <pbrochard@common-lisp.net>
284 * src/clfswm-internal.lisp
285 (delete-child-and-children-in-all-frames): Show all children
286 before deleting/destroying a windows, so prevent a flickering.
287 (get-parent-layout): Return the fullscreen size when the current
290 2011-05-28 Philippe Brochard <pbrochard@common-lisp.net>
292 * src/clfswm-internal.lisp (get-parent-layout): Handle correctly
295 * src/clfswm-util.lisp (delete-focus-window-generic): Do not hide
296 child before removing, so prevent a flickering.
298 * src/clfswm-internal.lisp (show-all-children): Rectangular
299 optimization to display only needed children.
300 (show-all-children): Remove flickering on
301 select-next/previous-brother.
303 2011-05-17 Philippe Brochard <pbrochard@common-lisp.net>
305 * src/clfswm-util.lisp (copy-focus-window, cut-focus-window): New
306 functions and ask-close/kill-current-window menu and bindings
309 2011-05-16 Philippe Brochard <pbrochard@common-lisp.net>
311 * src/clfswm-util.lisp (ask-close/kill-current-window): Add an
312 *ask-close/kill-placement* placement window variable.
314 2011-05-09 Philippe Brochard <pbrochard@common-lisp.net>
316 * contrib/osd.lisp (funcall-button-from-code): Display osd
317 documention for buttons and fix some redefining warnings.
319 2011-05-07 Philippe Brochard <pbrochard@common-lisp.net>
321 * src/clfswm-nw-hooks.lisp (make-permanent-nw-hook-frame): New
322 function. Prevent to add or delete a new window hook for this
325 * src/clfswm-layout.lisp (update-layout-managed-children-position):
328 2011-05-06 Philippe Brochard <pbrochard@common-lisp.net>
330 * src/bindings-second-mode.lisp (set-default-second-keys):
331 select-brother-spatial-move-* binding update.
333 * src/clfswm-layout.lisp (tile-left|right|top|bottom-layout): Ask
334 to keep children positions or not.
336 * src/clfswm-internal.lisp (fixe-real-size): Takes care of border
339 * src/clfswm-layout.lisp (update-layout-managed-children): Fix a
340 bug by using the parent frame instead of the current child.
342 * src/clfswm-circulate-mode.lisp
343 (select-brother-generic-spatial-move+right/left/up/down): New
344 function to select a brother from another in a spatial move.
346 2011-04-19 Philippe Brochard <pbrochard@common-lisp.net>
348 * src/clfswm-pack.lisp (move-frame-constrained)
349 (resize-frame-constrained): Use pixels instead of floating
352 2011-04-18 Philippe Brochard <pbrochard@common-lisp.net>
354 * src/clfswm-pack.lisp (resize-frame-constrained): Takes care of
356 (implode-frame, implode-current-frame): New functions. Absorb all
357 frames subchildren in frame. Explode frame opposite.
359 2011-04-17 Philippe Brochard <pbrochard@common-lisp.net>
361 * src/clfswm-pack.lisp (move-frame-constrained)
362 (resize-frame-constrained): New function. Move and resize frame
363 with the mouse constrained by other frame brothers.
365 2011-04-14 Philippe Brochard <pbrochard@common-lisp.net>
367 * src/clfswm-util.lisp (with-movement-select-next-brother)
368 (with-movement-select-previous-brother)
369 (with-movement-select-next-child): Use a simple method (do not
370 enter in the circulate mode) to allow to circulate in all children
373 * src/clfswm-menu.lisp (open-menu): Save info hash table keys
374 instead of deleting newly created keys.
376 2011-03-21 Philippe Brochard <pbrochard@common-lisp.net>
378 * src/clfswm-internal.lisp (x-px->fl, y-px->fl): Takes care of
381 2011-03-20 Philippe Brochard <pbrochard@common-lisp.net>
383 * src/clfswm-info.lisp (show-config-variable): call
384 produce-conf-var-doc.
386 2011-03-18 Philippe Brochard <pbrochard@common-lisp.net>
388 * src/clfswm-autodoc.lisp (produce-conf-var-doc-html): Produce a
389 documentation for all configurable variables in CLFSWM -
392 * src/clfswm-internal.lisp (leave-frame): Hide all children except
395 2011-03-16 Philippe Brochard <pbrochard@common-lisp.net>
397 * src/clfswm-autodoc.lisp (produce-all-docs): Produce a
398 documentation for all configurable variables in CLFSWM.
400 * src/clfswm-layout.lisp (set-gimp-layout): Display a notify
401 window with the help on the GIMP layout.
403 2011-03-12 Philippe Brochard <pbrochard@common-lisp.net>
405 * src/menu-def.lisp: Menu update to prevent cursor keys clash.
407 * clfswm.asd: Change compilation order to prevent undefined
410 * src/clfswm-internal.lisp (show-child(frame)): Handle properly
411 the show-root-frame-p parameter.
413 2011-03-11 Philippe Brochard <pbrochard@common-lisp.net>
415 * src/clfswm-util.lisp (move-frame, resize-frame): Do not move or
416 resize a frame when it's the current root.
418 2011-03-10 Philippe Brochard <pbrochard@common-lisp.net>
420 * src/clfswm-internal.lisp (show-all-children): Handle properly
421 duplicated child in multipe frames.
423 2011-03-09 Philippe Brochard <pbrochard@common-lisp.net>
425 * contrib/volume-mode.lisp (set-default-volume-keys): Add more
426 keybindings (up/down, right/left) to raise/lower the volume.
428 * src/clfswm-layout.lisp: Add a variable border size for frames
431 2011-03-08 Philippe Brochard <pbrochard@common-lisp.net>
433 * src/clfswm-util.lisp (cut-current-child, remove-current-child)
434 (delete-current-child): Hide the current child before doing the
437 * src/clfswm-internal.lisp (show-all-children): Hide windows not
438 in the current root before displaying those in current root.
439 Remove all hide-all unnecessary calls.
441 * src/clfswm-configuration.lisp (save-variables-in-conf-file):
442 Save only variables with a different value than their original
445 2011-03-07 Philippe Brochard <pbrochard@common-lisp.net>
447 * src/clfswm-info.lisp (show-config-variable): Use the new
450 * src/clfswm-autodoc.lisp (produce-configuration-variables): Use
451 the new defconfig method.
453 * src/clfswm-configuration.lisp (create-configuration-menu):
454 Change the config system with a more lispy one and a less string
455 based one: (defconfig name value group doc).
458 2011-03-06 Philippe Brochard <pbrochard@common-lisp.net>
460 * src/clfswm-internal.lisp (show-all-children): Simplify the
462 (show-child): Display an unmanaged window whe it's the current
464 (show-all-children): add the ability to display all child from
465 *root-frame* and hide all those who are not in *current-root*.
466 -> remove hide-all-children when needed.
468 * src/xlib-util.lisp (move-window,resize-window): Add a
469 *color-move-window* border when moving or resizing a window.
471 2011-03-04 Philippe Brochard <pbrochard@common-lisp.net>
473 * src/clfswm-internal.lisp (show-all-children): Perform only one
474 recusion on the clfswm tree: calculate geometry and place child in
477 2011-03-03 Philippe Brochard <pbrochard@common-lisp.net>
479 * src/clfswm-internal.lisp (show-all-children): Rethink of display
480 child order to prevent very annoying flickering.
482 2011-02-27 Philippe Brochard <pbrochard@common-lisp.net>
484 * src/clfswm-util.lisp (query-yes-or-no): New function.
486 * src/clfswm-configuration.lisp (reset-all-config-variables): New
487 function and menu entry.
488 (query-conf-value): Add the ability to leave the field blank to
489 reset the variable to its default value.
491 2011-02-26 Philippe Brochard <pbrochard@common-lisp.net>
493 * src/clfswm-configuration.lisp
494 (add-all-configuration-default-value): Add a default value to
495 configurable variables.
497 2011-02-23 Philippe Brochard <pbrochard@common-lisp.net>
499 * src/clfswm.lisp (main-unprotected): Create the configuration
500 menu only once at startup.
502 2011-02-22 Desmond O. Chang <dochang@gmail.com>
504 * contrib/amixer.lisp: Add a volume mode inspired by the emms
505 volume package. Alsa mixer interface.
507 * contrib/volume-mode.lisp: Add a volume mode inspired by the emms
510 2011-02-22 Desmond O. Chang <dochang@gmail.com>
512 * src/clfswm.lisp (main): Use ASDF:SYSTEM-SOURCE-DIRECTORY instead
513 of *LOAD-TRUENAME*. *LOAD-TRUENAME* is only bound during a call to
514 LOAD. If one eval CLFSWM:MAIN in repl, BASE-DIR will be an empty
515 string. Use ASDF:SYSTEM-SOURCE-DIRECTORY to fix it.
517 2011-02-16 Philippe Brochard <pbrochard@common-lisp.net>
519 * src/clfswm.lisp (main-unprotected): Add a close hook. And close
520 the notify window, the virtual keyboard and the clfswm terminal by
523 2011-02-15 Philippe Brochard <pbrochard@common-lisp.net>
525 * src/clfswm.lisp (main-unprotected): Destroy the notify window
526 before closing the display. This fix a bug when resetting/reloading
529 2011-02-12 Philippe Brochard <pbrochard@common-lisp.net>
531 * src/xlib-util.lisp (equal-wm-class-fun, equal-wm-name-fun)
532 (raise-window-fun, raise-and-focus-window-fun): New functions.
534 * src/config.lisp (*clfswm-terminal-cmd*): Switch from xterm to
536 (*never-managed-window-list*): Structure change to be more
537 flexible. Let the choice to focus, raise and do nothing on never
540 2011-02-09 Philippe Brochard <pbrochard@common-lisp.net>
542 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Take
543 care of never managed windows to move or resize them if the raise
546 * src/clfswm-internal.lisp (in-frame, in-window, in-child): New
549 2011-02-08 Philippe Brochard <pbrochard@common-lisp.net>
551 * src/clfswm.lisp (main-mode): Raise or not unmanaged windows
552 following request in *never-managed-window-list*.
554 2011-02-05 Philippe Brochard <pbrochard@common-lisp.net>
556 * *: **** Release 1102 ****
558 2011-02-05 Desmond O. Chang <dochang@gmail.com>
560 * src/keysyms.lisp: Add extended keysyms from stumpwm.
562 2011-02-01 Desmond O. Chang <dochang@gmail.com>
564 * src/clfswm-util.lisp (run-or-raise): New function (thanks to
567 * src/clfswm-internal.lisp (with-all-*): add a nil block.
569 2011-01-28 Desmond O. Chang <dochang@gmail.com>
571 * src/clfswm-util.lisp (xdg-config-home): XDG_CONFIG_HOME should
572 be $HOME/.config by default.
574 2010-12-29 Philippe Brochard <pbrochard@common-lisp.net>
576 * contrib/osd.lisp (display-doc): Add another method where a
577 CLFSWM native window is used to display the key documentation.
579 2010-12-27 Philippe Brochard <pbrochard@common-lisp.net>
581 * src/xlib-util.lisp (with-xlib-protect): Force to revert to the
584 2010-12-25 Philippe Brochard <pbrochard@common-lisp.net>
586 * src/clfswm-second-mode.lisp (second-key-mode): Call the second
587 mode leave function only when the generic mode was ended.
589 2010-12-08 Philippe Brochard <pbrochard@common-lisp.net>
591 * src/clfswm-second-mode.lisp (sm-leave-function): Do not use
592 *second-mode-program* anymore.
594 2010-12-07 Philippe Brochard <pbrochard@common-lisp.net>
596 * src/clfswm-second-mode.lisp (*second-mode-leave-function*): New
597 variable bound to a function executed (when not null) on second
600 2010-11-14 Philippe Brochard <pbrochard@common-lisp.net>
602 * src/clfswm-util.lisp (find-child-under-mouse): Do not find
605 2010-11-13 Philippe Brochard <pbrochard@common-lisp.net>
607 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
608 Do not display the accel window for unmanaged windows.
610 2010-11-11 Philippe Brochard <pbrochard@common-lisp.net>
612 * src/clfswm-internal.lisp (set-current-root): Handle
613 window-parent in set-current-root.
615 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
616 focus the parent child when the current root is a window.
618 2010-11-09 Philippe Brochard <pbrochard@common-lisp.net>
620 * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
621 New function an bindings.
623 * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
626 2010-11-07 Philippe Brochard <pbrochard@common-lisp.net>
628 * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
629 function to let the user choose to keep child position with
632 * src/clfswm-internal.lisp (remove-frame-data-slot): New
635 2010-11-05 Philippe Brochard <pbrochard@common-lisp.net>
637 * src/clfswm-internal.lisp (frame-select-next-child)
638 (frame-select-previous-child): New functions and bindings. Select
639 the next/previous child in the current frame.
641 2010-10-31 Philippe Brochard <pbrochard@common-lisp.net>
643 * src/clfswm-query.lisp (query-mode-complet): New function: Handle
644 completion in query-mode.
646 2010-10-30 Philippe Brochard <pbrochard@common-lisp.net>
648 * src/clfswm-query.lisp (query-print-string): Handle long lines
651 2010-10-27 Philippe Brochard <pbrochard@common-lisp.net>
653 * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
654 all characters are printable.
656 2010-10-25 Philippe Brochard <pbrochard@common-lisp.net>
658 * contrib/server/server.lisp: Load clfswm client code in the main
659 program and let the user start it with a --client command line
662 * src/package.lisp (*main-entrance-hook*): New hook executed after
663 loading configuration file and before opening the display.
665 2010-10-23 Philippe Brochard <pbrochard@common-lisp.net>
667 * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
669 * src/clfswm-internal.lisp (show-child): Show window only if not
672 * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
673 change modifiers after binding definition.
675 2010-10-21 Philippe Brochard <pbrochard@common-lisp.net>
677 * contrib/osd.lisp: New file: OSD (On Screen Display) for
680 * src/clfswm-menu.lisp (open-menu): Modularise function.
682 2010-10-13 Philippe Brochard <pbrochard@common-lisp.net>
684 * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
685 key binding in main and second mode.
687 2010-10-10 Philippe Brochard <pbrochard@common-lisp.net>
689 * src/clfswm-util.lisp (open-notify-window): Convert hello-window
690 functions to a more generic Notify-window system.
692 * src/tools.lisp (add-timer): Add an id to identify the timer.
694 2010-10-09 Philippe Brochard <pbrochard@common-lisp.net>
696 * src/tools.lisp (erase-timer): New function.
698 * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
699 the hello window. Add Configuration variables.
701 2010-10-08 Philippe Brochard <pbrochard@common-lisp.net>
703 * src/clfswm-util.lisp (): Add an Hello window at startup.
705 * src/tools.lisp (process-timers): Add a timer system.
707 2010-10-07 Philippe Brochard <pbrochard@common-lisp.net>
709 * src/clfswm-query.lisp (add-in-query-string): Handle correctly
712 2010-10-06 Philippe Brochard <pbrochard@common-lisp.net>
714 * src/clfswm-query.lisp (query-print-string): Change cursor color
715 and show parenthesis matching with colors (on match and on
718 2010-10-05 Philippe Brochard <pbrochard@common-lisp.net>
720 * src/clfswm-internal.lisp (show-all-children): Do not raise a
721 child when its parent is hidden.
723 2010-10-02 Philippe Brochard <pbrochard@common-lisp.net>
725 * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
726 possibility to circulate over subchild of the current child.
728 * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
729 (expose-windows-generic): Add an escape-body function to return to
730 the original state on escape key.
732 * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
733 to bind the current child from the configuration file.
735 2010-10-01 Philippe Brochard <pbrochard@common-lisp.net>
737 * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
738 window hook: the frame absorb all new windows that match
739 nw-absorb-test frame data slot.
741 2010-09-30 Philippe Brochard <pbrochard@common-lisp.net>
743 * src/clfswm-expose-mode.lisp (expose-create-window): Show window
744 title in accel window.
746 2010-09-29 Philippe Brochard <pbrochard@common-lisp.net>
748 * configure: Use the Xavier Maillard clfswm script in contrib to
749 build an executable in the standard way.
751 2010-09-26 Philippe Brochard <pbrochard@common-lisp.net>
753 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
754 New functions. Add a window on each child in the expose mode to
757 * src/clfswm-internal.lisp (child-x, child-y, child-width)
758 (child-height): New methods to get real child coordinates.
760 2010-09-25 Philippe Brochard <pbrochard@common-lisp.net>
762 * src/clfswm-layout.lisp (*-layout): Use child-position.
764 * src/clfswm-internal.lisp (child-position): New function.
766 * src/clfswm-expose-mode.lisp (expose-windows-mode)
767 (expose-all-windows-mode): Use a generic mode.
769 * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
770 with handle-event-fun symbols instead of inspecting clfswm
771 internals symbols on each mode change.
773 * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
774 a separate clfswm-expose-mode.lisp file.
776 * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
777 screen size instead of hardcoded test coordinates.
779 2010-09-24 Philippe Brochard <pbrochard@common-lisp.net>
781 * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
782 (speed-mouse-right, speed-mouse-up, speed-mouse-down)
783 (speed-mouse-undo, speed-mouse-first-history): New functions to
784 quickly move the mouse. Implemented for the second mode.
786 2010-09-16 Philippe Brochard <pbrochard@common-lisp.net>
788 * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
789 write permission on $clfswm_asd_path. So anybody can start clfswm
790 even if there is no write permission on the source directory.
792 2010-09-12 Philippe Brochard <pbrochard@common-lisp.net>
794 * contrib/clfswm: Add support to cmucl, ccl and ecl.
796 2010-09-11 Philippe Brochard <pbrochard@common-lisp.net>
798 * src/clfswm-util.lisp (set-hide-unmanaged-window)
799 (set-show-unmanaged-window, set-default-hide-unmanaged-window):
800 New functions and menu entry.
801 (set-globally-hide-unmanaged-window)
802 (set-globally-show-unmanaged-window): New functions and menu
805 * src/clfswm-internal.lisp (hide-unmanager-window-p): New
807 (show-child): Add a data slot on frame to hide or not unmanaged
810 * src/clfswm-corner.lisp (present-clfswm-terminal)
811 (present-virtual-keyboard): Use a function (generic-present-body)
812 instead of a macro (generate-present-body).
814 * src/clfswm-util.lisp (update-menus): List all directories and
815 subdirectories in $XDG_DATA_DIRS/applications.
817 2010-09-10 Philippe Brochard <pbrochard@common-lisp.net>
819 * src/clfswm-corner.lisp (generate-present-body): New macro.
820 (present-clfswm-terminal, present-virtual-keyboard): Use
821 generate-present-body.
823 2010-09-09 Philippe Brochard <pbrochard@common-lisp.net>
825 * src/clfswm-util.lisp (update-menus): Follow XDG specifications
826 instead of the non-portable Debian update-menu.
828 2010-09-07 Philippe Brochard <pbrochard@common-lisp.net>
830 * src/clfswm.lisp (error-handler): New function do handle
831 asynchronous errors and ignore them.
832 (open-display): Install the new error-handler on display.
834 2010-09-05 Philippe Brochard <pbrochard@common-lisp.net>
836 * src/xlib-util.lisp (with-xlib-protect): Add a
837 with-simple-restart on top of body execution.
839 2010-09-04 Philippe Brochard <pbrochard@common-lisp.net>
841 * src/clfswm.lisp (main-loop): Protect all xlib functions with an
844 * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
845 handle-event. Add a with-simple-restart to prevent a
846 clisp/new-lisp infinite loop.
848 2010-08-30 Philippe Brochard <pbrochard@common-lisp.net>
850 * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
851 clfswm terminal working even on xterm title changes.
853 2010-08-29 Philippe Brochard <pbrochard@common-lisp.net>
855 * src/clfswm-util.lisp (run-other-window-manager): Update for
858 * src/tools.lisp (do-execute): New parameter io to change the
861 * src/clfswm-util.lisp (hide-current-child): Prevent from removing
864 * src/clfswm-internal.lisp (child-member): New predicate.
865 (child-remove): New function.
867 * src/*.lisp: Use child-member and child-remove everywhere it's
870 2010-08-28 Philippe Brochard <pbrochard@common-lisp.net>
872 * src/clfswm.lisp (main-loop): Ensure that all events have been
873 processed after a process-event.
875 * src/clfswm-internal.lisp (is-in-current-child-p): New function.
877 2010-08-27 Philippe Brochard <pbrochard@common-lisp.net>
879 * src/clfswm.lisp (main-mode:configure-request): Raise the window
880 only when present on the current child and focus it accordingly.
882 2010-08-26 Philippe Brochard <pbrochard@common-lisp.net>
884 * src/clfswm-circulate-mode.lisp (circulate-loop-function):
885 Use is-a-key-pressed-p.
887 * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
889 * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
890 returned by xlib:keysym->keycodes.
892 * src/*.lisp: Use the new child-equal-p to compare children. This
893 prevent a bug with sbcl/cmucl when the standard equal function
894 does not work with xlib:window.
896 * src/clfswm-internal.lisp (child-equal-p): New predicate.
898 2010-08-25 Philippe Brochard <pbrochard@common-lisp.net>
900 * src/clfswm-generic-mode.lisp (generic-mode): Use an
901 xlib:event-listen before processing event with
902 xlib:process-event. This prevent a bug with CLX threaded
903 implementation like sbcl.
905 * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
906 processing event with xlib:process-event. This prevent a bug with
907 CLX threaded implementation like sbcl.
909 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
911 * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
913 * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
916 * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
917 (find-parent-frame, find-frame-window, find-frame-by-name)
918 (find-frame-by-number): Use with-find-in-all-frames to search in
919 frames in the right order.
921 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
922 unwanted flickering with unmanaged windows.
924 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
926 * src/package.lisp: Remove event handler hooks as they're not
927 needed anymore (To replace them: use closure and define-handler).
929 * src/xlib-util.lisp (move-window, resize-window)
930 (wait-mouse-button-release): Use a generic mode.
932 * src/*.lisp: Replace the case to handle event with a more (tricky)
933 lispy method which bind a function to each keywords associated
936 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
938 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
939 menu entry between delete-current-child and remove-current-child.
940 ie: Delete a child and its children in all frames by default.
942 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
944 * src/package.lisp: Add a placement configuration group.
946 * src/binding*.lisp: Bind control+g to escape the current action
949 * src/clfswm-internal.lisp
950 (delete-child-and-children-in-all-frames): New function and
951 binding: Second mode - Control+Delete delete the current child and
952 its children in all frames (ie: close the current child and its
955 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
957 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
958 the frame window and the frame gc. Close a very annoying bug when
959 cuting/pasting a frame or moving a child over frames with the
962 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
963 all children in *current-root* after moving/resizing a frame.
965 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
967 * src/clfswm-util.lisp (delete-focus-window)
968 (destroy-focus-window): Remove child in parent frame before
971 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
973 * src/clfswm-util.lisp (identify-key): Add a timeout in
975 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
976 of the window passed by xlib:process-event.
978 * src/xlib-util.lisp (move-window, resize-window)
979 (wait-mouse-button-release): Add a timeout in xlib:process-event.
981 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
983 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
984 to launch an other window manager and to return to clfswm.
986 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
988 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
991 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
993 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
996 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
997 parameter and a loop timeout.
999 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
1001 * src/clfswm.lisp (main): Add an alternate configuration filename
1004 * load.lisp: Add a debuging code example.
1006 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
1008 * src/clfswm-configuration.lisp (create-configuration-menu): New
1009 menu to configure all clfswm variables while clfswm is running.
1011 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
1013 * src/clfswm-util.lisp (save-configuration-variables): New
1014 function to save all configuration variables in clfswmrc.
1016 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
1018 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
1020 (set-default-info-keys): Add cursor key support in info mode.
1022 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
1024 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
1027 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
1028 prevent reading the configuration file (this may be useful to
1029 produce the original documentation without user modifications
1030 with the rc configuration file).
1032 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
1034 * src/bindings-second-mode.lisp (set-default-second-keys):
1035 Simplification of Escape key to close/kill/remove the focus window
1036 and unhide all windows.
1038 * src/bindings.lisp (set-default-main-keys): Simplification of
1039 Escape key to close/kill/remove the focus window and unhide all
1042 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
1043 focus and unhide all windows capabilities.
1045 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1047 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
1049 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
1051 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
1052 Keep child order and don't make unnecessary child movement.
1053 (one-column-layout, one-line-layout): New layouts.
1055 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
1057 * *: **** Release 0906 ****
1059 * contrib/cd-player.lisp: New file to handle the CD player.
1061 * contrib/xmms.lisp: New file to handle the xmms player.
1063 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1065 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
1066 Maximize windows in their frame - Leave frames to their actual
1069 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
1070 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
1072 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
1074 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
1076 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
1078 * contrib/mpd.lisp: Use a standard menu.
1080 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
1082 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
1084 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
1086 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
1088 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
1091 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
1093 * src/config.lisp (get-fullscreen-size): One pixel adjustment
1096 * src/clfswm-placement.lisp (*-child-placement): One pixel
1099 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
1101 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
1102 Ensure that all characters are printable.
1104 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
1107 * src/clfswm-placement.lisp (*-child-placement): Adjust
1108 coordinates to one pixel in the current child.
1110 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1112 * src/clfswm-query.lisp (query-enter-function): Assign font before
1113 width and height calculation.
1115 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1117 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
1118 bannish the pointer in an arbitrary place.
1120 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
1121 place the info window in an arbitrary place.
1123 * src/clfswm-query.lisp (query-enter-function): Use with-placement
1124 macro to place the query window in an arbitrary place.
1126 * src/clfswm-placement.lisp: New file. Allow to place info windows
1127 or query windows on an arbitrary place. Allow to bannish the
1128 pointer on an arbitrary place.
1130 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
1132 * src/clfswm-circulate-mode.lisp (reorder-child)
1133 (reorder-brother): Unfocus windows before reordering children or
1136 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1138 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
1139 the parent is a frame.
1141 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
1142 motion with a default modifier.
1144 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
1147 * src/clfswm-info.lisp (info-mode): Handle motion with a default
1149 (info-mode): Optimization in loop function.
1151 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1153 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
1154 root-frame correctly.
1156 * clfswm.asd: Dependency fix for clfswm-generic-mode.
1158 * src/clfswm-circulate-mode.lisp (reorder-child)
1159 (reorder-brother): Handle empty frames.
1160 (reorder-brother): Redisplay only the parent frame of the current
1163 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
1164 parent frame of the current frame.
1166 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
1168 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
1169 Maximize/Unmaximize the current frame in its parent frame.
1171 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
1172 windows and frames in their parent frame.
1174 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1176 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
1178 * src/clfswm-circulate-mode.lisp (reorder-child)
1179 (reorder-brother): Reinitialise on circulate type change
1180 child to brother or brother to child.
1182 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
1183 calls xlib:display-finish-output on each map-request. So speed up
1186 * src/xlib-util.lisp (map-window): New function. Call
1187 xlib:display-finish-output on each map request.
1189 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1191 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
1192 Optimisation when drawing second mode window.
1194 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1196 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
1199 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1201 * src/clfswm-util.lisp (run-program-from-query-string): Launch
1202 command only with a return validation.
1204 2009-04-22 Xavier Maillard <xma@gnu.org>
1206 * src/clfswm-query.lisp (query-string): Use a generic mode.
1208 2009-04-19 Xavier Maillard <xma@gnu.org>
1210 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
1212 2009-04-18 Xavier Maillard <xma@gnu.org>
1214 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
1215 to define all other modes.
1217 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1219 * src/package.lisp (): Use *default-font-string* for all
1222 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
1224 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
1226 * src/xlib-util.lisp (null-size-window-p): Better check of null
1229 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
1231 * src/clfswm.lisp (handle-map-request): Add a fix to manage
1232 correctly fullscreen windows (SDL particularly).
1234 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
1236 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
1237 a segfault with clisp/new-clx.
1239 * src/clfswm.lisp (handle-motion-notify): Add a needed window
1242 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
1243 needed window argument.
1245 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
1247 * src/xlib-util.lisp (wait-no-key-or-button-press)
1248 (wait-a-key-or-button-press): Check buttons press/release correctly"
1250 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
1252 * src/menu-def.lisp: Add children navigation menu in the movement
1253 menu (select next/previous child/brother/level).
1255 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
1257 * *: Rename 'sister' frame to 'brother' frame.
1259 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
1260 alias in a real modifier.
1262 * src/package.lisp (*modifier-alias*): New list of modifier alias
1263 For example: :alt is :mod-1, :numlock is :mod-2...
1265 * src/tools.lisp (remove-hook): New function.
1267 * src/clfswm-keys.lisp (with-capslock, without-capslock)
1268 (with-numlock, without-cnumlock): New functions.
1270 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
1272 * src/clfswm-info.lisp: Use the *binding-hook* to create info
1273 keys and mouse bindings.
1275 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
1276 second keys and mouse bindings.
1278 * src/bindings.lisp: Use the *binding-hook* to create main keys
1281 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1283 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
1286 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
1288 * src/menu-def.lisp: Use a menu instead of a function for the
1291 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
1293 * src/clfswm-util.lisp (show-standard-menu): Display the standard
1294 menu from the 'update-menus' command.
1296 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
1298 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
1299 it's already grabbed.
1301 * src/clfswm-internal.lisp (display-frame-info): Use configurable
1302 colors and fix a bug with background.
1303 (display-frame-info): Set window background when displaying info.
1305 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1307 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
1308 warning with clisp/new-clx.
1310 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
1312 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
1315 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1317 * *: **** Release 0809 ****
1319 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1321 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
1323 (ensure-unique-number): New function and menu entry.
1325 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
1327 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
1328 hook: open the next window in a named frame.
1329 (numbered-frame-nw-hook): New new window hook: open the next
1330 window in a numbered frame.
1332 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
1333 cases. So query-string can be called even in the main mode.
1335 * src/clfswm-internal.lisp (show-all-children): Do not raise a
1336 child by default => far less flickering.
1338 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
1340 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
1342 * src/menu-def.lisp: Change key binding for the CLFSWM menu
1345 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
1346 is nil. (workaround on some CLX implementation).
1348 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
1350 * src/menu-def.lisp: Add a menu to set a focus policy for all
1353 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
1354 (all-frames-set-*-focus-policy): Set a focus policy for all
1357 * src/clfswm.lisp (handle-enter-notify): sloppy-select
1358 mode. Select a child and its parents on mouse over.
1360 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
1362 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
1363 policy -> Sloppy focus only for windows in the current frame.
1364 (main-unprotected): Exit clfswm on init error (ie: when another
1365 window manager is running).
1367 * src/clfswm-util.lisp (reset-clfswm): New function.
1369 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
1371 * src/clfswm-menu.lisp (init-menu): New function.
1373 * src/clfswm-util.lisp (reload-clfswm): New function to reload
1375 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
1377 * src/clfswm.lisp (main, main-unprotected): Handle error in a
1378 superior main function. Now CLFSWM can't break the X session. It
1379 just reinitialize the display and run a new main loop.
1381 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
1382 *vt-keyboard-on* global to avoid warnings when loading clfswm.
1384 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
1385 (help-on-gimp-layout): Describe how to use the GIMP layout.
1387 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
1389 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
1390 main-window-right-layout. Change the keybinding for (shift)alt+tab
1391 to not select windows in the main window lisst.
1392 Bind F8 to add a window in the main window list.
1393 Bind F9 to remove a window in the main window list.
1394 Change the focus policy to :sloppy.
1395 (set-previous-layout): Restore the previous layout, keybinding and
1398 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
1400 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
1402 * src/clfswm-layout.lisp (main-window-left-layout)
1403 (main-window-bottom-layout, main-window-top-layout): New
1405 Factorize layouts in menu.
1407 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
1409 * src/clfswm-layout.lisp (main-window-right-layout): A possible
1410 GIMP layout: one or more main windows on one side of the
1411 frame. Others on the other size.
1413 * src/clfswm-util.lisp
1414 (current-frame-set-click/sloppy-focus-policy): Each frame can have
1415 a different focus policy (one of :click or :sloppy).
1416 The default focus policy is set with *default-focus-policy*.
1418 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
1420 * src/clfswm-info.lisp (show-config-variable): New function.
1422 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
1424 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
1426 * src/clfswm-info.lisp: Colored help for key binding and corners
1429 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
1431 * src/clfswm-util.lisp (delete-focus-window)
1432 (destroy-focus-window): Remove chid only in
1433 handle-unmap/destroy-notify. Focus *current-root* only when
1434 closing/killing the current child.
1436 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
1437 functions or corners.
1439 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1441 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
1442 action: Hide/Unhide a terminal on mouse corner action. (By default
1443 right mouse button on the top left corner).
1445 * src/config.lisp (*never-managed-window-list*): New config
1448 * src/clfswm-internal.lisp (never-managed-window-p): New function:
1449 Handle never managed window in a more simple way.
1451 * src/clfswm-corner.lisp: New file and new and more simple method
1452 to define corners actions.
1454 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
1456 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
1458 * src/clfswm-layout.lisp (fast-layout-switch)
1459 (define-fast-layout-switch): New functions: Switch between two
1462 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
1463 really in the second mode. So leave-second-mode can be used even
1466 * src/clfswm-util.lisp (switch-to-last-child): New function:
1467 Store the current child and switch to the previous one.
1469 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1471 * src/clfswm-util.lisp (display-current-window-info): Display the
1473 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
1474 (top right by default). By default 'xvkbd' is used.
1476 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1478 * src/xlib-util.lisp (move-window, resize-window): Compress motion
1481 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
1483 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
1486 * src/clfswm-info.lisp (info-mode): Compress motion events.
1488 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
1490 * src/clfswm-internal.lisp (show-all-children): Compute geometry
1491 and selection first and then show only necessary children.
1492 (show-child): remove unneeded display-p parameter.
1494 * src/config.lisp (get-fullscreen-size): Place the frame border
1495 outside the screen (this prevent the loose of 2 pixels per
1498 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
1500 * src/clfswm-internal.lisp (focus-child): Algorithm change to
1501 raise only the selected child.
1503 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
1505 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
1506 Raise only viewable children.
1508 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
1510 * src/clfswm-internal.lisp (show-all-children): Always raise all
1511 displayed children. Remove all references to raise-p.
1513 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1515 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
1518 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
1519 second mode binding on raise/lower child in its frame.
1521 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
1522 behaviour to the new raise/lower property.
1523 Call clear-nw-hook before the rest of the hook.
1525 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
1526 (mouse-click-to-focus-and-resize-window): Stop button event. This
1527 prevent a keyboard/pointer freeze.
1529 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1531 * src/clfswm-internal.lisp (frame-lower-child)
1532 (frame-raise-child): New functions to raise/lower a child in its
1535 * src/clfswm-util.lisp (have-to-present-windows)
1536 (have-to-present-all-windows): New functions to have an MaxOS
1537 expose like on mouse click in screen corner.
1539 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
1541 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
1543 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
1544 child from a choice in all frames with hidden children.
1546 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
1548 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
1550 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
1551 (unhide-all-children): New functions.
1553 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
1556 * src/clfswm-util.lisp (hide/show-frame-window): new function and
1559 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
1561 * src/clfswm-util.lisp (rename-current-child): Do not display the
1562 frame info for a window.
1564 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
1566 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
1567 frame window for the removed child and its children.
1569 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
1571 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
1574 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
1576 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
1577 the ROX pinboard (ie: leave it lowered in the root window as
1580 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
1581 (tile-left-layout, tile-right-layout, tile-top-layout)
1582 (tile-bottom-layout): Use all the frame space when there is only
1585 * src/clfswm-internal.lisp (place-window-from-hints): Center
1586 unmanaged windows in the root screen.
1588 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
1591 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1593 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
1594 typo in managed types.
1596 * src/clfswm-internal.lisp (show-child): Always display frame info
1597 even if the frame is hidden.
1599 * src/xlib-util.lisp (resize-window): Use a better algorithme to
1602 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1604 * src/clfswm-util.lisp (with-movement): Display frame info for all
1605 frames in current root.
1607 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1609 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
1611 * src/bindings-second-mode.lisp (define-second-key #\a): New
1612 binding on 'add-default-frame'.
1614 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1615 message to follow the autodocumentation process.
1617 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1619 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1620 "Space" to jump to a child. "B" to bind a slot on the current
1623 * src/bindings-second-mode.lisp: Use "Tab" instead of
1626 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
1628 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1629 unmanaged (hidden) windows.
1631 * src/clfswm-internal.lisp (place-window-from-hints): Give a
1632 minimal size for windows.
1633 (with-all-windows-frames-and-parent): New function.
1635 * src/config.lisp (*default-window-width/height*): New parameters.
1637 * src/clfswm-internal.lisp (place-window-from-hints): Center
1638 windows in the screen instead of in their frame.
1640 * src/bindings-second-mode.lisp (tile-space-current-frame): New
1643 * src/clfswm-layout.lisp (register-layout): Intern the once name
1644 in the right package.
1646 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1648 * doc/dot-clfswmrc: Update to follow the new clfswm way.
1650 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
1652 * src/clfswm-internal.lisp (set-current-child)
1653 (adapt-child-to-parent, show-child, hide-child): Handle the case
1654 where child is not a frame or a window.
1656 * src/clfswm-util.lisp
1657 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1658 Check if child is a frame.
1660 * src/clfswm-internal.lisp (managed-window-p): Handle the case
1661 where frame is null.
1662 (place-frame): Check if frame and parent are frames.
1664 * src/clfswm-info.lisp (info-mode): display all frame info before
1667 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1668 info before leaving.
1670 * src/clfswm-internal.lisp (display-all-frame-info): New function.
1672 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
1674 * src/tools.lisp (getenv): Implemented for ECL.
1675 (urun-prog): Implemented for ECL.
1677 * src/clfswm-util.lisp (identify-key): Use a double buffer to
1680 * src/clfswm-query.lisp (query-string): Use a double buffer to
1683 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1686 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1689 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
1691 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1693 * src/menu-def.lisp: New file: move all menu definition in
1696 * src/clfswm-layout.lisp (register-layout): Use a function instead
1699 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
1701 * src/clfswm-autodoc.lisp (produce-menu-doc,
1702 (produce-menu-doc-html): New functions.
1703 (produce-doc-*): Moved to clfswm-autodoc.lisp.
1705 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1706 paste a child on one of its own children. (this prevent a
1708 (move-child-to): Rename move/copy-current-child-by to
1710 (mouse-move-window-over-frame): New function to move the window
1711 under the mouse cursor to another frame.
1713 * src/clfswm-internal.lisp (find-child-in-parent): New function.
1715 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1717 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1718 windows only when its window parent is the current child.
1720 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1722 * src/clfswm-util.lisp (manage-current-window)
1723 (unmanage-current-window): New functions: Allow to force to manage
1724 or unmanage a window by its parent frame.
1726 * src/bindings-second-mode.lisp (#\o): binded to
1727 set-open-in-new-frame-in-parent-frame-nw-hook and
1728 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1730 * src/clfswm-util.lisp (with-current-window): New macro.
1732 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1733 exposure and enter-window handle event.
1735 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1736 children for the current child after the move/resize.
1738 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1740 * src/xlib-util.lisp (resize-window): Take care of window size
1743 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1744 move/resize unmanaged windows.
1746 * src/xlib-util.lisp (move-window, resize-window): New functions.
1748 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1750 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1751 user choose what window type the current frame must handle.
1752 (display-current-window-info): New function.
1753 (current-frame-manage-all-window-type)
1754 (current-frame-manage-only-normal-window-type)
1755 (current-frame-manage-no-window-type): New functions.
1757 * src/clfswm-internal.lisp (managed-window-p): New function.
1759 * src/package.lisp (frame): Managed type: new frame
1760 parameter. This allow to choose what window type a frame must
1763 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1765 * src/clfswm-nw-hooks.lisp
1766 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1768 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1771 * src/tools.lisp (ensure-printable): Return always a string even
1774 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
1776 * src/config.lisp (*default-nw-hook*): New variable to change the
1777 default new window hook.
1779 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1781 * clfswm.asd (clfswm): Add a dependency from
1782 clfswm-second-mode.lisp to clfswm.lisp.
1784 * src/clfswm-util.lisp (identify-key): Show the documentation for
1785 the function bound on a key.
1786 (with-movement): Move with-movement,
1787 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
1788 to clfswm-util.lisp.
1790 * src/clfswm-menu.lisp: New menu system that let user change keys
1791 or functions associated to keys.
1793 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
1795 * src/clfswm-internal.lisp (show-all-children): Display-child is
1796 the first child by default. Solve a bug with father-p.
1798 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
1800 * src/clfswm-internal.lisp (add-frame): Add frame return the
1802 (show-all-children): Move the size computation outside the
1805 * src/bindings-second-mode.lisp (with-movement): Redisplay only
1808 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1809 only the current child.
1811 * src/clfswm-internal.lisp (show-all-children): New display-child
1812 parameter to display only the desired child and its children.
1813 (select-next/previous-child): Only display the current child.
1815 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
1817 * src/clfswm.lisp (init-display): Move the default frame creation
1818 on the default init hook.
1820 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1821 the main mode (for example: "1" on an azerty keyboard).
1823 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
1825 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1826 keysyms. Revert to old grabbing method for the main mode.
1828 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
1830 * src/clfswm.lisp (init-display): Add key handling on no focus
1831 window and on frame windows.
1833 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1835 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1836 all keys by default and replay just what is needed. No change for
1839 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1840 (find-key-from-code): Test for shift and not shift presence.
1842 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
1844 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1845 new key parameter to have less flickering.
1847 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
1849 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1850 layout only one time and revert to no-layout to freely handle
1853 * src/clfswm-nw-hooks.lisp
1854 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1855 with new created window.
1857 * src/clfswm-layout.lisp (register-layout): Now register
1858 automatically a once layout to set the layout only one time and
1859 revert to no-layout to freely handle frames.
1861 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1863 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1864 nw-hook: Open the next window in the current frame and leave the
1865 focus to the current child.
1867 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
1869 * src/bindings-second-mode.lisp: Add keys definitions to
1870 bind-or-jump in the second mode.
1872 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
1873 macro for bind-or-jump-(1|2|3...).
1875 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
1876 arguments to function. This allow to do things like:
1877 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
1878 are passed to my-function on key press.
1880 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
1882 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
1884 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
1886 * src/clfswm-internal.lisp (child-fullname): New function
1888 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
1889 docstring in info-mode-menu. An item can be
1890 '((key function) (key function)) or with docstring
1891 '((key function "documentation 1") (key function "bla bla") (key function))
1893 * src/tools.lisp (ensure-n-elems): New function.
1895 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
1896 resize a frame or the window's father.
1898 * src/clfswm.lisp (init-display): Remove tile-space-layout by
1899 default on the root frame.
1901 * src/clfswm-util.lisp (move/resize-frame): Add standard event
1902 hooks handlers (map-request, configure-notify...)
1904 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
1907 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1909 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
1910 or the window's father.
1912 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
1913 event only if there is a geometry change.
1914 (mouse-focus-move/resize-generic): Generic function to move or
1915 resize a frame or a window father frame.
1917 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1919 * src/clfswm-internal.lisp (show-all-children): Return t if there
1920 is a geometry change.
1922 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
1924 * src/bindings.lisp (Up/Down): Swap select previous/next level.
1926 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
1928 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
1930 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
1931 (with-all-*): Reverse the child list to manage the first child last (like in
1934 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
1935 root window only if true.
1937 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
1938 root window only if *create-frame-on-root* is true.
1940 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
1943 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
1945 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
1946 the current child (even if it's a window).
1948 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
1950 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
1951 (mouse-click-to-focus-and-resize): New functions.
1953 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
1954 (*-px->fl): Convert pixel coordinates to float.
1956 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
1958 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
1960 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
1963 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
1964 and hide-all-children.
1965 (raise-if-needed): New function.
1966 (show-child): Use a first-p parameter to raise windows only when they are
1969 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
1971 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
1974 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
1976 * src/clfswm-info.lisp (keys-from-list): new function.
1978 * src/*: rename 'childs' in 'children'.
1980 * src/*: rename 'group' in 'frame'.
1982 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
1984 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
1986 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
1988 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
1990 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
1992 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
1993 Bind control+o to open the next window in a new group in the root group
1994 (as open in next window in a new workspace in 0801 version).
1996 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
1998 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
2001 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
2003 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
2004 instead of Tab for select-previous-child.
2006 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
2008 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
2011 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
2013 * clfswm-util.lisp (identify-key): Display the documentation
2014 associated to keys when identifying a key.
2016 2008-03-10 Xavier Maillard <xma@gnu.org>
2018 * contrib/clfswm: Complete rewrite of the script. Detect error and
2019 act accordingly. Add command line arguments to configure the
2020 script execution. User can now choose different common lisp
2021 implementation (clisp and sbcl only), choose where to store the
2022 dumped image, where to find clfswm source.
2024 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
2026 * clfswm-internal.lisp (process-new-window): Beginning of new
2027 window hook: each group have a hook to tell what he wants to do
2028 with the new created window.
2030 2008-03-08 Xavier Maillard <xma@gnu.org>
2032 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
2033 call the resulting executable.
2035 * clfswm.lisp (read-conf-file): Check for the user config file in
2036 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
2037 prefered whenever possible.
2039 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
2041 * clfswm-layout.lisp (*-layout): Add an optional raise-p
2042 parameter in each layout.
2044 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2046 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
2048 (copy/move-current-child-by-name/number): new functions
2049 (focus-group-by-name/number): new functions
2050 (delete-group-by-name/number): new functions
2052 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2054 * ************************************************************ *
2055 *: Major update - No more reference to workspaces. The main *
2056 structure is a tree of groups or application windows. *
2057 * ************************************************************ *
2059 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
2061 * clfswm.lisp (read-conf-file): Read configuration in
2062 $HOME/.clfswmrc or in /etc/clfswmrc or in
2063 $XDG_CONFIG_HOME/clfswm/clfswmrc.
2064 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
2067 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
2069 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
2072 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
2074 * clfswm-internal.lisp (find-window-group): New function.
2076 * clfswm*: Change to make clfswm run with clisp/new-clx.
2078 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
2080 * clfswm-util.lisp (query-show-paren): Add show parent matching in
2082 (query-string): Bind control+k to delete end of line.
2084 * clfswm-second-mode.lisp (draw-second-mode-window): Display
2085 the action on mouse motion in second mode.
2087 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
2088 event but do not clear the root window.
2089 (handle-configure-request): Adjust unmanaged window from their
2092 * clfswm-internal.lisp (process-new-window): Adjust new window
2093 with the specified hints (max/min/base width/height).
2095 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
2097 * clfswm.lisp (handle-configure-request): Send an Configuration
2098 Notify event. This solve a bug with xterm and rxvt who takes some
2099 times to be mapped. Now there is no delay.
2101 * bindings-second-mode.lisp (define-shell): Run programs after
2102 living the second mode.
2104 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
2106 * clfswm-internal.lisp (process-new-window): Do not crop transient
2107 window to group size.
2108 (adapt-window-to-group): Do not crop transient window to group
2111 * clfswm.lisp (handle-configure-request): Adapt just the window to
2112 its group and don't take care of the configure request. Remove the
2113 bug with the Gimp outside the group and speed up the window
2115 (handle-exposure): Remove show-all-group on exposure event
2118 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
2120 * clfswm-util.lisp (circulate-group-up-copy-window)
2121 (circulate-group-down-copy-window)
2122 (circulate-workspace-up-copy-group)
2123 (circulate-workspace-down-copy-group): Prevent the copy of the
2124 same window in the same workspace.
2126 * bindings-second-mode.lisp (release-copy-selected-window)
2127 (release-copy-selected-group): Prevent the copy of the same window
2128 in the same workspace.
2130 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
2131 (generic-pager-move-window-on-next-line): Remove the copy
2133 (generic-pager-move-group-on-next-workspace)
2134 (generic-pager-move-group-on-previous-workspace): Prevent the copy
2135 of the same window in the same workspace.
2137 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
2138 (mouse-pager-copy-selected-group-release): Prevent the copy of the
2139 same window in the same workspace.
2141 * tools.lisp (setf/=): new macro to set a variable only when
2144 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
2145 x, y... only when necessary.
2147 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
2149 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
2150 new function and hook: force windows to stay in its group (solve a
2153 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
2155 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
2156 less flickering when moving/resizing groups.
2158 * clfswm-internal.lisp (hide-group): new function.
2159 (show-all-group): clear-all: new parameter.
2161 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
2163 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
2165 * clfswm*: Color change for the pager. Typo or better description
2166 in bindings definitions. Define bindings for a qwerty keyboard by
2167 default. dot-clfswmrc show examples to switch to an azerty
2169 License change to GPL v3.
2170 * config.lisp: new file - group all globals variables in this
2173 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
2175 * xlib-util.lisp (hide-window): Remove structure-notivy events
2176 when hidding a window.
2178 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
2180 * package.lisp (*sm-property-notify-hook*): Readded
2181 property-notify-hook in second mode.
2183 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
2185 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
2187 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
2189 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
2190 Tile the current workspace with the current window on one side and
2191 others on the other (this emulate the larswm, dwm, wmii way). See
2192 the default configuration file to enable this mode by default.
2194 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
2197 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
2199 * clfswm-pager.lisp (pager-draw-window-in-group): Add
2200 ensure-printable to print windows name even with non-ascii
2203 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
2205 * clfswm-pager.lisp (pager-explode-current-group): Create a new
2206 group for each window in group.
2207 (pager-implode-current-group): Move all windows in workspace to
2208 one group and remove other groups.
2210 * clfswm-pack.lisp (explode-group): Create a new group for each
2212 (implode-group): Move all windows in workspace to one group and
2213 remove other groups.
2215 * clfswm-util.lisp (identify-key): Remove local configuration
2216 variables and made them available for configuration from
2218 (query-string): idem.
2220 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
2222 * netwm-util.lisp: Start of NetWM compliance.
2223 Add a Netwm client list gestion.
2225 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
2227 * clfswm-internal.lisp (create-group-on-request): open a new group
2228 only when the current group is not empty.
2230 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
2231 bug with null workspace.
2233 * clfswm-pager.lisp (pager-handle-event): Add a hook
2234 system. This hooks can be changed in the user configuration file.
2236 * package.lisp: All colors and font variables are set in
2237 package.lisp and can be configured in the user configuration
2239 Note: If you have configured some less ugly colors (esp. for the
2240 pager) don't hesitate to let me know :)
2242 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
2243 system. This hooks can be changed in the user configuration file.
2245 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
2246 changed in the user configuration file (~/.clfswmrc)
2248 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
2250 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
2251 arrow action, open next window in new workspace/group.
2253 * bindings.lisp (stop-all-pending-actions): new binding.
2254 (open-next-window-in-new-group-once): Open the next windows in a
2255 new group (only once) or open all new windows in a new group (like
2256 others windows managers).
2258 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
2260 * clfswm.lisp (read-conf-file): New function to read a lisp
2261 configuration file at startup.
2262 (focus-group-under-mouse): Check if group isn't the current group
2263 ( prevent a bug with unclutter ).
2265 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
2267 * bindings.lisp (run-program-from-query-string): A program can be
2268 launch from a input query window.
2270 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
2272 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
2274 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
2276 * clfswm.lisp (process-new-window): One can now open the next
2277 window in a workspace called by its number.
2279 * clfswm-util.lisp (query-font-string): Minimal editing
2281 (eval-from-string): And an REPL in the window manager... :)
2283 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2285 * clfswm.lisp (process-new-window): One can now open the next
2286 window in a new workspace or a new group.
2288 * clfswm-pager.lisp (pager-mode): Display the next arrow action
2289 with the hidden windows.
2291 * clfswm.lisp (second-key-mode): Display the current workspace
2292 number and the next arrow action in the state window.
2294 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
2295 the pager mode and then redisplay only the current workspace.
2297 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
2299 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
2300 they can be focused with a keypress, sorted or renumbered.
2302 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2304 * clfswm-pager.lisp (pager-mode): Remove multiple silly
2305 pager-draw-display. This prevent a lot of flickering in the
2308 * clfswm.lisp: Remove all display-force-output and replace them
2309 with only one display-finish-output in the event loop.
2311 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
2313 * clfswm-pager.lisp (pager-center-group): New function - center a
2314 group at the middle of the screen.
2316 * clfswm-pack.lisp (center-group): New function - center a group
2317 at the middle of the screen.
2319 * clfswm.lisp (show-group): Add a cross line under the group.
2320 (show-group): Group are showned even if fullscreened.
2321 (init-display): Add an exposure event on the root window.
2323 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
2325 * package.lisp (*default-group*): Default group is the same size
2326 of a fullscreened group.
2328 * bindings*: Use shift to move, control+shift to copy.
2330 * *.lisp: Add comments for configuration or alternatives. So grep
2331 for CONFIG to see where you can configure clfswm. And grep for
2332 Alternative to use some commented code.
2334 * clfswm.lisp (second-key-mode): Use a single window to show the
2335 second mode. See for alternatives at the end of this file.
2337 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
2339 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
2340 macro of key and mouse definitions.
2341 (define-define-key/mouse): Use state instead of modifiers list
2342 this fix a bug when the modifiers list is not in the rigth order.
2344 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
2346 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
2348 * clfswm-info.lisp (info-mode): Add an info mode.
2350 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
2352 * clfswm.lisp (process-new-window): Change border size for
2354 (show-all-windows-in-workspace): Unhide all windows even when the
2355 current group is in fullscreen mode.
2357 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
2359 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
2360 redisplay the identify window after a terminal switch.
2362 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
2363 redisplay the pager after a terminal switch.
2365 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
2367 * clfswm-util.lisp (identify-key): Add a window to display
2368 the keys to identify on screen.
2370 * bindings.lisp, bindings-pager.lisp: Define same keys to
2371 move/copy groups/windows in second mode and in pager.
2373 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
2375 (show-all-windows-in-workspace): unhide window before adapting it
2378 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
2380 * clfswm.lisp (handle-event): Revert to an older version.
2382 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
2384 * clfswm-util.lisp (force-window-in-group)
2385 (force-window-center-in-group): New functions for transient windows.
2387 * clfswm-pager.lisp (pager-remove-current-workspace/group):
2388 bugfix: hide all windows before removing group or workspace.
2390 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
2392 * bindings-pager.lisp (mouse-pager-move-selected-group)
2393 (mouse-pager-copy-selected-group)
2394 (mouse-pager-move-selected-window)
2395 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
2396 (mouse-pager-rotate-window-down): New functions to have mouse in
2399 * clfswm-pager.lisp (pager-swap-window)
2400 (pager-copy-group-on-next/previous-workspace)
2401 (pager-copy-window-on-next/previous-line): New functions
2403 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
2405 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
2406 (pager-move-group-on-next/previous-workspace): new functions.
2408 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
2409 to its half size (new functions).
2411 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
2413 * clfswm-pager.lisp: workspaces, groups and windows can now be
2414 selectionned with the keyboard or the mouse.
2416 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
2418 * clfswm-pager.lisp (pager-select-workspace-right/left):
2419 workspaces can now be selectionned with the keyboard.
2421 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
2423 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
2424 new function to remove a previous defined key or mouse combination.
2426 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
2428 * clfswm.lisp (main): Check for access error in init-display.
2430 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
2431 keycode before grabbing.
2433 * bindings.lisp: Remove nlambda and use defun to keep the function
2434 documentation with clisp.
2435 (define-shell): new macro to define shell command for the second
2438 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
2440 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
2443 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
2445 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
2446 workspace circulation.
2448 * clfswm-util.lisp (absorb-orphan-window): new function.
2450 * clfswm-keys.lisp: Keysyms support.
2452 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
2454 * clfswm.lisp (show-group): Use one gc for all groups and not one
2457 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
2459 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
2461 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
2462 width and height outside group.
2464 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
2466 * clfswm.lisp: First public release.