1 2012-05-28 Philippe Brochard <pbrochard@common-lisp.net>
3 * contrib/toolbar.lisp: begining of toolbar support.
5 2012-05-24 Philippe Brochard <pbrochard@common-lisp.net>
7 * src/clfswm-internal.lisp (rotate-root-geometry): Do not use
8 rotatef but a simpler algorithm.
10 2012-05-19 Philippe Brochard <pbrochard@common-lisp.net>
12 * src/clfswm-placement.lisp: Adjust width and height in child and
13 root placement to prevent too big child size.
15 2012-05-18 Philippe Brochard <pbrochard@common-lisp.net>
17 * src/clfswm-placement.lisp: New root placement possibility.
19 * src/clfswm-util.lisp (change-current-root-geometry): New
22 2012-05-17 Philippe Brochard <pbrochard@common-lisp.net>
24 * src/clfswm-util.lisp (exchange-root-geometry-with-mouse): New
27 2012-05-16 Philippe Brochard <pbrochard@common-lisp.net>
29 * src/menu-def.lisp: New root menu.
31 2012-05-15 Philippe Brochard <pbrochard@common-lisp.net>
33 * src/clfswm-circulate-mode.lisp (rotate-root-geometry-next)
34 (rotate-root-geometry-previous): New second mode binding to change
37 2012-05-13 Philippe Brochard <pbrochard@common-lisp.net>
39 * src/clfswm-internal.lisp: Remove the *current-child* variable
40 and use a setfable function (current-child) instead.
41 (current-child-setter): Store root current child before apllying
44 2012-05-09 Philippe Brochard <pbrochard@common-lisp.net>
46 * src/clfswm-internal.lisp: Use xdpyinfo/xinerama informations
47 instead of xrandr informations.
49 2012-05-06 Philippe Brochard <pbrochard@common-lisp.net>
51 * src/clfswm-internal.lisp : Use only one list for root
53 (*root*): Root management API simplification.
55 2012-04-30 Philippe Brochard <pbrochard@common-lisp.net>
57 * src/clfswm-internal.lisp: Big change to replace *current-root*
58 variable to support multiple root.
60 2012-04-18 Philippe Brochard <pbrochard@common-lisp.net>
62 * src/tools.lisp (add-new-hook, add-hook): New macro. Do not
63 duplicate hooks by default. Use add-new-hook if you want to
66 2012-04-16 Philippe Brochard <pbrochard@common-lisp.net>
68 * src/clfswm-corner.lisp (wait-window-in-query-tree): Add a limit
69 of try to wait the command window.
71 2012-02-25 Philippe Brochard <pbrochard@common-lisp.net>
73 * src/clfswm-util.lisp (place-frames-from-xrandr)
74 (swap-frame-geometry, rotate-frame-geometry): New helper functions
75 for multiple physical screen.
76 (jump-to-slot, add-frame-in-parent-frame): Change *current-root*
79 2012-01-18 Philippe Brochard <pbrochard@common-lisp.net>
81 * src/*.lisp: Use create-symbol and create-symbol-in-package
82 instead of the shorter symb. (Thanks Aad Versteden).
84 * src/bindings-second-mode.lisp (set-default-second-keys): New
85 key binding to set window and frame transparency.
87 * src/bindings.lisp (set-default-main-mouse): New mouse binding to
88 set window and frame transparency.
90 * src/clfswm-keys.lisp (define-keys): New macro to ease multiple
91 keys definitions. (Thanks Valentin Plechinger for the request).
93 * src/*.lisp: Add full transparency support with xcompmgr.
95 2012-01-14 Philippe Brochard <pbrochard@common-lisp.net>
97 * src/*.lisp: Add transparency support.
99 2012-01-09 Ales Guzik <ales.guzik@gmail.com>
101 * src/clfswm-layout.lisp (tile-layout-mix): New layout to
102 automatically choose between vertival and horizontal tile layout.
103 (tile-space-layout): Fix to have space between screen border and
104 frame the same as between frames.
106 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
108 * load.lisp: Support clisp 2.49+ module system to load CLX.
110 2012-01-04 Ales Guzik <ales.guzik@gmail.com>
112 * src/clfswm-layout.lisp (update-layout-managed-children-keep-position):
113 Fix an inattention error.
115 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
117 * src/xlib-util.lisp (with-xlib-protect): Protect from
118 xlib:lookup-error. This prevent an error in clisp/new-clx when
119 sometimes an xlib:colormap is expected instead of an xlib:window.
121 2012-01-03 Philippe Brochard <pbrochard@common-lisp.net>
123 * src/xlib-util.lisp (handle-event): Fix a clisp/new-clx error
124 when sometimes window slot of event-slots is a pixmap instead of a
127 2011-12-26 Philippe Brochard <pbrochard@common-lisp.net>
129 * src/clfswm-query.lisp: Fill the history list with a non-nil
132 2011-12-25 Philippe Brochard <pbrochard@common-lisp.net>
134 * src/package.lisp (make-x-drawable): Drawable wrapper to prevent
135 type error in some CLX versions.
136 Replace xlib:drawable-* functions with x-drawable-* equivalents
138 2011-12-14 Philippe Brochard <pbrochard@common-lisp.net>
140 * src/clfswm-util.lisp (um-create-xdg-section-list): Add at least
141 the 'Utility menu entry.
143 * src/config.lisp (*xdg-section-list*): moved to config.lisp.
145 * src/clfswm-util.lisp (update-menus): Set a default value for
146 searching .desktop files when XDG_DATA_DIRS is not set.
148 2011-10-15 Philippe Brochard <pbrochard@common-lisp.net>
150 * src/clfswm-internal.lisp (place-window-from-hints): Use
151 with-placement macro to place unmanaged windows in an arbitrary
154 2011-06-16 Philippe Brochard <pbrochard@common-lisp.net>
156 * src/clfswm-internal.lisp (clean-windows-in-all-frames): Prevent
157 current root and current child being equal to child.
159 2011-06-13 Philippe Brochard <pbrochard@common-lisp.net>
161 * src/keysyms.lisp: Repeat Page_Down/Up keysym definitions at the
162 end of the file to change keysyms priority.
164 2011-06-13 Sylvain HENRY <hsyl20@gmail.com>
166 * *.*: Minor spelling fix.
168 2011-06-12 Philippe Brochard <pbrochard@common-lisp.net>
170 * src/clfswm.lisp (:unmap-notify, :destroy-notify): Show all
171 children just after the xlib tree cleanup -> reduce the
172 flickering when a window is deleted or destroyed.
174 * src/clfswm-internal.lisp (process-existing-windows): Do not
175 process the notify window.
177 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
179 * *: **** Release 1106 ****
181 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
183 * src/clfswm-internal.lisp (clean-windows-in-all-frames): New
184 function to prevent xlib error when a window is deleted.
186 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
188 * src/clfswm-internal.lisp
189 (delete-child-and-children-in-all-frames): Delete or destroy
190 children before displaying all children.
192 2011-06-05 Philippe Brochard <pbrochard@common-lisp.net>
194 * src/clfswm-util.lisp (add-frame-in-parent-frame): New function
197 2011-06-04 Philippe Brochard <pbrochard@common-lisp.net>
199 * src/clfswm.lisp (main-unprotected): Destroy all frames windows
200 before closing the display (not really needed).
202 2011-06-02 Philippe Brochard <pbrochard@common-lisp.net>
204 * src/clfswm-layout.lisp (inc-tile-layout-size)
205 (dec-tile-layout-size, inc-slow-tile-layout-size)
206 (dec-slow-tile-layout-size): New functions and bindings.
208 2011-06-01 Philippe Brochard <pbrochard@common-lisp.net>
210 * src/clfswm-expose-mode.lisp (define-expose-letter-keys): Add
211 0..1 and A..Z keys to select a child in exposé mode.
213 * src/clfswm-internal.lisp (display-frame-info): Remove hidden
214 infos in frames windows.
216 * src/clfswm-util.lisp (ask-close/kill-current-window): Menu
219 2011-05-30 Philippe Brochard <pbrochard@common-lisp.net>
221 * src/clfswm-internal.lisp (get-parent-layout): Minor fullscreen
224 2011-05-29 Philippe Brochard <pbrochard@common-lisp.net>
226 * src/clfswm-internal.lisp
227 (delete-child-and-children-in-all-frames): Show all children
228 before deleting/destroying a windows, so prevent a flickering.
229 (get-parent-layout): Return the fullscreen size when the current
232 2011-05-28 Philippe Brochard <pbrochard@common-lisp.net>
234 * src/clfswm-internal.lisp (get-parent-layout): Handle correctly
237 * src/clfswm-util.lisp (delete-focus-window-generic): Do not hide
238 child before removing, so prevent a flickering.
240 * src/clfswm-internal.lisp (show-all-children): Rectangular
241 optimization to display only needed children.
242 (show-all-children): Remove flickering on
243 select-next/previous-brother.
245 2011-05-17 Philippe Brochard <pbrochard@common-lisp.net>
247 * src/clfswm-util.lisp (copy-focus-window, cut-focus-window): New
248 functions and ask-close/kill-current-window menu and bindings
251 2011-05-16 Philippe Brochard <pbrochard@common-lisp.net>
253 * src/clfswm-util.lisp (ask-close/kill-current-window): Add an
254 *ask-close/kill-placement* placement window variable.
256 2011-05-09 Philippe Brochard <pbrochard@common-lisp.net>
258 * contrib/osd.lisp (funcall-button-from-code): Display osd
259 documention for buttons and fix some redefining warnings.
261 2011-05-07 Philippe Brochard <pbrochard@common-lisp.net>
263 * src/clfswm-nw-hooks.lisp (make-permanent-nw-hook-frame): New
264 function. Prevent to add or delete a new window hook for this
267 * src/clfswm-layout.lisp (update-layout-managed-children-position):
270 2011-05-06 Philippe Brochard <pbrochard@common-lisp.net>
272 * src/bindings-second-mode.lisp (set-default-second-keys):
273 select-brother-spatial-move-* binding update.
275 * src/clfswm-layout.lisp (tile-left|right|top|bottom-layout): Ask
276 to keep children positions or not.
278 * src/clfswm-internal.lisp (fixe-real-size): Takes care of border
281 * src/clfswm-layout.lisp (update-layout-managed-children): Fix a
282 bug by using the parent frame instead of the current child.
284 * src/clfswm-circulate-mode.lisp
285 (select-brother-generic-spatial-move+right/left/up/down): New
286 function to select a brother from another in a spatial move.
288 2011-04-19 Philippe Brochard <pbrochard@common-lisp.net>
290 * src/clfswm-pack.lisp (move-frame-constrained)
291 (resize-frame-constrained): Use pixels instead of floating
294 2011-04-18 Philippe Brochard <pbrochard@common-lisp.net>
296 * src/clfswm-pack.lisp (resize-frame-constrained): Takes care of
298 (implode-frame, implode-current-frame): New functions. Absorb all
299 frames subchildren in frame. Explode frame opposite.
301 2011-04-17 Philippe Brochard <pbrochard@common-lisp.net>
303 * src/clfswm-pack.lisp (move-frame-constrained)
304 (resize-frame-constrained): New function. Move and resize frame
305 with the mouse constrained by other frame brothers.
307 2011-04-14 Philippe Brochard <pbrochard@common-lisp.net>
309 * src/clfswm-util.lisp (with-movement-select-next-brother)
310 (with-movement-select-previous-brother)
311 (with-movement-select-next-child): Use a simple method (do not
312 enter in the circulate mode) to allow to circulate in all children
315 * src/clfswm-menu.lisp (open-menu): Save info hash table keys
316 instead of deleting newly created keys.
318 2011-03-21 Philippe Brochard <pbrochard@common-lisp.net>
320 * src/clfswm-internal.lisp (x-px->fl, y-px->fl): Takes care of
323 2011-03-20 Philippe Brochard <pbrochard@common-lisp.net>
325 * src/clfswm-info.lisp (show-config-variable): call
326 produce-conf-var-doc.
328 2011-03-18 Philippe Brochard <pbrochard@common-lisp.net>
330 * src/clfswm-autodoc.lisp (produce-conf-var-doc-html): Produce a
331 documentation for all configurable variables in CLFSWM -
334 * src/clfswm-internal.lisp (leave-frame): Hide all children except
337 2011-03-16 Philippe Brochard <pbrochard@common-lisp.net>
339 * src/clfswm-autodoc.lisp (produce-all-docs): Produce a
340 documentation for all configurable variables in CLFSWM.
342 * src/clfswm-layout.lisp (set-gimp-layout): Display a notify
343 window with the help on the GIMP layout.
345 2011-03-12 Philippe Brochard <pbrochard@common-lisp.net>
347 * src/menu-def.lisp: Menu update to prevent cursor keys clash.
349 * clfswm.asd: Change compilation order to prevent undefined
352 * src/clfswm-internal.lisp (show-child(frame)): Handle properly
353 the show-root-frame-p parameter.
355 2011-03-11 Philippe Brochard <pbrochard@common-lisp.net>
357 * src/clfswm-util.lisp (move-frame, resize-frame): Do not move or
358 resize a frame when it's the current root.
360 2011-03-10 Philippe Brochard <pbrochard@common-lisp.net>
362 * src/clfswm-internal.lisp (show-all-children): Handle properly
363 duplicated child in multipe frames.
365 2011-03-09 Philippe Brochard <pbrochard@common-lisp.net>
367 * contrib/volume-mode.lisp (set-default-volume-keys): Add more
368 keybindings (up/down, right/left) to raise/lower the volume.
370 * src/clfswm-layout.lisp: Add a variable border size for frames
373 2011-03-08 Philippe Brochard <pbrochard@common-lisp.net>
375 * src/clfswm-util.lisp (cut-current-child, remove-current-child)
376 (delete-current-child): Hide the current child before doing the
379 * src/clfswm-internal.lisp (show-all-children): Hide windows not
380 in the current root before displaying those in current root.
381 Remove all hide-all unnecessary calls.
383 * src/clfswm-configuration.lisp (save-variables-in-conf-file):
384 Save only variables with a different value than their original
387 2011-03-07 Philippe Brochard <pbrochard@common-lisp.net>
389 * src/clfswm-info.lisp (show-config-variable): Use the new
392 * src/clfswm-autodoc.lisp (produce-configuration-variables): Use
393 the new defconfig method.
395 * src/clfswm-configuration.lisp (create-configuration-menu):
396 Change the config system with a more lispy one and a less string
397 based one: (defconfig name value group doc).
400 2011-03-06 Philippe Brochard <pbrochard@common-lisp.net>
402 * src/clfswm-internal.lisp (show-all-children): Simplify the
404 (show-child): Display an unmanaged window whe it's the current
406 (show-all-children): add the ability to display all child from
407 *root-frame* and hide all those who are not in *current-root*.
408 -> remove hide-all-children when needed.
410 * src/xlib-util.lisp (move-window,resize-window): Add a
411 *color-move-window* border when moving or resizing a window.
413 2011-03-04 Philippe Brochard <pbrochard@common-lisp.net>
415 * src/clfswm-internal.lisp (show-all-children): Perform only one
416 recusion on the clfswm tree: calculate geometry and place child in
419 2011-03-03 Philippe Brochard <pbrochard@common-lisp.net>
421 * src/clfswm-internal.lisp (show-all-children): Rethink of display
422 child order to prevent very annoying flickering.
424 2011-02-27 Philippe Brochard <pbrochard@common-lisp.net>
426 * src/clfswm-util.lisp (query-yes-or-no): New function.
428 * src/clfswm-configuration.lisp (reset-all-config-variables): New
429 function and menu entry.
430 (query-conf-value): Add the ability to leave the field blank to
431 reset the variable to its default value.
433 2011-02-26 Philippe Brochard <pbrochard@common-lisp.net>
435 * src/clfswm-configuration.lisp
436 (add-all-configuration-default-value): Add a default value to
437 configurable variables.
439 2011-02-23 Philippe Brochard <pbrochard@common-lisp.net>
441 * src/clfswm.lisp (main-unprotected): Create the configuration
442 menu only once at startup.
444 2011-02-22 Desmond O. Chang <dochang@gmail.com>
446 * contrib/amixer.lisp: Add a volume mode inspired by the emms
447 volume package. Alsa mixer interface.
449 * contrib/volume-mode.lisp: Add a volume mode inspired by the emms
452 2011-02-22 Desmond O. Chang <dochang@gmail.com>
454 * src/clfswm.lisp (main): Use ASDF:SYSTEM-SOURCE-DIRECTORY instead
455 of *LOAD-TRUENAME*. *LOAD-TRUENAME* is only bound during a call to
456 LOAD. If one eval CLFSWM:MAIN in repl, BASE-DIR will be an empty
457 string. Use ASDF:SYSTEM-SOURCE-DIRECTORY to fix it.
459 2011-02-16 Philippe Brochard <pbrochard@common-lisp.net>
461 * src/clfswm.lisp (main-unprotected): Add a close hook. And close
462 the notify window, the virtual keyboard and the clfswm terminal by
465 2011-02-15 Philippe Brochard <pbrochard@common-lisp.net>
467 * src/clfswm.lisp (main-unprotected): Destroy the notify window
468 before closing the display. This fix a bug when resetting/reloading
471 2011-02-12 Philippe Brochard <pbrochard@common-lisp.net>
473 * src/xlib-util.lisp (equal-wm-class-fun, equal-wm-name-fun)
474 (raise-window-fun, raise-and-focus-window-fun): New functions.
476 * src/config.lisp (*clfswm-terminal-cmd*): Switch from xterm to
478 (*never-managed-window-list*): Structure change to be more
479 flexible. Let the choice to focus, raise and do nothing on never
482 2011-02-09 Philippe Brochard <pbrochard@common-lisp.net>
484 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Take
485 care of never managed windows to move or resize them if the raise
488 * src/clfswm-internal.lisp (in-frame, in-window, in-child): New
491 2011-02-08 Philippe Brochard <pbrochard@common-lisp.net>
493 * src/clfswm.lisp (main-mode): Raise or not unmanaged windows
494 following request in *never-managed-window-list*.
496 2011-02-05 Philippe Brochard <pbrochard@common-lisp.net>
498 * *: **** Release 1102 ****
500 2011-02-05 Desmond O. Chang <dochang@gmail.com>
502 * src/keysyms.lisp: Add extended keysyms from stumpwm.
504 2011-02-01 Desmond O. Chang <dochang@gmail.com>
506 * src/clfswm-util.lisp (run-or-raise): New function (thanks to
509 * src/clfswm-internal.lisp (with-all-*): add a nil block.
511 2011-01-28 Desmond O. Chang <dochang@gmail.com>
513 * src/clfswm-util.lisp (xdg-config-home): XDG_CONFIG_HOME should
514 be $HOME/.config by default.
516 2010-12-29 Philippe Brochard <pbrochard@common-lisp.net>
518 * contrib/osd.lisp (display-doc): Add another method where a
519 CLFSWM native window is used to display the key documentation.
521 2010-12-27 Philippe Brochard <pbrochard@common-lisp.net>
523 * src/xlib-util.lisp (with-xlib-protect): Force to revert to the
526 2010-12-25 Philippe Brochard <pbrochard@common-lisp.net>
528 * src/clfswm-second-mode.lisp (second-key-mode): Call the second
529 mode leave function only when the generic mode was ended.
531 2010-12-08 Philippe Brochard <pbrochard@common-lisp.net>
533 * src/clfswm-second-mode.lisp (sm-leave-function): Do not use
534 *second-mode-program* anymore.
536 2010-12-07 Philippe Brochard <pbrochard@common-lisp.net>
538 * src/clfswm-second-mode.lisp (*second-mode-leave-function*): New
539 variable bound to a function executed (when not null) on second
542 2010-11-14 Philippe Brochard <pbrochard@common-lisp.net>
544 * src/clfswm-util.lisp (find-child-under-mouse): Do not find
547 2010-11-13 Philippe Brochard <pbrochard@common-lisp.net>
549 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
550 Do not display the accel window for unmanaged windows.
552 2010-11-11 Philippe Brochard <pbrochard@common-lisp.net>
554 * src/clfswm-internal.lisp (set-current-root): Handle
555 window-parent in set-current-root.
557 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
558 focus the parent child when the current root is a window.
560 2010-11-09 Philippe Brochard <pbrochard@common-lisp.net>
562 * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
563 New function an bindings.
565 * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
568 2010-11-07 Philippe Brochard <pbrochard@common-lisp.net>
570 * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
571 function to let the user choose to keep child position with
574 * src/clfswm-internal.lisp (remove-frame-data-slot): New
577 2010-11-05 Philippe Brochard <pbrochard@common-lisp.net>
579 * src/clfswm-internal.lisp (frame-select-next-child)
580 (frame-select-previous-child): New functions and bindings. Select
581 the next/previous child in the current frame.
583 2010-10-31 Philippe Brochard <pbrochard@common-lisp.net>
585 * src/clfswm-query.lisp (query-mode-complet): New function: Handle
586 completion in query-mode.
588 2010-10-30 Philippe Brochard <pbrochard@common-lisp.net>
590 * src/clfswm-query.lisp (query-print-string): Handle long lines
593 2010-10-27 Philippe Brochard <pbrochard@common-lisp.net>
595 * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
596 all characters are printable.
598 2010-10-25 Philippe Brochard <pbrochard@common-lisp.net>
600 * contrib/server/server.lisp: Load clfswm client code in the main
601 program and let the user start it with a --client command line
604 * src/package.lisp (*main-entrance-hook*): New hook executed after
605 loading configuration file and before opening the display.
607 2010-10-23 Philippe Brochard <pbrochard@common-lisp.net>
609 * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
611 * src/clfswm-internal.lisp (show-child): Show window only if not
614 * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
615 change modifiers after binding definition.
617 2010-10-21 Philippe Brochard <pbrochard@common-lisp.net>
619 * contrib/osd.lisp: New file: OSD (On Screen Display) for
622 * src/clfswm-menu.lisp (open-menu): Modularise function.
624 2010-10-13 Philippe Brochard <pbrochard@common-lisp.net>
626 * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
627 key binding in main and second mode.
629 2010-10-10 Philippe Brochard <pbrochard@common-lisp.net>
631 * src/clfswm-util.lisp (open-notify-window): Convert hello-window
632 functions to a more generic Notify-window system.
634 * src/tools.lisp (add-timer): Add an id to identify the timer.
636 2010-10-09 Philippe Brochard <pbrochard@common-lisp.net>
638 * src/tools.lisp (erase-timer): New function.
640 * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
641 the hello window. Add Configuration variables.
643 2010-10-08 Philippe Brochard <pbrochard@common-lisp.net>
645 * src/clfswm-util.lisp (): Add an Hello window at startup.
647 * src/tools.lisp (process-timers): Add a timer system.
649 2010-10-07 Philippe Brochard <pbrochard@common-lisp.net>
651 * src/clfswm-query.lisp (add-in-query-string): Handle correctly
654 2010-10-06 Philippe Brochard <pbrochard@common-lisp.net>
656 * src/clfswm-query.lisp (query-print-string): Change cursor color
657 and show parenthesis matching with colors (on match and on
660 2010-10-05 Philippe Brochard <pbrochard@common-lisp.net>
662 * src/clfswm-internal.lisp (show-all-children): Do not raise a
663 child when its parent is hidden.
665 2010-10-02 Philippe Brochard <pbrochard@common-lisp.net>
667 * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
668 possibility to circulate over subchild of the current child.
670 * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
671 (expose-windows-generic): Add an escape-body function to return to
672 the original state on escape key.
674 * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
675 to bind the current child from the configuration file.
677 2010-10-01 Philippe Brochard <pbrochard@common-lisp.net>
679 * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
680 window hook: the frame absorb all new windows that match
681 nw-absorb-test frame data slot.
683 2010-09-30 Philippe Brochard <pbrochard@common-lisp.net>
685 * src/clfswm-expose-mode.lisp (expose-create-window): Show window
686 title in accel window.
688 2010-09-29 Philippe Brochard <pbrochard@common-lisp.net>
690 * configure: Use the Xavier Maillard clfswm script in contrib to
691 build an executable in the standard way.
693 2010-09-26 Philippe Brochard <pbrochard@common-lisp.net>
695 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
696 New functions. Add a window on each child in the expose mode to
699 * src/clfswm-internal.lisp (child-x, child-y, child-width)
700 (child-height): New methods to get real child coordinates.
702 2010-09-25 Philippe Brochard <pbrochard@common-lisp.net>
704 * src/clfswm-layout.lisp (*-layout): Use child-position.
706 * src/clfswm-internal.lisp (child-position): New function.
708 * src/clfswm-expose-mode.lisp (expose-windows-mode)
709 (expose-all-windows-mode): Use a generic mode.
711 * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
712 with handle-event-fun symbols instead of inspecting clfswm
713 internals symbols on each mode change.
715 * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
716 a separate clfswm-expose-mode.lisp file.
718 * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
719 screen size instead of hardcoded test coordinates.
721 2010-09-24 Philippe Brochard <pbrochard@common-lisp.net>
723 * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
724 (speed-mouse-right, speed-mouse-up, speed-mouse-down)
725 (speed-mouse-undo, speed-mouse-first-history): New functions to
726 quickly move the mouse. Implemented for the second mode.
728 2010-09-16 Philippe Brochard <pbrochard@common-lisp.net>
730 * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
731 write permission on $clfswm_asd_path. So anybody can start clfswm
732 even if there is no write permission on the source directory.
734 2010-09-12 Philippe Brochard <pbrochard@common-lisp.net>
736 * contrib/clfswm: Add support to cmucl, ccl and ecl.
738 2010-09-11 Philippe Brochard <pbrochard@common-lisp.net>
740 * src/clfswm-util.lisp (set-hide-unmanaged-window)
741 (set-show-unmanaged-window, set-default-hide-unmanaged-window):
742 New functions and menu entry.
743 (set-globally-hide-unmanaged-window)
744 (set-globally-show-unmanaged-window): New functions and menu
747 * src/clfswm-internal.lisp (hide-unmanager-window-p): New
749 (show-child): Add a data slot on frame to hide or not unmanaged
752 * src/clfswm-corner.lisp (present-clfswm-terminal)
753 (present-virtual-keyboard): Use a function (generic-present-body)
754 instead of a macro (generate-present-body).
756 * src/clfswm-util.lisp (update-menus): List all directories and
757 subdirectories in $XDG_DATA_DIRS/applications.
759 2010-09-10 Philippe Brochard <pbrochard@common-lisp.net>
761 * src/clfswm-corner.lisp (generate-present-body): New macro.
762 (present-clfswm-terminal, present-virtual-keyboard): Use
763 generate-present-body.
765 2010-09-09 Philippe Brochard <pbrochard@common-lisp.net>
767 * src/clfswm-util.lisp (update-menus): Follow XDG specifications
768 instead of the non-portable Debian update-menu.
770 2010-09-07 Philippe Brochard <pbrochard@common-lisp.net>
772 * src/clfswm.lisp (error-handler): New function do handle
773 asynchronous errors and ignore them.
774 (open-display): Install the new error-handler on display.
776 2010-09-05 Philippe Brochard <pbrochard@common-lisp.net>
778 * src/xlib-util.lisp (with-xlib-protect): Add a
779 with-simple-restart on top of body execution.
781 2010-09-04 Philippe Brochard <pbrochard@common-lisp.net>
783 * src/clfswm.lisp (main-loop): Protect all xlib functions with an
786 * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
787 handle-event. Add a with-simple-restart to prevent a
788 clisp/new-lisp infinite loop.
790 2010-08-30 Philippe Brochard <pbrochard@common-lisp.net>
792 * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
793 clfswm terminal working even on xterm title changes.
795 2010-08-29 Philippe Brochard <pbrochard@common-lisp.net>
797 * src/clfswm-util.lisp (run-other-window-manager): Update for
800 * src/tools.lisp (do-execute): New parameter io to change the
803 * src/clfswm-util.lisp (hide-current-child): Prevent from removing
806 * src/clfswm-internal.lisp (child-member): New predicate.
807 (child-remove): New function.
809 * src/*.lisp: Use child-member and child-remove everywhere it's
812 2010-08-28 Philippe Brochard <pbrochard@common-lisp.net>
814 * src/clfswm.lisp (main-loop): Ensure that all events have been
815 processed after a process-event.
817 * src/clfswm-internal.lisp (is-in-current-child-p): New function.
819 2010-08-27 Philippe Brochard <pbrochard@common-lisp.net>
821 * src/clfswm.lisp (main-mode:configure-request): Raise the window
822 only when present on the current child and focus it accordingly.
824 2010-08-26 Philippe Brochard <pbrochard@common-lisp.net>
826 * src/clfswm-circulate-mode.lisp (circulate-loop-function):
827 Use is-a-key-pressed-p.
829 * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
831 * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
832 returned by xlib:keysym->keycodes.
834 * src/*.lisp: Use the new child-equal-p to compare children. This
835 prevent a bug with sbcl/cmucl when the standard equal function
836 does not work with xlib:window.
838 * src/clfswm-internal.lisp (child-equal-p): New predicate.
840 2010-08-25 Philippe Brochard <pbrochard@common-lisp.net>
842 * src/clfswm-generic-mode.lisp (generic-mode): Use an
843 xlib:event-listen before processing event with
844 xlib:process-event. This prevent a bug with CLX threaded
845 implementation like sbcl.
847 * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
848 processing event with xlib:process-event. This prevent a bug with
849 CLX threaded implementation like sbcl.
851 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
853 * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
855 * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
858 * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
859 (find-parent-frame, find-frame-window, find-frame-by-name)
860 (find-frame-by-number): Use with-find-in-all-frames to search in
861 frames in the right order.
863 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
864 unwanted flickering with unmanaged windows.
866 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
868 * src/package.lisp: Remove event handler hooks as they're not
869 needed anymore (To replace them: use closure and define-handler).
871 * src/xlib-util.lisp (move-window, resize-window)
872 (wait-mouse-button-release): Use a generic mode.
874 * src/*.lisp: Replace the case to handle event with a more (tricky)
875 lispy method which bind a function to each keywords associated
878 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
880 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
881 menu entry between delete-current-child and remove-current-child.
882 ie: Delete a child and its children in all frames by default.
884 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
886 * src/package.lisp: Add a placement configuration group.
888 * src/binding*.lisp: Bind control+g to escape the current action
891 * src/clfswm-internal.lisp
892 (delete-child-and-children-in-all-frames): New function and
893 binding: Second mode - Control+Delete delete the current child and
894 its children in all frames (ie: close the current child and its
897 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
899 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
900 the frame window and the frame gc. Close a very annoying bug when
901 cuting/pasting a frame or moving a child over frames with the
904 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
905 all children in *current-root* after moving/resizing a frame.
907 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
909 * src/clfswm-util.lisp (delete-focus-window)
910 (destroy-focus-window): Remove child in parent frame before
913 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
915 * src/clfswm-util.lisp (identify-key): Add a timeout in
917 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
918 of the window passed by xlib:process-event.
920 * src/xlib-util.lisp (move-window, resize-window)
921 (wait-mouse-button-release): Add a timeout in xlib:process-event.
923 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
925 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
926 to launch an other window manager and to return to clfswm.
928 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
930 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
933 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
935 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
938 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
939 parameter and a loop timeout.
941 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
943 * src/clfswm.lisp (main): Add an alternate configuration filename
946 * load.lisp: Add a debuging code example.
948 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
950 * src/clfswm-configuration.lisp (create-configuration-menu): New
951 menu to configure all clfswm variables while clfswm is running.
953 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
955 * src/clfswm-util.lisp (save-configuration-variables): New
956 function to save all configuration variables in clfswmrc.
958 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
960 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
962 (set-default-info-keys): Add cursor key support in info mode.
964 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
966 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
969 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
970 prevent reading the configuration file (this may be useful to
971 produce the original documentation without user modifications
972 with the rc configuration file).
974 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
976 * src/bindings-second-mode.lisp (set-default-second-keys):
977 Simplification of Escape key to close/kill/remove the focus window
978 and unhide all windows.
980 * src/bindings.lisp (set-default-main-keys): Simplification of
981 Escape key to close/kill/remove the focus window and unhide all
984 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
985 focus and unhide all windows capabilities.
987 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
989 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
991 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
993 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
994 Keep child order and don't make unnecessary child movement.
995 (one-column-layout, one-line-layout): New layouts.
997 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
999 * *: **** Release 0906 ****
1001 * contrib/cd-player.lisp: New file to handle the CD player.
1003 * contrib/xmms.lisp: New file to handle the xmms player.
1005 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1007 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
1008 Maximize windows in their frame - Leave frames to their actual
1011 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
1012 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
1014 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
1016 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
1018 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
1020 * contrib/mpd.lisp: Use a standard menu.
1022 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
1024 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
1026 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
1028 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
1030 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
1033 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
1035 * src/config.lisp (get-fullscreen-size): One pixel adjustment
1038 * src/clfswm-placement.lisp (*-child-placement): One pixel
1041 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
1043 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
1044 Ensure that all characters are printable.
1046 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
1049 * src/clfswm-placement.lisp (*-child-placement): Adjust
1050 coordinates to one pixel in the current child.
1052 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1054 * src/clfswm-query.lisp (query-enter-function): Assign font before
1055 width and height calculation.
1057 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1059 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
1060 bannish the pointer in an arbitrary place.
1062 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
1063 place the info window in an arbitrary place.
1065 * src/clfswm-query.lisp (query-enter-function): Use with-placement
1066 macro to place the query window in an arbitrary place.
1068 * src/clfswm-placement.lisp: New file. Allow to place info windows
1069 or query windows on an arbitrary place. Allow to bannish the
1070 pointer on an arbitrary place.
1072 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
1074 * src/clfswm-circulate-mode.lisp (reorder-child)
1075 (reorder-brother): Unfocus windows before reordering children or
1078 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1080 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
1081 the parent is a frame.
1083 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
1084 motion with a default modifier.
1086 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
1089 * src/clfswm-info.lisp (info-mode): Handle motion with a default
1091 (info-mode): Optimization in loop function.
1093 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1095 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
1096 root-frame correctly.
1098 * clfswm.asd: Dependency fix for clfswm-generic-mode.
1100 * src/clfswm-circulate-mode.lisp (reorder-child)
1101 (reorder-brother): Handle empty frames.
1102 (reorder-brother): Redisplay only the parent frame of the current
1105 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
1106 parent frame of the current frame.
1108 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
1110 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
1111 Maximize/Unmaximize the current frame in its parent frame.
1113 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
1114 windows and frames in their parent frame.
1116 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1118 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
1120 * src/clfswm-circulate-mode.lisp (reorder-child)
1121 (reorder-brother): Reinitialise on circulate type change
1122 child to brother or brother to child.
1124 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
1125 calls xlib:display-finish-output on each map-request. So speed up
1128 * src/xlib-util.lisp (map-window): New function. Call
1129 xlib:display-finish-output on each map request.
1131 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1133 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
1134 Optimisation when drawing second mode window.
1136 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1138 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
1141 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1143 * src/clfswm-util.lisp (run-program-from-query-string): Launch
1144 command only with a return validation.
1146 2009-04-22 Xavier Maillard <xma@gnu.org>
1148 * src/clfswm-query.lisp (query-string): Use a generic mode.
1150 2009-04-19 Xavier Maillard <xma@gnu.org>
1152 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
1154 2009-04-18 Xavier Maillard <xma@gnu.org>
1156 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
1157 to define all other modes.
1159 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1161 * src/package.lisp (): Use *default-font-string* for all
1164 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
1166 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
1168 * src/xlib-util.lisp (null-size-window-p): Better check of null
1171 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
1173 * src/clfswm.lisp (handle-map-request): Add a fix to manage
1174 correctly fullscreen windows (SDL particularly).
1176 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
1178 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
1179 a segfault with clisp/new-clx.
1181 * src/clfswm.lisp (handle-motion-notify): Add a needed window
1184 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
1185 needed window argument.
1187 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
1189 * src/xlib-util.lisp (wait-no-key-or-button-press)
1190 (wait-a-key-or-button-press): Check buttons press/release correctly"
1192 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
1194 * src/menu-def.lisp: Add children navigation menu in the movement
1195 menu (select next/previous child/brother/level).
1197 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
1199 * *: Rename 'sister' frame to 'brother' frame.
1201 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
1202 alias in a real modifier.
1204 * src/package.lisp (*modifier-alias*): New list of modifier alias
1205 For example: :alt is :mod-1, :numlock is :mod-2...
1207 * src/tools.lisp (remove-hook): New function.
1209 * src/clfswm-keys.lisp (with-capslock, without-capslock)
1210 (with-numlock, without-cnumlock): New functions.
1212 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
1214 * src/clfswm-info.lisp: Use the *binding-hook* to create info
1215 keys and mouse bindings.
1217 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
1218 second keys and mouse bindings.
1220 * src/bindings.lisp: Use the *binding-hook* to create main keys
1223 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1225 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
1228 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
1230 * src/menu-def.lisp: Use a menu instead of a function for the
1233 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
1235 * src/clfswm-util.lisp (show-standard-menu): Display the standard
1236 menu from the 'update-menus' command.
1238 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
1240 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
1241 it's already grabbed.
1243 * src/clfswm-internal.lisp (display-frame-info): Use configurable
1244 colors and fix a bug with background.
1245 (display-frame-info): Set window background when displaying info.
1247 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1249 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
1250 warning with clisp/new-clx.
1252 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
1254 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
1257 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1259 * *: **** Release 0809 ****
1261 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1263 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
1265 (ensure-unique-number): New function and menu entry.
1267 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
1269 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
1270 hook: open the next window in a named frame.
1271 (numbered-frame-nw-hook): New new window hook: open the next
1272 window in a numbered frame.
1274 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
1275 cases. So query-string can be called even in the main mode.
1277 * src/clfswm-internal.lisp (show-all-children): Do not raise a
1278 child by default => far less flickering.
1280 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
1282 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
1284 * src/menu-def.lisp: Change key binding for the CLFSWM menu
1287 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
1288 is nil. (workaround on some CLX implementation).
1290 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
1292 * src/menu-def.lisp: Add a menu to set a focus policy for all
1295 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
1296 (all-frames-set-*-focus-policy): Set a focus policy for all
1299 * src/clfswm.lisp (handle-enter-notify): sloppy-select
1300 mode. Select a child and its parents on mouse over.
1302 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
1304 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
1305 policy -> Sloppy focus only for windows in the current frame.
1306 (main-unprotected): Exit clfswm on init error (ie: when another
1307 window manager is running).
1309 * src/clfswm-util.lisp (reset-clfswm): New function.
1311 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
1313 * src/clfswm-menu.lisp (init-menu): New function.
1315 * src/clfswm-util.lisp (reload-clfswm): New function to reload
1317 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
1319 * src/clfswm.lisp (main, main-unprotected): Handle error in a
1320 superior main function. Now CLFSWM can't break the X session. It
1321 just reinitialize the display and run a new main loop.
1323 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
1324 *vt-keyboard-on* global to avoid warnings when loading clfswm.
1326 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
1327 (help-on-gimp-layout): Describe how to use the GIMP layout.
1329 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
1331 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
1332 main-window-right-layout. Change the keybinding for (shift)alt+tab
1333 to not select windows in the main window lisst.
1334 Bind F8 to add a window in the main window list.
1335 Bind F9 to remove a window in the main window list.
1336 Change the focus policy to :sloppy.
1337 (set-previous-layout): Restore the previous layout, keybinding and
1340 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
1342 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
1344 * src/clfswm-layout.lisp (main-window-left-layout)
1345 (main-window-bottom-layout, main-window-top-layout): New
1347 Factorize layouts in menu.
1349 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
1351 * src/clfswm-layout.lisp (main-window-right-layout): A possible
1352 GIMP layout: one or more main windows on one side of the
1353 frame. Others on the other size.
1355 * src/clfswm-util.lisp
1356 (current-frame-set-click/sloppy-focus-policy): Each frame can have
1357 a different focus policy (one of :click or :sloppy).
1358 The default focus policy is set with *default-focus-policy*.
1360 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
1362 * src/clfswm-info.lisp (show-config-variable): New function.
1364 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
1366 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
1368 * src/clfswm-info.lisp: Colored help for key binding and corners
1371 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
1373 * src/clfswm-util.lisp (delete-focus-window)
1374 (destroy-focus-window): Remove chid only in
1375 handle-unmap/destroy-notify. Focus *current-root* only when
1376 closing/killing the current child.
1378 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
1379 functions or corners.
1381 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1383 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
1384 action: Hide/Unhide a terminal on mouse corner action. (By default
1385 right mouse button on the top left corner).
1387 * src/config.lisp (*never-managed-window-list*): New config
1390 * src/clfswm-internal.lisp (never-managed-window-p): New function:
1391 Handle never managed window in a more simple way.
1393 * src/clfswm-corner.lisp: New file and new and more simple method
1394 to define corners actions.
1396 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
1398 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
1400 * src/clfswm-layout.lisp (fast-layout-switch)
1401 (define-fast-layout-switch): New functions: Switch between two
1404 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
1405 really in the second mode. So leave-second-mode can be used even
1408 * src/clfswm-util.lisp (switch-to-last-child): New function:
1409 Store the current child and switch to the previous one.
1411 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1413 * src/clfswm-util.lisp (display-current-window-info): Display the
1415 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
1416 (top right by default). By default 'xvkbd' is used.
1418 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1420 * src/xlib-util.lisp (move-window, resize-window): Compress motion
1423 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
1425 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
1428 * src/clfswm-info.lisp (info-mode): Compress motion events.
1430 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
1432 * src/clfswm-internal.lisp (show-all-children): Compute geometry
1433 and selection first and then show only necessary children.
1434 (show-child): remove unneeded display-p parameter.
1436 * src/config.lisp (get-fullscreen-size): Place the frame border
1437 outside the screen (this prevent the loose of 2 pixels per
1440 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
1442 * src/clfswm-internal.lisp (focus-child): Algorithm change to
1443 raise only the selected child.
1445 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
1447 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
1448 Raise only viewable children.
1450 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
1452 * src/clfswm-internal.lisp (show-all-children): Always raise all
1453 displayed children. Remove all references to raise-p.
1455 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1457 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
1460 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
1461 second mode binding on raise/lower child in its frame.
1463 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
1464 behaviour to the new raise/lower property.
1465 Call clear-nw-hook before the rest of the hook.
1467 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
1468 (mouse-click-to-focus-and-resize-window): Stop button event. This
1469 prevent a keyboard/pointer freeze.
1471 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1473 * src/clfswm-internal.lisp (frame-lower-child)
1474 (frame-raise-child): New functions to raise/lower a child in its
1477 * src/clfswm-util.lisp (have-to-present-windows)
1478 (have-to-present-all-windows): New functions to have an MaxOS
1479 expose like on mouse click in screen corner.
1481 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
1483 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
1485 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
1486 child from a choice in all frames with hidden children.
1488 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
1490 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
1492 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
1493 (unhide-all-children): New functions.
1495 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
1498 * src/clfswm-util.lisp (hide/show-frame-window): new function and
1501 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
1503 * src/clfswm-util.lisp (rename-current-child): Do not display the
1504 frame info for a window.
1506 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
1508 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
1509 frame window for the removed child and its children.
1511 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
1513 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
1516 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
1518 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
1519 the ROX pinboard (ie: leave it lowered in the root window as
1522 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
1523 (tile-left-layout, tile-right-layout, tile-top-layout)
1524 (tile-bottom-layout): Use all the frame space when there is only
1527 * src/clfswm-internal.lisp (place-window-from-hints): Center
1528 unmanaged windows in the root screen.
1530 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
1533 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1535 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
1536 typo in managed types.
1538 * src/clfswm-internal.lisp (show-child): Always display frame info
1539 even if the frame is hidden.
1541 * src/xlib-util.lisp (resize-window): Use a better algorithme to
1544 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1546 * src/clfswm-util.lisp (with-movement): Display frame info for all
1547 frames in current root.
1549 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1551 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
1553 * src/bindings-second-mode.lisp (define-second-key #\a): New
1554 binding on 'add-default-frame'.
1556 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1557 message to follow the autodocumentation process.
1559 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1561 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1562 "Space" to jump to a child. "B" to bind a slot on the current
1565 * src/bindings-second-mode.lisp: Use "Tab" instead of
1568 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
1570 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1571 unmanaged (hidden) windows.
1573 * src/clfswm-internal.lisp (place-window-from-hints): Give a
1574 minimal size for windows.
1575 (with-all-windows-frames-and-parent): New function.
1577 * src/config.lisp (*default-window-width/height*): New parameters.
1579 * src/clfswm-internal.lisp (place-window-from-hints): Center
1580 windows in the screen instead of in their frame.
1582 * src/bindings-second-mode.lisp (tile-space-current-frame): New
1585 * src/clfswm-layout.lisp (register-layout): Intern the once name
1586 in the right package.
1588 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1590 * doc/dot-clfswmrc: Update to follow the new clfswm way.
1592 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
1594 * src/clfswm-internal.lisp (set-current-child)
1595 (adapt-child-to-parent, show-child, hide-child): Handle the case
1596 where child is not a frame or a window.
1598 * src/clfswm-util.lisp
1599 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1600 Check if child is a frame.
1602 * src/clfswm-internal.lisp (managed-window-p): Handle the case
1603 where frame is null.
1604 (place-frame): Check if frame and parent are frames.
1606 * src/clfswm-info.lisp (info-mode): display all frame info before
1609 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1610 info before leaving.
1612 * src/clfswm-internal.lisp (display-all-frame-info): New function.
1614 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
1616 * src/tools.lisp (getenv): Implemented for ECL.
1617 (urun-prog): Implemented for ECL.
1619 * src/clfswm-util.lisp (identify-key): Use a double buffer to
1622 * src/clfswm-query.lisp (query-string): Use a double buffer to
1625 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1628 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1631 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
1633 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1635 * src/menu-def.lisp: New file: move all menu definition in
1638 * src/clfswm-layout.lisp (register-layout): Use a function instead
1641 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
1643 * src/clfswm-autodoc.lisp (produce-menu-doc,
1644 (produce-menu-doc-html): New functions.
1645 (produce-doc-*): Moved to clfswm-autodoc.lisp.
1647 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1648 paste a child on one of its own children. (this prevent a
1650 (move-child-to): Rename move/copy-current-child-by to
1652 (mouse-move-window-over-frame): New function to move the window
1653 under the mouse cursor to another frame.
1655 * src/clfswm-internal.lisp (find-child-in-parent): New function.
1657 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1659 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1660 windows only when its window parent is the current child.
1662 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1664 * src/clfswm-util.lisp (manage-current-window)
1665 (unmanage-current-window): New functions: Allow to force to manage
1666 or unmanage a window by its parent frame.
1668 * src/bindings-second-mode.lisp (#\o): binded to
1669 set-open-in-new-frame-in-parent-frame-nw-hook and
1670 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1672 * src/clfswm-util.lisp (with-current-window): New macro.
1674 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1675 exposure and enter-window handle event.
1677 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1678 children for the current child after the move/resize.
1680 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1682 * src/xlib-util.lisp (resize-window): Take care of window size
1685 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1686 move/resize unmanaged windows.
1688 * src/xlib-util.lisp (move-window, resize-window): New functions.
1690 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1692 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1693 user choose what window type the current frame must handle.
1694 (display-current-window-info): New function.
1695 (current-frame-manage-all-window-type)
1696 (current-frame-manage-only-normal-window-type)
1697 (current-frame-manage-no-window-type): New functions.
1699 * src/clfswm-internal.lisp (managed-window-p): New function.
1701 * src/package.lisp (frame): Managed type: new frame
1702 parameter. This allow to choose what window type a frame must
1705 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1707 * src/clfswm-nw-hooks.lisp
1708 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1710 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1713 * src/tools.lisp (ensure-printable): Return always a string even
1716 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
1718 * src/config.lisp (*default-nw-hook*): New variable to change the
1719 default new window hook.
1721 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1723 * clfswm.asd (clfswm): Add a dependency from
1724 clfswm-second-mode.lisp to clfswm.lisp.
1726 * src/clfswm-util.lisp (identify-key): Show the documentation for
1727 the function bound on a key.
1728 (with-movement): Move with-movement,
1729 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
1730 to clfswm-util.lisp.
1732 * src/clfswm-menu.lisp: New menu system that let user change keys
1733 or functions associated to keys.
1735 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
1737 * src/clfswm-internal.lisp (show-all-children): Display-child is
1738 the first child by default. Solve a bug with father-p.
1740 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
1742 * src/clfswm-internal.lisp (add-frame): Add frame return the
1744 (show-all-children): Move the size computation outside the
1747 * src/bindings-second-mode.lisp (with-movement): Redisplay only
1750 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1751 only the current child.
1753 * src/clfswm-internal.lisp (show-all-children): New display-child
1754 parameter to display only the desired child and its children.
1755 (select-next/previous-child): Only display the current child.
1757 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
1759 * src/clfswm.lisp (init-display): Move the default frame creation
1760 on the default init hook.
1762 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1763 the main mode (for example: "1" on an azerty keyboard).
1765 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
1767 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1768 keysyms. Revert to old grabbing method for the main mode.
1770 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
1772 * src/clfswm.lisp (init-display): Add key handling on no focus
1773 window and on frame windows.
1775 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1777 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1778 all keys by default and replay just what is needed. No change for
1781 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1782 (find-key-from-code): Test for shift and not shift presence.
1784 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
1786 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1787 new key parameter to have less flickering.
1789 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
1791 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1792 layout only one time and revert to no-layout to freely handle
1795 * src/clfswm-nw-hooks.lisp
1796 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1797 with new created window.
1799 * src/clfswm-layout.lisp (register-layout): Now register
1800 automatically a once layout to set the layout only one time and
1801 revert to no-layout to freely handle frames.
1803 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1805 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1806 nw-hook: Open the next window in the current frame and leave the
1807 focus to the current child.
1809 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
1811 * src/bindings-second-mode.lisp: Add keys definitions to
1812 bind-or-jump in the second mode.
1814 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
1815 macro for bind-or-jump-(1|2|3...).
1817 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
1818 arguments to function. This allow to do things like:
1819 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
1820 are passed to my-function on key press.
1822 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
1824 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
1826 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
1828 * src/clfswm-internal.lisp (child-fullname): New function
1830 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
1831 docstring in info-mode-menu. An item can be
1832 '((key function) (key function)) or with docstring
1833 '((key function "documentation 1") (key function "bla bla") (key function))
1835 * src/tools.lisp (ensure-n-elems): New function.
1837 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
1838 resize a frame or the window's father.
1840 * src/clfswm.lisp (init-display): Remove tile-space-layout by
1841 default on the root frame.
1843 * src/clfswm-util.lisp (move/resize-frame): Add standard event
1844 hooks handlers (map-request, configure-notify...)
1846 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
1849 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1851 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
1852 or the window's father.
1854 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
1855 event only if there is a geometry change.
1856 (mouse-focus-move/resize-generic): Generic function to move or
1857 resize a frame or a window father frame.
1859 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1861 * src/clfswm-internal.lisp (show-all-children): Return t if there
1862 is a geometry change.
1864 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
1866 * src/bindings.lisp (Up/Down): Swap select previous/next level.
1868 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
1870 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
1872 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
1873 (with-all-*): Reverse the child list to manage the first child last (like in
1876 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
1877 root window only if true.
1879 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
1880 root window only if *create-frame-on-root* is true.
1882 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
1885 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
1887 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
1888 the current child (even if it's a window).
1890 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
1892 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
1893 (mouse-click-to-focus-and-resize): New functions.
1895 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
1896 (*-px->fl): Convert pixel coordinates to float.
1898 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
1900 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
1902 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
1905 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
1906 and hide-all-children.
1907 (raise-if-needed): New function.
1908 (show-child): Use a first-p parameter to raise windows only when they are
1911 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
1913 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
1916 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
1918 * src/clfswm-info.lisp (keys-from-list): new function.
1920 * src/*: rename 'childs' in 'children'.
1922 * src/*: rename 'group' in 'frame'.
1924 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
1926 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
1928 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
1930 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
1932 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
1934 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
1935 Bind control+o to open the next window in a new group in the root group
1936 (as open in next window in a new workspace in 0801 version).
1938 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
1940 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
1943 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
1945 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
1946 instead of Tab for select-previous-child.
1948 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
1950 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
1953 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
1955 * clfswm-util.lisp (identify-key): Display the documentation
1956 associated to keys when identifying a key.
1958 2008-03-10 Xavier Maillard <xma@gnu.org>
1960 * contrib/clfswm: Complete rewrite of the script. Detect error and
1961 act accordingly. Add command line arguments to configure the
1962 script execution. User can now choose different common lisp
1963 implementation (clisp and sbcl only), choose where to store the
1964 dumped image, where to find clfswm source.
1966 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
1968 * clfswm-internal.lisp (process-new-window): Beginning of new
1969 window hook: each group have a hook to tell what he wants to do
1970 with the new created window.
1972 2008-03-08 Xavier Maillard <xma@gnu.org>
1974 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
1975 call the resulting executable.
1977 * clfswm.lisp (read-conf-file): Check for the user config file in
1978 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
1979 prefered whenever possible.
1981 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
1983 * clfswm-layout.lisp (*-layout): Add an optional raise-p
1984 parameter in each layout.
1986 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
1988 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
1990 (copy/move-current-child-by-name/number): new functions
1991 (focus-group-by-name/number): new functions
1992 (delete-group-by-name/number): new functions
1994 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
1996 * ************************************************************ *
1997 *: Major update - No more reference to workspaces. The main *
1998 structure is a tree of groups or application windows. *
1999 * ************************************************************ *
2001 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
2003 * clfswm.lisp (read-conf-file): Read configuration in
2004 $HOME/.clfswmrc or in /etc/clfswmrc or in
2005 $XDG_CONFIG_HOME/clfswm/clfswmrc.
2006 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
2009 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
2011 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
2014 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
2016 * clfswm-internal.lisp (find-window-group): New function.
2018 * clfswm*: Change to make clfswm run with clisp/new-clx.
2020 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
2022 * clfswm-util.lisp (query-show-paren): Add show parent matching in
2024 (query-string): Bind control+k to delete end of line.
2026 * clfswm-second-mode.lisp (draw-second-mode-window): Display
2027 the action on mouse motion in second mode.
2029 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
2030 event but do not clear the root window.
2031 (handle-configure-request): Adjust unmanaged window from their
2034 * clfswm-internal.lisp (process-new-window): Adjust new window
2035 with the specified hints (max/min/base width/height).
2037 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
2039 * clfswm.lisp (handle-configure-request): Send an Configuration
2040 Notify event. This solve a bug with xterm and rxvt who takes some
2041 times to be mapped. Now there is no delay.
2043 * bindings-second-mode.lisp (define-shell): Run programs after
2044 living the second mode.
2046 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
2048 * clfswm-internal.lisp (process-new-window): Do not crop transient
2049 window to group size.
2050 (adapt-window-to-group): Do not crop transient window to group
2053 * clfswm.lisp (handle-configure-request): Adapt just the window to
2054 its group and don't take care of the configure request. Remove the
2055 bug with the Gimp outside the group and speed up the window
2057 (handle-exposure): Remove show-all-group on exposure event
2060 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
2062 * clfswm-util.lisp (circulate-group-up-copy-window)
2063 (circulate-group-down-copy-window)
2064 (circulate-workspace-up-copy-group)
2065 (circulate-workspace-down-copy-group): Prevent the copy of the
2066 same window in the same workspace.
2068 * bindings-second-mode.lisp (release-copy-selected-window)
2069 (release-copy-selected-group): Prevent the copy of the same window
2070 in the same workspace.
2072 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
2073 (generic-pager-move-window-on-next-line): Remove the copy
2075 (generic-pager-move-group-on-next-workspace)
2076 (generic-pager-move-group-on-previous-workspace): Prevent the copy
2077 of the same window in the same workspace.
2079 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
2080 (mouse-pager-copy-selected-group-release): Prevent the copy of the
2081 same window in the same workspace.
2083 * tools.lisp (setf/=): new macro to set a variable only when
2086 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
2087 x, y... only when necessary.
2089 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
2091 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
2092 new function and hook: force windows to stay in its group (solve a
2095 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
2097 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
2098 less flickering when moving/resizing groups.
2100 * clfswm-internal.lisp (hide-group): new function.
2101 (show-all-group): clear-all: new parameter.
2103 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
2105 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
2107 * clfswm*: Color change for the pager. Typo or better description
2108 in bindings definitions. Define bindings for a qwerty keyboard by
2109 default. dot-clfswmrc show examples to switch to an azerty
2111 License change to GPL v3.
2112 * config.lisp: new file - group all globals variables in this
2115 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
2117 * xlib-util.lisp (hide-window): Remove structure-notivy events
2118 when hidding a window.
2120 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
2122 * package.lisp (*sm-property-notify-hook*): Readded
2123 property-notify-hook in second mode.
2125 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
2127 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
2129 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
2131 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
2132 Tile the current workspace with the current window on one side and
2133 others on the other (this emulate the larswm, dwm, wmii way). See
2134 the default configuration file to enable this mode by default.
2136 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
2139 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
2141 * clfswm-pager.lisp (pager-draw-window-in-group): Add
2142 ensure-printable to print windows name even with non-ascii
2145 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
2147 * clfswm-pager.lisp (pager-explode-current-group): Create a new
2148 group for each window in group.
2149 (pager-implode-current-group): Move all windows in workspace to
2150 one group and remove other groups.
2152 * clfswm-pack.lisp (explode-group): Create a new group for each
2154 (implode-group): Move all windows in workspace to one group and
2155 remove other groups.
2157 * clfswm-util.lisp (identify-key): Remove local configuration
2158 variables and made them available for configuration from
2160 (query-string): idem.
2162 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
2164 * netwm-util.lisp: Start of NetWM compliance.
2165 Add a Netwm client list gestion.
2167 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
2169 * clfswm-internal.lisp (create-group-on-request): open a new group
2170 only when the current group is not empty.
2172 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
2173 bug with null workspace.
2175 * clfswm-pager.lisp (pager-handle-event): Add a hook
2176 system. This hooks can be changed in the user configuration file.
2178 * package.lisp: All colors and font variables are set in
2179 package.lisp and can be configured in the user configuration
2181 Note: If you have configured some less ugly colors (esp. for the
2182 pager) don't hesitate to let me know :)
2184 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
2185 system. This hooks can be changed in the user configuration file.
2187 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
2188 changed in the user configuration file (~/.clfswmrc)
2190 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
2192 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
2193 arrow action, open next window in new workspace/group.
2195 * bindings.lisp (stop-all-pending-actions): new binding.
2196 (open-next-window-in-new-group-once): Open the next windows in a
2197 new group (only once) or open all new windows in a new group (like
2198 others windows managers).
2200 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
2202 * clfswm.lisp (read-conf-file): New function to read a lisp
2203 configuration file at startup.
2204 (focus-group-under-mouse): Check if group isn't the current group
2205 ( prevent a bug with unclutter ).
2207 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
2209 * bindings.lisp (run-program-from-query-string): A program can be
2210 launch from a input query window.
2212 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
2214 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
2216 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
2218 * clfswm.lisp (process-new-window): One can now open the next
2219 window in a workspace called by its number.
2221 * clfswm-util.lisp (query-font-string): Minimal editing
2223 (eval-from-string): And an REPL in the window manager... :)
2225 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2227 * clfswm.lisp (process-new-window): One can now open the next
2228 window in a new workspace or a new group.
2230 * clfswm-pager.lisp (pager-mode): Display the next arrow action
2231 with the hidden windows.
2233 * clfswm.lisp (second-key-mode): Display the current workspace
2234 number and the next arrow action in the state window.
2236 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
2237 the pager mode and then redisplay only the current workspace.
2239 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
2241 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
2242 they can be focused with a keypress, sorted or renumbered.
2244 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2246 * clfswm-pager.lisp (pager-mode): Remove multiple silly
2247 pager-draw-display. This prevent a lot of flickering in the
2250 * clfswm.lisp: Remove all display-force-output and replace them
2251 with only one display-finish-output in the event loop.
2253 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
2255 * clfswm-pager.lisp (pager-center-group): New function - center a
2256 group at the middle of the screen.
2258 * clfswm-pack.lisp (center-group): New function - center a group
2259 at the middle of the screen.
2261 * clfswm.lisp (show-group): Add a cross line under the group.
2262 (show-group): Group are showned even if fullscreened.
2263 (init-display): Add an exposure event on the root window.
2265 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
2267 * package.lisp (*default-group*): Default group is the same size
2268 of a fullscreened group.
2270 * bindings*: Use shift to move, control+shift to copy.
2272 * *.lisp: Add comments for configuration or alternatives. So grep
2273 for CONFIG to see where you can configure clfswm. And grep for
2274 Alternative to use some commented code.
2276 * clfswm.lisp (second-key-mode): Use a single window to show the
2277 second mode. See for alternatives at the end of this file.
2279 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
2281 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
2282 macro of key and mouse definitions.
2283 (define-define-key/mouse): Use state instead of modifiers list
2284 this fix a bug when the modifiers list is not in the rigth order.
2286 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
2288 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
2290 * clfswm-info.lisp (info-mode): Add an info mode.
2292 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
2294 * clfswm.lisp (process-new-window): Change border size for
2296 (show-all-windows-in-workspace): Unhide all windows even when the
2297 current group is in fullscreen mode.
2299 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
2301 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
2302 redisplay the identify window after a terminal switch.
2304 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
2305 redisplay the pager after a terminal switch.
2307 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
2309 * clfswm-util.lisp (identify-key): Add a window to display
2310 the keys to identify on screen.
2312 * bindings.lisp, bindings-pager.lisp: Define same keys to
2313 move/copy groups/windows in second mode and in pager.
2315 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
2317 (show-all-windows-in-workspace): unhide window before adapting it
2320 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
2322 * clfswm.lisp (handle-event): Revert to an older version.
2324 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
2326 * clfswm-util.lisp (force-window-in-group)
2327 (force-window-center-in-group): New functions for transient windows.
2329 * clfswm-pager.lisp (pager-remove-current-workspace/group):
2330 bugfix: hide all windows before removing group or workspace.
2332 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
2334 * bindings-pager.lisp (mouse-pager-move-selected-group)
2335 (mouse-pager-copy-selected-group)
2336 (mouse-pager-move-selected-window)
2337 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
2338 (mouse-pager-rotate-window-down): New functions to have mouse in
2341 * clfswm-pager.lisp (pager-swap-window)
2342 (pager-copy-group-on-next/previous-workspace)
2343 (pager-copy-window-on-next/previous-line): New functions
2345 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
2347 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
2348 (pager-move-group-on-next/previous-workspace): new functions.
2350 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
2351 to its half size (new functions).
2353 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
2355 * clfswm-pager.lisp: workspaces, groups and windows can now be
2356 selectionned with the keyboard or the mouse.
2358 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
2360 * clfswm-pager.lisp (pager-select-workspace-right/left):
2361 workspaces can now be selectionned with the keyboard.
2363 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
2365 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
2366 new function to remove a previous defined key or mouse combination.
2368 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
2370 * clfswm.lisp (main): Check for access error in init-display.
2372 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
2373 keycode before grabbing.
2375 * bindings.lisp: Remove nlambda and use defun to keep the function
2376 documentation with clisp.
2377 (define-shell): new macro to define shell command for the second
2380 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
2382 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
2385 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
2387 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
2388 workspace circulation.
2390 * clfswm-util.lisp (absorb-orphan-window): new function.
2392 * clfswm-keys.lisp: Keysyms support.
2394 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
2396 * clfswm.lisp (show-group): Use one gc for all groups and not one
2399 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
2401 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
2403 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
2404 width and height outside group.
2406 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
2408 * clfswm.lisp: First public release.