1 2012-06-07 Philippe Brochard <pbrochard@common-lisp.net>
3 * contrib/toolbar.lisp (define-toolbar-hooks): Add auto-hide
6 2012-06-06 Philippe Brochard <pbrochard@common-lisp.net>
8 * src/xlib-util.lisp (handle-event): Add an additional hook event
9 system to handle events in contrib code.
11 2012-06-03 Philippe Brochard <pbrochard@common-lisp.net>
13 * src/clfswm-placement.lisp: Add an optional border size in all
16 2012-05-30 Philippe Brochard <pbrochard@common-lisp.net>
18 * contrib/toolbar.lisp (clock): Add a clock module.
20 2012-05-28 Philippe Brochard <pbrochard@common-lisp.net>
22 * contrib/toolbar.lisp: begining of toolbar support.
24 2012-05-24 Philippe Brochard <pbrochard@common-lisp.net>
26 * src/clfswm-internal.lisp (rotate-root-geometry): Do not use
27 rotatef but a simpler algorithm.
29 2012-05-19 Philippe Brochard <pbrochard@common-lisp.net>
31 * src/clfswm-placement.lisp: Adjust width and height in child and
32 root placement to prevent too big child size.
34 2012-05-18 Philippe Brochard <pbrochard@common-lisp.net>
36 * src/clfswm-placement.lisp: New root placement possibility.
38 * src/clfswm-util.lisp (change-current-root-geometry): New
41 2012-05-17 Philippe Brochard <pbrochard@common-lisp.net>
43 * src/clfswm-util.lisp (exchange-root-geometry-with-mouse): New
46 2012-05-16 Philippe Brochard <pbrochard@common-lisp.net>
48 * src/menu-def.lisp: New root menu.
50 2012-05-15 Philippe Brochard <pbrochard@common-lisp.net>
52 * src/clfswm-circulate-mode.lisp (rotate-root-geometry-next)
53 (rotate-root-geometry-previous): New second mode binding to change
56 2012-05-13 Philippe Brochard <pbrochard@common-lisp.net>
58 * src/clfswm-internal.lisp: Remove the *current-child* variable
59 and use a setfable function (current-child) instead.
60 (current-child-setter): Store root current child before apllying
63 2012-05-09 Philippe Brochard <pbrochard@common-lisp.net>
65 * src/clfswm-internal.lisp: Use xdpyinfo/xinerama informations
66 instead of xrandr informations.
68 2012-05-06 Philippe Brochard <pbrochard@common-lisp.net>
70 * src/clfswm-internal.lisp : Use only one list for root
72 (*root*): Root management API simplification.
74 2012-04-30 Philippe Brochard <pbrochard@common-lisp.net>
76 * src/clfswm-internal.lisp: Big change to replace *current-root*
77 variable to support multiple root.
79 2012-04-18 Philippe Brochard <pbrochard@common-lisp.net>
81 * src/tools.lisp (add-new-hook, add-hook): New macro. Do not
82 duplicate hooks by default. Use add-new-hook if you want to
85 2012-04-16 Philippe Brochard <pbrochard@common-lisp.net>
87 * src/clfswm-corner.lisp (wait-window-in-query-tree): Add a limit
88 of try to wait the command window.
90 2012-02-25 Philippe Brochard <pbrochard@common-lisp.net>
92 * src/clfswm-util.lisp (place-frames-from-xrandr)
93 (swap-frame-geometry, rotate-frame-geometry): New helper functions
94 for multiple physical screen.
95 (jump-to-slot, add-frame-in-parent-frame): Change *current-root*
98 2012-01-18 Philippe Brochard <pbrochard@common-lisp.net>
100 * src/*.lisp: Use create-symbol and create-symbol-in-package
101 instead of the shorter symb. (Thanks Aad Versteden).
103 * src/bindings-second-mode.lisp (set-default-second-keys): New
104 key binding to set window and frame transparency.
106 * src/bindings.lisp (set-default-main-mouse): New mouse binding to
107 set window and frame transparency.
109 * src/clfswm-keys.lisp (define-keys): New macro to ease multiple
110 keys definitions. (Thanks Valentin Plechinger for the request).
112 * src/*.lisp: Add full transparency support with xcompmgr.
114 2012-01-14 Philippe Brochard <pbrochard@common-lisp.net>
116 * src/*.lisp: Add transparency support.
118 2012-01-09 Ales Guzik <ales.guzik@gmail.com>
120 * src/clfswm-layout.lisp (tile-layout-mix): New layout to
121 automatically choose between vertival and horizontal tile layout.
122 (tile-space-layout): Fix to have space between screen border and
123 frame the same as between frames.
125 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
127 * load.lisp: Support clisp 2.49+ module system to load CLX.
129 2012-01-04 Ales Guzik <ales.guzik@gmail.com>
131 * src/clfswm-layout.lisp (update-layout-managed-children-keep-position):
132 Fix an inattention error.
134 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
136 * src/xlib-util.lisp (with-xlib-protect): Protect from
137 xlib:lookup-error. This prevent an error in clisp/new-clx when
138 sometimes an xlib:colormap is expected instead of an xlib:window.
140 2012-01-03 Philippe Brochard <pbrochard@common-lisp.net>
142 * src/xlib-util.lisp (handle-event): Fix a clisp/new-clx error
143 when sometimes window slot of event-slots is a pixmap instead of a
146 2011-12-26 Philippe Brochard <pbrochard@common-lisp.net>
148 * src/clfswm-query.lisp: Fill the history list with a non-nil
151 2011-12-25 Philippe Brochard <pbrochard@common-lisp.net>
153 * src/package.lisp (make-x-drawable): Drawable wrapper to prevent
154 type error in some CLX versions.
155 Replace xlib:drawable-* functions with x-drawable-* equivalents
157 2011-12-14 Philippe Brochard <pbrochard@common-lisp.net>
159 * src/clfswm-util.lisp (um-create-xdg-section-list): Add at least
160 the 'Utility menu entry.
162 * src/config.lisp (*xdg-section-list*): moved to config.lisp.
164 * src/clfswm-util.lisp (update-menus): Set a default value for
165 searching .desktop files when XDG_DATA_DIRS is not set.
167 2011-10-15 Philippe Brochard <pbrochard@common-lisp.net>
169 * src/clfswm-internal.lisp (place-window-from-hints): Use
170 with-placement macro to place unmanaged windows in an arbitrary
173 2011-06-16 Philippe Brochard <pbrochard@common-lisp.net>
175 * src/clfswm-internal.lisp (clean-windows-in-all-frames): Prevent
176 current root and current child being equal to child.
178 2011-06-13 Philippe Brochard <pbrochard@common-lisp.net>
180 * src/keysyms.lisp: Repeat Page_Down/Up keysym definitions at the
181 end of the file to change keysyms priority.
183 2011-06-13 Sylvain HENRY <hsyl20@gmail.com>
185 * *.*: Minor spelling fix.
187 2011-06-12 Philippe Brochard <pbrochard@common-lisp.net>
189 * src/clfswm.lisp (:unmap-notify, :destroy-notify): Show all
190 children just after the xlib tree cleanup -> reduce the
191 flickering when a window is deleted or destroyed.
193 * src/clfswm-internal.lisp (process-existing-windows): Do not
194 process the notify window.
196 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
198 * *: **** Release 1106 ****
200 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
202 * src/clfswm-internal.lisp (clean-windows-in-all-frames): New
203 function to prevent xlib error when a window is deleted.
205 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
207 * src/clfswm-internal.lisp
208 (delete-child-and-children-in-all-frames): Delete or destroy
209 children before displaying all children.
211 2011-06-05 Philippe Brochard <pbrochard@common-lisp.net>
213 * src/clfswm-util.lisp (add-frame-in-parent-frame): New function
216 2011-06-04 Philippe Brochard <pbrochard@common-lisp.net>
218 * src/clfswm.lisp (main-unprotected): Destroy all frames windows
219 before closing the display (not really needed).
221 2011-06-02 Philippe Brochard <pbrochard@common-lisp.net>
223 * src/clfswm-layout.lisp (inc-tile-layout-size)
224 (dec-tile-layout-size, inc-slow-tile-layout-size)
225 (dec-slow-tile-layout-size): New functions and bindings.
227 2011-06-01 Philippe Brochard <pbrochard@common-lisp.net>
229 * src/clfswm-expose-mode.lisp (define-expose-letter-keys): Add
230 0..1 and A..Z keys to select a child in exposé mode.
232 * src/clfswm-internal.lisp (display-frame-info): Remove hidden
233 infos in frames windows.
235 * src/clfswm-util.lisp (ask-close/kill-current-window): Menu
238 2011-05-30 Philippe Brochard <pbrochard@common-lisp.net>
240 * src/clfswm-internal.lisp (get-parent-layout): Minor fullscreen
243 2011-05-29 Philippe Brochard <pbrochard@common-lisp.net>
245 * src/clfswm-internal.lisp
246 (delete-child-and-children-in-all-frames): Show all children
247 before deleting/destroying a windows, so prevent a flickering.
248 (get-parent-layout): Return the fullscreen size when the current
251 2011-05-28 Philippe Brochard <pbrochard@common-lisp.net>
253 * src/clfswm-internal.lisp (get-parent-layout): Handle correctly
256 * src/clfswm-util.lisp (delete-focus-window-generic): Do not hide
257 child before removing, so prevent a flickering.
259 * src/clfswm-internal.lisp (show-all-children): Rectangular
260 optimization to display only needed children.
261 (show-all-children): Remove flickering on
262 select-next/previous-brother.
264 2011-05-17 Philippe Brochard <pbrochard@common-lisp.net>
266 * src/clfswm-util.lisp (copy-focus-window, cut-focus-window): New
267 functions and ask-close/kill-current-window menu and bindings
270 2011-05-16 Philippe Brochard <pbrochard@common-lisp.net>
272 * src/clfswm-util.lisp (ask-close/kill-current-window): Add an
273 *ask-close/kill-placement* placement window variable.
275 2011-05-09 Philippe Brochard <pbrochard@common-lisp.net>
277 * contrib/osd.lisp (funcall-button-from-code): Display osd
278 documention for buttons and fix some redefining warnings.
280 2011-05-07 Philippe Brochard <pbrochard@common-lisp.net>
282 * src/clfswm-nw-hooks.lisp (make-permanent-nw-hook-frame): New
283 function. Prevent to add or delete a new window hook for this
286 * src/clfswm-layout.lisp (update-layout-managed-children-position):
289 2011-05-06 Philippe Brochard <pbrochard@common-lisp.net>
291 * src/bindings-second-mode.lisp (set-default-second-keys):
292 select-brother-spatial-move-* binding update.
294 * src/clfswm-layout.lisp (tile-left|right|top|bottom-layout): Ask
295 to keep children positions or not.
297 * src/clfswm-internal.lisp (fixe-real-size): Takes care of border
300 * src/clfswm-layout.lisp (update-layout-managed-children): Fix a
301 bug by using the parent frame instead of the current child.
303 * src/clfswm-circulate-mode.lisp
304 (select-brother-generic-spatial-move+right/left/up/down): New
305 function to select a brother from another in a spatial move.
307 2011-04-19 Philippe Brochard <pbrochard@common-lisp.net>
309 * src/clfswm-pack.lisp (move-frame-constrained)
310 (resize-frame-constrained): Use pixels instead of floating
313 2011-04-18 Philippe Brochard <pbrochard@common-lisp.net>
315 * src/clfswm-pack.lisp (resize-frame-constrained): Takes care of
317 (implode-frame, implode-current-frame): New functions. Absorb all
318 frames subchildren in frame. Explode frame opposite.
320 2011-04-17 Philippe Brochard <pbrochard@common-lisp.net>
322 * src/clfswm-pack.lisp (move-frame-constrained)
323 (resize-frame-constrained): New function. Move and resize frame
324 with the mouse constrained by other frame brothers.
326 2011-04-14 Philippe Brochard <pbrochard@common-lisp.net>
328 * src/clfswm-util.lisp (with-movement-select-next-brother)
329 (with-movement-select-previous-brother)
330 (with-movement-select-next-child): Use a simple method (do not
331 enter in the circulate mode) to allow to circulate in all children
334 * src/clfswm-menu.lisp (open-menu): Save info hash table keys
335 instead of deleting newly created keys.
337 2011-03-21 Philippe Brochard <pbrochard@common-lisp.net>
339 * src/clfswm-internal.lisp (x-px->fl, y-px->fl): Takes care of
342 2011-03-20 Philippe Brochard <pbrochard@common-lisp.net>
344 * src/clfswm-info.lisp (show-config-variable): call
345 produce-conf-var-doc.
347 2011-03-18 Philippe Brochard <pbrochard@common-lisp.net>
349 * src/clfswm-autodoc.lisp (produce-conf-var-doc-html): Produce a
350 documentation for all configurable variables in CLFSWM -
353 * src/clfswm-internal.lisp (leave-frame): Hide all children except
356 2011-03-16 Philippe Brochard <pbrochard@common-lisp.net>
358 * src/clfswm-autodoc.lisp (produce-all-docs): Produce a
359 documentation for all configurable variables in CLFSWM.
361 * src/clfswm-layout.lisp (set-gimp-layout): Display a notify
362 window with the help on the GIMP layout.
364 2011-03-12 Philippe Brochard <pbrochard@common-lisp.net>
366 * src/menu-def.lisp: Menu update to prevent cursor keys clash.
368 * clfswm.asd: Change compilation order to prevent undefined
371 * src/clfswm-internal.lisp (show-child(frame)): Handle properly
372 the show-root-frame-p parameter.
374 2011-03-11 Philippe Brochard <pbrochard@common-lisp.net>
376 * src/clfswm-util.lisp (move-frame, resize-frame): Do not move or
377 resize a frame when it's the current root.
379 2011-03-10 Philippe Brochard <pbrochard@common-lisp.net>
381 * src/clfswm-internal.lisp (show-all-children): Handle properly
382 duplicated child in multipe frames.
384 2011-03-09 Philippe Brochard <pbrochard@common-lisp.net>
386 * contrib/volume-mode.lisp (set-default-volume-keys): Add more
387 keybindings (up/down, right/left) to raise/lower the volume.
389 * src/clfswm-layout.lisp: Add a variable border size for frames
392 2011-03-08 Philippe Brochard <pbrochard@common-lisp.net>
394 * src/clfswm-util.lisp (cut-current-child, remove-current-child)
395 (delete-current-child): Hide the current child before doing the
398 * src/clfswm-internal.lisp (show-all-children): Hide windows not
399 in the current root before displaying those in current root.
400 Remove all hide-all unnecessary calls.
402 * src/clfswm-configuration.lisp (save-variables-in-conf-file):
403 Save only variables with a different value than their original
406 2011-03-07 Philippe Brochard <pbrochard@common-lisp.net>
408 * src/clfswm-info.lisp (show-config-variable): Use the new
411 * src/clfswm-autodoc.lisp (produce-configuration-variables): Use
412 the new defconfig method.
414 * src/clfswm-configuration.lisp (create-configuration-menu):
415 Change the config system with a more lispy one and a less string
416 based one: (defconfig name value group doc).
419 2011-03-06 Philippe Brochard <pbrochard@common-lisp.net>
421 * src/clfswm-internal.lisp (show-all-children): Simplify the
423 (show-child): Display an unmanaged window whe it's the current
425 (show-all-children): add the ability to display all child from
426 *root-frame* and hide all those who are not in *current-root*.
427 -> remove hide-all-children when needed.
429 * src/xlib-util.lisp (move-window,resize-window): Add a
430 *color-move-window* border when moving or resizing a window.
432 2011-03-04 Philippe Brochard <pbrochard@common-lisp.net>
434 * src/clfswm-internal.lisp (show-all-children): Perform only one
435 recusion on the clfswm tree: calculate geometry and place child in
438 2011-03-03 Philippe Brochard <pbrochard@common-lisp.net>
440 * src/clfswm-internal.lisp (show-all-children): Rethink of display
441 child order to prevent very annoying flickering.
443 2011-02-27 Philippe Brochard <pbrochard@common-lisp.net>
445 * src/clfswm-util.lisp (query-yes-or-no): New function.
447 * src/clfswm-configuration.lisp (reset-all-config-variables): New
448 function and menu entry.
449 (query-conf-value): Add the ability to leave the field blank to
450 reset the variable to its default value.
452 2011-02-26 Philippe Brochard <pbrochard@common-lisp.net>
454 * src/clfswm-configuration.lisp
455 (add-all-configuration-default-value): Add a default value to
456 configurable variables.
458 2011-02-23 Philippe Brochard <pbrochard@common-lisp.net>
460 * src/clfswm.lisp (main-unprotected): Create the configuration
461 menu only once at startup.
463 2011-02-22 Desmond O. Chang <dochang@gmail.com>
465 * contrib/amixer.lisp: Add a volume mode inspired by the emms
466 volume package. Alsa mixer interface.
468 * contrib/volume-mode.lisp: Add a volume mode inspired by the emms
471 2011-02-22 Desmond O. Chang <dochang@gmail.com>
473 * src/clfswm.lisp (main): Use ASDF:SYSTEM-SOURCE-DIRECTORY instead
474 of *LOAD-TRUENAME*. *LOAD-TRUENAME* is only bound during a call to
475 LOAD. If one eval CLFSWM:MAIN in repl, BASE-DIR will be an empty
476 string. Use ASDF:SYSTEM-SOURCE-DIRECTORY to fix it.
478 2011-02-16 Philippe Brochard <pbrochard@common-lisp.net>
480 * src/clfswm.lisp (main-unprotected): Add a close hook. And close
481 the notify window, the virtual keyboard and the clfswm terminal by
484 2011-02-15 Philippe Brochard <pbrochard@common-lisp.net>
486 * src/clfswm.lisp (main-unprotected): Destroy the notify window
487 before closing the display. This fix a bug when resetting/reloading
490 2011-02-12 Philippe Brochard <pbrochard@common-lisp.net>
492 * src/xlib-util.lisp (equal-wm-class-fun, equal-wm-name-fun)
493 (raise-window-fun, raise-and-focus-window-fun): New functions.
495 * src/config.lisp (*clfswm-terminal-cmd*): Switch from xterm to
497 (*never-managed-window-list*): Structure change to be more
498 flexible. Let the choice to focus, raise and do nothing on never
501 2011-02-09 Philippe Brochard <pbrochard@common-lisp.net>
503 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Take
504 care of never managed windows to move or resize them if the raise
507 * src/clfswm-internal.lisp (in-frame, in-window, in-child): New
510 2011-02-08 Philippe Brochard <pbrochard@common-lisp.net>
512 * src/clfswm.lisp (main-mode): Raise or not unmanaged windows
513 following request in *never-managed-window-list*.
515 2011-02-05 Philippe Brochard <pbrochard@common-lisp.net>
517 * *: **** Release 1102 ****
519 2011-02-05 Desmond O. Chang <dochang@gmail.com>
521 * src/keysyms.lisp: Add extended keysyms from stumpwm.
523 2011-02-01 Desmond O. Chang <dochang@gmail.com>
525 * src/clfswm-util.lisp (run-or-raise): New function (thanks to
528 * src/clfswm-internal.lisp (with-all-*): add a nil block.
530 2011-01-28 Desmond O. Chang <dochang@gmail.com>
532 * src/clfswm-util.lisp (xdg-config-home): XDG_CONFIG_HOME should
533 be $HOME/.config by default.
535 2010-12-29 Philippe Brochard <pbrochard@common-lisp.net>
537 * contrib/osd.lisp (display-doc): Add another method where a
538 CLFSWM native window is used to display the key documentation.
540 2010-12-27 Philippe Brochard <pbrochard@common-lisp.net>
542 * src/xlib-util.lisp (with-xlib-protect): Force to revert to the
545 2010-12-25 Philippe Brochard <pbrochard@common-lisp.net>
547 * src/clfswm-second-mode.lisp (second-key-mode): Call the second
548 mode leave function only when the generic mode was ended.
550 2010-12-08 Philippe Brochard <pbrochard@common-lisp.net>
552 * src/clfswm-second-mode.lisp (sm-leave-function): Do not use
553 *second-mode-program* anymore.
555 2010-12-07 Philippe Brochard <pbrochard@common-lisp.net>
557 * src/clfswm-second-mode.lisp (*second-mode-leave-function*): New
558 variable bound to a function executed (when not null) on second
561 2010-11-14 Philippe Brochard <pbrochard@common-lisp.net>
563 * src/clfswm-util.lisp (find-child-under-mouse): Do not find
566 2010-11-13 Philippe Brochard <pbrochard@common-lisp.net>
568 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
569 Do not display the accel window for unmanaged windows.
571 2010-11-11 Philippe Brochard <pbrochard@common-lisp.net>
573 * src/clfswm-internal.lisp (set-current-root): Handle
574 window-parent in set-current-root.
576 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
577 focus the parent child when the current root is a window.
579 2010-11-09 Philippe Brochard <pbrochard@common-lisp.net>
581 * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
582 New function an bindings.
584 * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
587 2010-11-07 Philippe Brochard <pbrochard@common-lisp.net>
589 * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
590 function to let the user choose to keep child position with
593 * src/clfswm-internal.lisp (remove-frame-data-slot): New
596 2010-11-05 Philippe Brochard <pbrochard@common-lisp.net>
598 * src/clfswm-internal.lisp (frame-select-next-child)
599 (frame-select-previous-child): New functions and bindings. Select
600 the next/previous child in the current frame.
602 2010-10-31 Philippe Brochard <pbrochard@common-lisp.net>
604 * src/clfswm-query.lisp (query-mode-complet): New function: Handle
605 completion in query-mode.
607 2010-10-30 Philippe Brochard <pbrochard@common-lisp.net>
609 * src/clfswm-query.lisp (query-print-string): Handle long lines
612 2010-10-27 Philippe Brochard <pbrochard@common-lisp.net>
614 * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
615 all characters are printable.
617 2010-10-25 Philippe Brochard <pbrochard@common-lisp.net>
619 * contrib/server/server.lisp: Load clfswm client code in the main
620 program and let the user start it with a --client command line
623 * src/package.lisp (*main-entrance-hook*): New hook executed after
624 loading configuration file and before opening the display.
626 2010-10-23 Philippe Brochard <pbrochard@common-lisp.net>
628 * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
630 * src/clfswm-internal.lisp (show-child): Show window only if not
633 * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
634 change modifiers after binding definition.
636 2010-10-21 Philippe Brochard <pbrochard@common-lisp.net>
638 * contrib/osd.lisp: New file: OSD (On Screen Display) for
641 * src/clfswm-menu.lisp (open-menu): Modularise function.
643 2010-10-13 Philippe Brochard <pbrochard@common-lisp.net>
645 * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
646 key binding in main and second mode.
648 2010-10-10 Philippe Brochard <pbrochard@common-lisp.net>
650 * src/clfswm-util.lisp (open-notify-window): Convert hello-window
651 functions to a more generic Notify-window system.
653 * src/tools.lisp (add-timer): Add an id to identify the timer.
655 2010-10-09 Philippe Brochard <pbrochard@common-lisp.net>
657 * src/tools.lisp (erase-timer): New function.
659 * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
660 the hello window. Add Configuration variables.
662 2010-10-08 Philippe Brochard <pbrochard@common-lisp.net>
664 * src/clfswm-util.lisp (): Add an Hello window at startup.
666 * src/tools.lisp (process-timers): Add a timer system.
668 2010-10-07 Philippe Brochard <pbrochard@common-lisp.net>
670 * src/clfswm-query.lisp (add-in-query-string): Handle correctly
673 2010-10-06 Philippe Brochard <pbrochard@common-lisp.net>
675 * src/clfswm-query.lisp (query-print-string): Change cursor color
676 and show parenthesis matching with colors (on match and on
679 2010-10-05 Philippe Brochard <pbrochard@common-lisp.net>
681 * src/clfswm-internal.lisp (show-all-children): Do not raise a
682 child when its parent is hidden.
684 2010-10-02 Philippe Brochard <pbrochard@common-lisp.net>
686 * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
687 possibility to circulate over subchild of the current child.
689 * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
690 (expose-windows-generic): Add an escape-body function to return to
691 the original state on escape key.
693 * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
694 to bind the current child from the configuration file.
696 2010-10-01 Philippe Brochard <pbrochard@common-lisp.net>
698 * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
699 window hook: the frame absorb all new windows that match
700 nw-absorb-test frame data slot.
702 2010-09-30 Philippe Brochard <pbrochard@common-lisp.net>
704 * src/clfswm-expose-mode.lisp (expose-create-window): Show window
705 title in accel window.
707 2010-09-29 Philippe Brochard <pbrochard@common-lisp.net>
709 * configure: Use the Xavier Maillard clfswm script in contrib to
710 build an executable in the standard way.
712 2010-09-26 Philippe Brochard <pbrochard@common-lisp.net>
714 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
715 New functions. Add a window on each child in the expose mode to
718 * src/clfswm-internal.lisp (child-x, child-y, child-width)
719 (child-height): New methods to get real child coordinates.
721 2010-09-25 Philippe Brochard <pbrochard@common-lisp.net>
723 * src/clfswm-layout.lisp (*-layout): Use child-position.
725 * src/clfswm-internal.lisp (child-position): New function.
727 * src/clfswm-expose-mode.lisp (expose-windows-mode)
728 (expose-all-windows-mode): Use a generic mode.
730 * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
731 with handle-event-fun symbols instead of inspecting clfswm
732 internals symbols on each mode change.
734 * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
735 a separate clfswm-expose-mode.lisp file.
737 * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
738 screen size instead of hardcoded test coordinates.
740 2010-09-24 Philippe Brochard <pbrochard@common-lisp.net>
742 * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
743 (speed-mouse-right, speed-mouse-up, speed-mouse-down)
744 (speed-mouse-undo, speed-mouse-first-history): New functions to
745 quickly move the mouse. Implemented for the second mode.
747 2010-09-16 Philippe Brochard <pbrochard@common-lisp.net>
749 * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
750 write permission on $clfswm_asd_path. So anybody can start clfswm
751 even if there is no write permission on the source directory.
753 2010-09-12 Philippe Brochard <pbrochard@common-lisp.net>
755 * contrib/clfswm: Add support to cmucl, ccl and ecl.
757 2010-09-11 Philippe Brochard <pbrochard@common-lisp.net>
759 * src/clfswm-util.lisp (set-hide-unmanaged-window)
760 (set-show-unmanaged-window, set-default-hide-unmanaged-window):
761 New functions and menu entry.
762 (set-globally-hide-unmanaged-window)
763 (set-globally-show-unmanaged-window): New functions and menu
766 * src/clfswm-internal.lisp (hide-unmanager-window-p): New
768 (show-child): Add a data slot on frame to hide or not unmanaged
771 * src/clfswm-corner.lisp (present-clfswm-terminal)
772 (present-virtual-keyboard): Use a function (generic-present-body)
773 instead of a macro (generate-present-body).
775 * src/clfswm-util.lisp (update-menus): List all directories and
776 subdirectories in $XDG_DATA_DIRS/applications.
778 2010-09-10 Philippe Brochard <pbrochard@common-lisp.net>
780 * src/clfswm-corner.lisp (generate-present-body): New macro.
781 (present-clfswm-terminal, present-virtual-keyboard): Use
782 generate-present-body.
784 2010-09-09 Philippe Brochard <pbrochard@common-lisp.net>
786 * src/clfswm-util.lisp (update-menus): Follow XDG specifications
787 instead of the non-portable Debian update-menu.
789 2010-09-07 Philippe Brochard <pbrochard@common-lisp.net>
791 * src/clfswm.lisp (error-handler): New function do handle
792 asynchronous errors and ignore them.
793 (open-display): Install the new error-handler on display.
795 2010-09-05 Philippe Brochard <pbrochard@common-lisp.net>
797 * src/xlib-util.lisp (with-xlib-protect): Add a
798 with-simple-restart on top of body execution.
800 2010-09-04 Philippe Brochard <pbrochard@common-lisp.net>
802 * src/clfswm.lisp (main-loop): Protect all xlib functions with an
805 * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
806 handle-event. Add a with-simple-restart to prevent a
807 clisp/new-lisp infinite loop.
809 2010-08-30 Philippe Brochard <pbrochard@common-lisp.net>
811 * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
812 clfswm terminal working even on xterm title changes.
814 2010-08-29 Philippe Brochard <pbrochard@common-lisp.net>
816 * src/clfswm-util.lisp (run-other-window-manager): Update for
819 * src/tools.lisp (do-execute): New parameter io to change the
822 * src/clfswm-util.lisp (hide-current-child): Prevent from removing
825 * src/clfswm-internal.lisp (child-member): New predicate.
826 (child-remove): New function.
828 * src/*.lisp: Use child-member and child-remove everywhere it's
831 2010-08-28 Philippe Brochard <pbrochard@common-lisp.net>
833 * src/clfswm.lisp (main-loop): Ensure that all events have been
834 processed after a process-event.
836 * src/clfswm-internal.lisp (is-in-current-child-p): New function.
838 2010-08-27 Philippe Brochard <pbrochard@common-lisp.net>
840 * src/clfswm.lisp (main-mode:configure-request): Raise the window
841 only when present on the current child and focus it accordingly.
843 2010-08-26 Philippe Brochard <pbrochard@common-lisp.net>
845 * src/clfswm-circulate-mode.lisp (circulate-loop-function):
846 Use is-a-key-pressed-p.
848 * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
850 * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
851 returned by xlib:keysym->keycodes.
853 * src/*.lisp: Use the new child-equal-p to compare children. This
854 prevent a bug with sbcl/cmucl when the standard equal function
855 does not work with xlib:window.
857 * src/clfswm-internal.lisp (child-equal-p): New predicate.
859 2010-08-25 Philippe Brochard <pbrochard@common-lisp.net>
861 * src/clfswm-generic-mode.lisp (generic-mode): Use an
862 xlib:event-listen before processing event with
863 xlib:process-event. This prevent a bug with CLX threaded
864 implementation like sbcl.
866 * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
867 processing event with xlib:process-event. This prevent a bug with
868 CLX threaded implementation like sbcl.
870 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
872 * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
874 * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
877 * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
878 (find-parent-frame, find-frame-window, find-frame-by-name)
879 (find-frame-by-number): Use with-find-in-all-frames to search in
880 frames in the right order.
882 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
883 unwanted flickering with unmanaged windows.
885 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
887 * src/package.lisp: Remove event handler hooks as they're not
888 needed anymore (To replace them: use closure and define-handler).
890 * src/xlib-util.lisp (move-window, resize-window)
891 (wait-mouse-button-release): Use a generic mode.
893 * src/*.lisp: Replace the case to handle event with a more (tricky)
894 lispy method which bind a function to each keywords associated
897 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
899 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
900 menu entry between delete-current-child and remove-current-child.
901 ie: Delete a child and its children in all frames by default.
903 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
905 * src/package.lisp: Add a placement configuration group.
907 * src/binding*.lisp: Bind control+g to escape the current action
910 * src/clfswm-internal.lisp
911 (delete-child-and-children-in-all-frames): New function and
912 binding: Second mode - Control+Delete delete the current child and
913 its children in all frames (ie: close the current child and its
916 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
918 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
919 the frame window and the frame gc. Close a very annoying bug when
920 cuting/pasting a frame or moving a child over frames with the
923 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
924 all children in *current-root* after moving/resizing a frame.
926 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
928 * src/clfswm-util.lisp (delete-focus-window)
929 (destroy-focus-window): Remove child in parent frame before
932 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
934 * src/clfswm-util.lisp (identify-key): Add a timeout in
936 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
937 of the window passed by xlib:process-event.
939 * src/xlib-util.lisp (move-window, resize-window)
940 (wait-mouse-button-release): Add a timeout in xlib:process-event.
942 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
944 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
945 to launch an other window manager and to return to clfswm.
947 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
949 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
952 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
954 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
957 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
958 parameter and a loop timeout.
960 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
962 * src/clfswm.lisp (main): Add an alternate configuration filename
965 * load.lisp: Add a debuging code example.
967 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
969 * src/clfswm-configuration.lisp (create-configuration-menu): New
970 menu to configure all clfswm variables while clfswm is running.
972 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
974 * src/clfswm-util.lisp (save-configuration-variables): New
975 function to save all configuration variables in clfswmrc.
977 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
979 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
981 (set-default-info-keys): Add cursor key support in info mode.
983 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
985 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
988 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
989 prevent reading the configuration file (this may be useful to
990 produce the original documentation without user modifications
991 with the rc configuration file).
993 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
995 * src/bindings-second-mode.lisp (set-default-second-keys):
996 Simplification of Escape key to close/kill/remove the focus window
997 and unhide all windows.
999 * src/bindings.lisp (set-default-main-keys): Simplification of
1000 Escape key to close/kill/remove the focus window and unhide all
1003 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
1004 focus and unhide all windows capabilities.
1006 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1008 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
1010 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
1012 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
1013 Keep child order and don't make unnecessary child movement.
1014 (one-column-layout, one-line-layout): New layouts.
1016 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
1018 * *: **** Release 0906 ****
1020 * contrib/cd-player.lisp: New file to handle the CD player.
1022 * contrib/xmms.lisp: New file to handle the xmms player.
1024 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1026 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
1027 Maximize windows in their frame - Leave frames to their actual
1030 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
1031 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
1033 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
1035 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
1037 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
1039 * contrib/mpd.lisp: Use a standard menu.
1041 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
1043 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
1045 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
1047 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
1049 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
1052 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
1054 * src/config.lisp (get-fullscreen-size): One pixel adjustment
1057 * src/clfswm-placement.lisp (*-child-placement): One pixel
1060 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
1062 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
1063 Ensure that all characters are printable.
1065 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
1068 * src/clfswm-placement.lisp (*-child-placement): Adjust
1069 coordinates to one pixel in the current child.
1071 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1073 * src/clfswm-query.lisp (query-enter-function): Assign font before
1074 width and height calculation.
1076 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1078 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
1079 bannish the pointer in an arbitrary place.
1081 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
1082 place the info window in an arbitrary place.
1084 * src/clfswm-query.lisp (query-enter-function): Use with-placement
1085 macro to place the query window in an arbitrary place.
1087 * src/clfswm-placement.lisp: New file. Allow to place info windows
1088 or query windows on an arbitrary place. Allow to bannish the
1089 pointer on an arbitrary place.
1091 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
1093 * src/clfswm-circulate-mode.lisp (reorder-child)
1094 (reorder-brother): Unfocus windows before reordering children or
1097 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1099 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
1100 the parent is a frame.
1102 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
1103 motion with a default modifier.
1105 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
1108 * src/clfswm-info.lisp (info-mode): Handle motion with a default
1110 (info-mode): Optimization in loop function.
1112 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1114 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
1115 root-frame correctly.
1117 * clfswm.asd: Dependency fix for clfswm-generic-mode.
1119 * src/clfswm-circulate-mode.lisp (reorder-child)
1120 (reorder-brother): Handle empty frames.
1121 (reorder-brother): Redisplay only the parent frame of the current
1124 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
1125 parent frame of the current frame.
1127 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
1129 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
1130 Maximize/Unmaximize the current frame in its parent frame.
1132 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
1133 windows and frames in their parent frame.
1135 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1137 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
1139 * src/clfswm-circulate-mode.lisp (reorder-child)
1140 (reorder-brother): Reinitialise on circulate type change
1141 child to brother or brother to child.
1143 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
1144 calls xlib:display-finish-output on each map-request. So speed up
1147 * src/xlib-util.lisp (map-window): New function. Call
1148 xlib:display-finish-output on each map request.
1150 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1152 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
1153 Optimisation when drawing second mode window.
1155 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1157 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
1160 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1162 * src/clfswm-util.lisp (run-program-from-query-string): Launch
1163 command only with a return validation.
1165 2009-04-22 Xavier Maillard <xma@gnu.org>
1167 * src/clfswm-query.lisp (query-string): Use a generic mode.
1169 2009-04-19 Xavier Maillard <xma@gnu.org>
1171 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
1173 2009-04-18 Xavier Maillard <xma@gnu.org>
1175 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
1176 to define all other modes.
1178 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1180 * src/package.lisp (): Use *default-font-string* for all
1183 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
1185 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
1187 * src/xlib-util.lisp (null-size-window-p): Better check of null
1190 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
1192 * src/clfswm.lisp (handle-map-request): Add a fix to manage
1193 correctly fullscreen windows (SDL particularly).
1195 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
1197 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
1198 a segfault with clisp/new-clx.
1200 * src/clfswm.lisp (handle-motion-notify): Add a needed window
1203 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
1204 needed window argument.
1206 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
1208 * src/xlib-util.lisp (wait-no-key-or-button-press)
1209 (wait-a-key-or-button-press): Check buttons press/release correctly"
1211 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
1213 * src/menu-def.lisp: Add children navigation menu in the movement
1214 menu (select next/previous child/brother/level).
1216 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
1218 * *: Rename 'sister' frame to 'brother' frame.
1220 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
1221 alias in a real modifier.
1223 * src/package.lisp (*modifier-alias*): New list of modifier alias
1224 For example: :alt is :mod-1, :numlock is :mod-2...
1226 * src/tools.lisp (remove-hook): New function.
1228 * src/clfswm-keys.lisp (with-capslock, without-capslock)
1229 (with-numlock, without-cnumlock): New functions.
1231 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
1233 * src/clfswm-info.lisp: Use the *binding-hook* to create info
1234 keys and mouse bindings.
1236 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
1237 second keys and mouse bindings.
1239 * src/bindings.lisp: Use the *binding-hook* to create main keys
1242 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1244 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
1247 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
1249 * src/menu-def.lisp: Use a menu instead of a function for the
1252 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
1254 * src/clfswm-util.lisp (show-standard-menu): Display the standard
1255 menu from the 'update-menus' command.
1257 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
1259 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
1260 it's already grabbed.
1262 * src/clfswm-internal.lisp (display-frame-info): Use configurable
1263 colors and fix a bug with background.
1264 (display-frame-info): Set window background when displaying info.
1266 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1268 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
1269 warning with clisp/new-clx.
1271 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
1273 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
1276 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1278 * *: **** Release 0809 ****
1280 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1282 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
1284 (ensure-unique-number): New function and menu entry.
1286 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
1288 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
1289 hook: open the next window in a named frame.
1290 (numbered-frame-nw-hook): New new window hook: open the next
1291 window in a numbered frame.
1293 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
1294 cases. So query-string can be called even in the main mode.
1296 * src/clfswm-internal.lisp (show-all-children): Do not raise a
1297 child by default => far less flickering.
1299 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
1301 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
1303 * src/menu-def.lisp: Change key binding for the CLFSWM menu
1306 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
1307 is nil. (workaround on some CLX implementation).
1309 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
1311 * src/menu-def.lisp: Add a menu to set a focus policy for all
1314 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
1315 (all-frames-set-*-focus-policy): Set a focus policy for all
1318 * src/clfswm.lisp (handle-enter-notify): sloppy-select
1319 mode. Select a child and its parents on mouse over.
1321 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
1323 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
1324 policy -> Sloppy focus only for windows in the current frame.
1325 (main-unprotected): Exit clfswm on init error (ie: when another
1326 window manager is running).
1328 * src/clfswm-util.lisp (reset-clfswm): New function.
1330 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
1332 * src/clfswm-menu.lisp (init-menu): New function.
1334 * src/clfswm-util.lisp (reload-clfswm): New function to reload
1336 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
1338 * src/clfswm.lisp (main, main-unprotected): Handle error in a
1339 superior main function. Now CLFSWM can't break the X session. It
1340 just reinitialize the display and run a new main loop.
1342 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
1343 *vt-keyboard-on* global to avoid warnings when loading clfswm.
1345 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
1346 (help-on-gimp-layout): Describe how to use the GIMP layout.
1348 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
1350 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
1351 main-window-right-layout. Change the keybinding for (shift)alt+tab
1352 to not select windows in the main window lisst.
1353 Bind F8 to add a window in the main window list.
1354 Bind F9 to remove a window in the main window list.
1355 Change the focus policy to :sloppy.
1356 (set-previous-layout): Restore the previous layout, keybinding and
1359 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
1361 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
1363 * src/clfswm-layout.lisp (main-window-left-layout)
1364 (main-window-bottom-layout, main-window-top-layout): New
1366 Factorize layouts in menu.
1368 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
1370 * src/clfswm-layout.lisp (main-window-right-layout): A possible
1371 GIMP layout: one or more main windows on one side of the
1372 frame. Others on the other size.
1374 * src/clfswm-util.lisp
1375 (current-frame-set-click/sloppy-focus-policy): Each frame can have
1376 a different focus policy (one of :click or :sloppy).
1377 The default focus policy is set with *default-focus-policy*.
1379 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
1381 * src/clfswm-info.lisp (show-config-variable): New function.
1383 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
1385 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
1387 * src/clfswm-info.lisp: Colored help for key binding and corners
1390 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
1392 * src/clfswm-util.lisp (delete-focus-window)
1393 (destroy-focus-window): Remove chid only in
1394 handle-unmap/destroy-notify. Focus *current-root* only when
1395 closing/killing the current child.
1397 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
1398 functions or corners.
1400 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1402 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
1403 action: Hide/Unhide a terminal on mouse corner action. (By default
1404 right mouse button on the top left corner).
1406 * src/config.lisp (*never-managed-window-list*): New config
1409 * src/clfswm-internal.lisp (never-managed-window-p): New function:
1410 Handle never managed window in a more simple way.
1412 * src/clfswm-corner.lisp: New file and new and more simple method
1413 to define corners actions.
1415 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
1417 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
1419 * src/clfswm-layout.lisp (fast-layout-switch)
1420 (define-fast-layout-switch): New functions: Switch between two
1423 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
1424 really in the second mode. So leave-second-mode can be used even
1427 * src/clfswm-util.lisp (switch-to-last-child): New function:
1428 Store the current child and switch to the previous one.
1430 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1432 * src/clfswm-util.lisp (display-current-window-info): Display the
1434 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
1435 (top right by default). By default 'xvkbd' is used.
1437 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1439 * src/xlib-util.lisp (move-window, resize-window): Compress motion
1442 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
1444 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
1447 * src/clfswm-info.lisp (info-mode): Compress motion events.
1449 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
1451 * src/clfswm-internal.lisp (show-all-children): Compute geometry
1452 and selection first and then show only necessary children.
1453 (show-child): remove unneeded display-p parameter.
1455 * src/config.lisp (get-fullscreen-size): Place the frame border
1456 outside the screen (this prevent the loose of 2 pixels per
1459 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
1461 * src/clfswm-internal.lisp (focus-child): Algorithm change to
1462 raise only the selected child.
1464 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
1466 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
1467 Raise only viewable children.
1469 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
1471 * src/clfswm-internal.lisp (show-all-children): Always raise all
1472 displayed children. Remove all references to raise-p.
1474 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1476 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
1479 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
1480 second mode binding on raise/lower child in its frame.
1482 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
1483 behaviour to the new raise/lower property.
1484 Call clear-nw-hook before the rest of the hook.
1486 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
1487 (mouse-click-to-focus-and-resize-window): Stop button event. This
1488 prevent a keyboard/pointer freeze.
1490 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1492 * src/clfswm-internal.lisp (frame-lower-child)
1493 (frame-raise-child): New functions to raise/lower a child in its
1496 * src/clfswm-util.lisp (have-to-present-windows)
1497 (have-to-present-all-windows): New functions to have an MaxOS
1498 expose like on mouse click in screen corner.
1500 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
1502 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
1504 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
1505 child from a choice in all frames with hidden children.
1507 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
1509 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
1511 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
1512 (unhide-all-children): New functions.
1514 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
1517 * src/clfswm-util.lisp (hide/show-frame-window): new function and
1520 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
1522 * src/clfswm-util.lisp (rename-current-child): Do not display the
1523 frame info for a window.
1525 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
1527 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
1528 frame window for the removed child and its children.
1530 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
1532 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
1535 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
1537 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
1538 the ROX pinboard (ie: leave it lowered in the root window as
1541 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
1542 (tile-left-layout, tile-right-layout, tile-top-layout)
1543 (tile-bottom-layout): Use all the frame space when there is only
1546 * src/clfswm-internal.lisp (place-window-from-hints): Center
1547 unmanaged windows in the root screen.
1549 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
1552 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1554 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
1555 typo in managed types.
1557 * src/clfswm-internal.lisp (show-child): Always display frame info
1558 even if the frame is hidden.
1560 * src/xlib-util.lisp (resize-window): Use a better algorithme to
1563 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1565 * src/clfswm-util.lisp (with-movement): Display frame info for all
1566 frames in current root.
1568 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1570 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
1572 * src/bindings-second-mode.lisp (define-second-key #\a): New
1573 binding on 'add-default-frame'.
1575 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1576 message to follow the autodocumentation process.
1578 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1580 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1581 "Space" to jump to a child. "B" to bind a slot on the current
1584 * src/bindings-second-mode.lisp: Use "Tab" instead of
1587 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
1589 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1590 unmanaged (hidden) windows.
1592 * src/clfswm-internal.lisp (place-window-from-hints): Give a
1593 minimal size for windows.
1594 (with-all-windows-frames-and-parent): New function.
1596 * src/config.lisp (*default-window-width/height*): New parameters.
1598 * src/clfswm-internal.lisp (place-window-from-hints): Center
1599 windows in the screen instead of in their frame.
1601 * src/bindings-second-mode.lisp (tile-space-current-frame): New
1604 * src/clfswm-layout.lisp (register-layout): Intern the once name
1605 in the right package.
1607 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1609 * doc/dot-clfswmrc: Update to follow the new clfswm way.
1611 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
1613 * src/clfswm-internal.lisp (set-current-child)
1614 (adapt-child-to-parent, show-child, hide-child): Handle the case
1615 where child is not a frame or a window.
1617 * src/clfswm-util.lisp
1618 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1619 Check if child is a frame.
1621 * src/clfswm-internal.lisp (managed-window-p): Handle the case
1622 where frame is null.
1623 (place-frame): Check if frame and parent are frames.
1625 * src/clfswm-info.lisp (info-mode): display all frame info before
1628 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1629 info before leaving.
1631 * src/clfswm-internal.lisp (display-all-frame-info): New function.
1633 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
1635 * src/tools.lisp (getenv): Implemented for ECL.
1636 (urun-prog): Implemented for ECL.
1638 * src/clfswm-util.lisp (identify-key): Use a double buffer to
1641 * src/clfswm-query.lisp (query-string): Use a double buffer to
1644 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1647 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1650 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
1652 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1654 * src/menu-def.lisp: New file: move all menu definition in
1657 * src/clfswm-layout.lisp (register-layout): Use a function instead
1660 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
1662 * src/clfswm-autodoc.lisp (produce-menu-doc,
1663 (produce-menu-doc-html): New functions.
1664 (produce-doc-*): Moved to clfswm-autodoc.lisp.
1666 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1667 paste a child on one of its own children. (this prevent a
1669 (move-child-to): Rename move/copy-current-child-by to
1671 (mouse-move-window-over-frame): New function to move the window
1672 under the mouse cursor to another frame.
1674 * src/clfswm-internal.lisp (find-child-in-parent): New function.
1676 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1678 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1679 windows only when its window parent is the current child.
1681 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1683 * src/clfswm-util.lisp (manage-current-window)
1684 (unmanage-current-window): New functions: Allow to force to manage
1685 or unmanage a window by its parent frame.
1687 * src/bindings-second-mode.lisp (#\o): binded to
1688 set-open-in-new-frame-in-parent-frame-nw-hook and
1689 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1691 * src/clfswm-util.lisp (with-current-window): New macro.
1693 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1694 exposure and enter-window handle event.
1696 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1697 children for the current child after the move/resize.
1699 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1701 * src/xlib-util.lisp (resize-window): Take care of window size
1704 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1705 move/resize unmanaged windows.
1707 * src/xlib-util.lisp (move-window, resize-window): New functions.
1709 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1711 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1712 user choose what window type the current frame must handle.
1713 (display-current-window-info): New function.
1714 (current-frame-manage-all-window-type)
1715 (current-frame-manage-only-normal-window-type)
1716 (current-frame-manage-no-window-type): New functions.
1718 * src/clfswm-internal.lisp (managed-window-p): New function.
1720 * src/package.lisp (frame): Managed type: new frame
1721 parameter. This allow to choose what window type a frame must
1724 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1726 * src/clfswm-nw-hooks.lisp
1727 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1729 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1732 * src/tools.lisp (ensure-printable): Return always a string even
1735 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
1737 * src/config.lisp (*default-nw-hook*): New variable to change the
1738 default new window hook.
1740 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1742 * clfswm.asd (clfswm): Add a dependency from
1743 clfswm-second-mode.lisp to clfswm.lisp.
1745 * src/clfswm-util.lisp (identify-key): Show the documentation for
1746 the function bound on a key.
1747 (with-movement): Move with-movement,
1748 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
1749 to clfswm-util.lisp.
1751 * src/clfswm-menu.lisp: New menu system that let user change keys
1752 or functions associated to keys.
1754 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
1756 * src/clfswm-internal.lisp (show-all-children): Display-child is
1757 the first child by default. Solve a bug with father-p.
1759 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
1761 * src/clfswm-internal.lisp (add-frame): Add frame return the
1763 (show-all-children): Move the size computation outside the
1766 * src/bindings-second-mode.lisp (with-movement): Redisplay only
1769 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1770 only the current child.
1772 * src/clfswm-internal.lisp (show-all-children): New display-child
1773 parameter to display only the desired child and its children.
1774 (select-next/previous-child): Only display the current child.
1776 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
1778 * src/clfswm.lisp (init-display): Move the default frame creation
1779 on the default init hook.
1781 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1782 the main mode (for example: "1" on an azerty keyboard).
1784 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
1786 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1787 keysyms. Revert to old grabbing method for the main mode.
1789 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
1791 * src/clfswm.lisp (init-display): Add key handling on no focus
1792 window and on frame windows.
1794 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1796 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1797 all keys by default and replay just what is needed. No change for
1800 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1801 (find-key-from-code): Test for shift and not shift presence.
1803 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
1805 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1806 new key parameter to have less flickering.
1808 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
1810 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1811 layout only one time and revert to no-layout to freely handle
1814 * src/clfswm-nw-hooks.lisp
1815 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1816 with new created window.
1818 * src/clfswm-layout.lisp (register-layout): Now register
1819 automatically a once layout to set the layout only one time and
1820 revert to no-layout to freely handle frames.
1822 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1824 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1825 nw-hook: Open the next window in the current frame and leave the
1826 focus to the current child.
1828 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
1830 * src/bindings-second-mode.lisp: Add keys definitions to
1831 bind-or-jump in the second mode.
1833 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
1834 macro for bind-or-jump-(1|2|3...).
1836 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
1837 arguments to function. This allow to do things like:
1838 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
1839 are passed to my-function on key press.
1841 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
1843 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
1845 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
1847 * src/clfswm-internal.lisp (child-fullname): New function
1849 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
1850 docstring in info-mode-menu. An item can be
1851 '((key function) (key function)) or with docstring
1852 '((key function "documentation 1") (key function "bla bla") (key function))
1854 * src/tools.lisp (ensure-n-elems): New function.
1856 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
1857 resize a frame or the window's father.
1859 * src/clfswm.lisp (init-display): Remove tile-space-layout by
1860 default on the root frame.
1862 * src/clfswm-util.lisp (move/resize-frame): Add standard event
1863 hooks handlers (map-request, configure-notify...)
1865 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
1868 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1870 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
1871 or the window's father.
1873 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
1874 event only if there is a geometry change.
1875 (mouse-focus-move/resize-generic): Generic function to move or
1876 resize a frame or a window father frame.
1878 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1880 * src/clfswm-internal.lisp (show-all-children): Return t if there
1881 is a geometry change.
1883 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
1885 * src/bindings.lisp (Up/Down): Swap select previous/next level.
1887 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
1889 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
1891 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
1892 (with-all-*): Reverse the child list to manage the first child last (like in
1895 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
1896 root window only if true.
1898 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
1899 root window only if *create-frame-on-root* is true.
1901 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
1904 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
1906 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
1907 the current child (even if it's a window).
1909 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
1911 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
1912 (mouse-click-to-focus-and-resize): New functions.
1914 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
1915 (*-px->fl): Convert pixel coordinates to float.
1917 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
1919 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
1921 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
1924 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
1925 and hide-all-children.
1926 (raise-if-needed): New function.
1927 (show-child): Use a first-p parameter to raise windows only when they are
1930 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
1932 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
1935 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
1937 * src/clfswm-info.lisp (keys-from-list): new function.
1939 * src/*: rename 'childs' in 'children'.
1941 * src/*: rename 'group' in 'frame'.
1943 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
1945 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
1947 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
1949 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
1951 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
1953 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
1954 Bind control+o to open the next window in a new group in the root group
1955 (as open in next window in a new workspace in 0801 version).
1957 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
1959 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
1962 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
1964 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
1965 instead of Tab for select-previous-child.
1967 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
1969 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
1972 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
1974 * clfswm-util.lisp (identify-key): Display the documentation
1975 associated to keys when identifying a key.
1977 2008-03-10 Xavier Maillard <xma@gnu.org>
1979 * contrib/clfswm: Complete rewrite of the script. Detect error and
1980 act accordingly. Add command line arguments to configure the
1981 script execution. User can now choose different common lisp
1982 implementation (clisp and sbcl only), choose where to store the
1983 dumped image, where to find clfswm source.
1985 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
1987 * clfswm-internal.lisp (process-new-window): Beginning of new
1988 window hook: each group have a hook to tell what he wants to do
1989 with the new created window.
1991 2008-03-08 Xavier Maillard <xma@gnu.org>
1993 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
1994 call the resulting executable.
1996 * clfswm.lisp (read-conf-file): Check for the user config file in
1997 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
1998 prefered whenever possible.
2000 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
2002 * clfswm-layout.lisp (*-layout): Add an optional raise-p
2003 parameter in each layout.
2005 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2007 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
2009 (copy/move-current-child-by-name/number): new functions
2010 (focus-group-by-name/number): new functions
2011 (delete-group-by-name/number): new functions
2013 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2015 * ************************************************************ *
2016 *: Major update - No more reference to workspaces. The main *
2017 structure is a tree of groups or application windows. *
2018 * ************************************************************ *
2020 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
2022 * clfswm.lisp (read-conf-file): Read configuration in
2023 $HOME/.clfswmrc or in /etc/clfswmrc or in
2024 $XDG_CONFIG_HOME/clfswm/clfswmrc.
2025 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
2028 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
2030 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
2033 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
2035 * clfswm-internal.lisp (find-window-group): New function.
2037 * clfswm*: Change to make clfswm run with clisp/new-clx.
2039 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
2041 * clfswm-util.lisp (query-show-paren): Add show parent matching in
2043 (query-string): Bind control+k to delete end of line.
2045 * clfswm-second-mode.lisp (draw-second-mode-window): Display
2046 the action on mouse motion in second mode.
2048 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
2049 event but do not clear the root window.
2050 (handle-configure-request): Adjust unmanaged window from their
2053 * clfswm-internal.lisp (process-new-window): Adjust new window
2054 with the specified hints (max/min/base width/height).
2056 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
2058 * clfswm.lisp (handle-configure-request): Send an Configuration
2059 Notify event. This solve a bug with xterm and rxvt who takes some
2060 times to be mapped. Now there is no delay.
2062 * bindings-second-mode.lisp (define-shell): Run programs after
2063 living the second mode.
2065 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
2067 * clfswm-internal.lisp (process-new-window): Do not crop transient
2068 window to group size.
2069 (adapt-window-to-group): Do not crop transient window to group
2072 * clfswm.lisp (handle-configure-request): Adapt just the window to
2073 its group and don't take care of the configure request. Remove the
2074 bug with the Gimp outside the group and speed up the window
2076 (handle-exposure): Remove show-all-group on exposure event
2079 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
2081 * clfswm-util.lisp (circulate-group-up-copy-window)
2082 (circulate-group-down-copy-window)
2083 (circulate-workspace-up-copy-group)
2084 (circulate-workspace-down-copy-group): Prevent the copy of the
2085 same window in the same workspace.
2087 * bindings-second-mode.lisp (release-copy-selected-window)
2088 (release-copy-selected-group): Prevent the copy of the same window
2089 in the same workspace.
2091 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
2092 (generic-pager-move-window-on-next-line): Remove the copy
2094 (generic-pager-move-group-on-next-workspace)
2095 (generic-pager-move-group-on-previous-workspace): Prevent the copy
2096 of the same window in the same workspace.
2098 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
2099 (mouse-pager-copy-selected-group-release): Prevent the copy of the
2100 same window in the same workspace.
2102 * tools.lisp (setf/=): new macro to set a variable only when
2105 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
2106 x, y... only when necessary.
2108 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
2110 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
2111 new function and hook: force windows to stay in its group (solve a
2114 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
2116 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
2117 less flickering when moving/resizing groups.
2119 * clfswm-internal.lisp (hide-group): new function.
2120 (show-all-group): clear-all: new parameter.
2122 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
2124 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
2126 * clfswm*: Color change for the pager. Typo or better description
2127 in bindings definitions. Define bindings for a qwerty keyboard by
2128 default. dot-clfswmrc show examples to switch to an azerty
2130 License change to GPL v3.
2131 * config.lisp: new file - group all globals variables in this
2134 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
2136 * xlib-util.lisp (hide-window): Remove structure-notivy events
2137 when hidding a window.
2139 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
2141 * package.lisp (*sm-property-notify-hook*): Readded
2142 property-notify-hook in second mode.
2144 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
2146 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
2148 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
2150 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
2151 Tile the current workspace with the current window on one side and
2152 others on the other (this emulate the larswm, dwm, wmii way). See
2153 the default configuration file to enable this mode by default.
2155 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
2158 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
2160 * clfswm-pager.lisp (pager-draw-window-in-group): Add
2161 ensure-printable to print windows name even with non-ascii
2164 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
2166 * clfswm-pager.lisp (pager-explode-current-group): Create a new
2167 group for each window in group.
2168 (pager-implode-current-group): Move all windows in workspace to
2169 one group and remove other groups.
2171 * clfswm-pack.lisp (explode-group): Create a new group for each
2173 (implode-group): Move all windows in workspace to one group and
2174 remove other groups.
2176 * clfswm-util.lisp (identify-key): Remove local configuration
2177 variables and made them available for configuration from
2179 (query-string): idem.
2181 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
2183 * netwm-util.lisp: Start of NetWM compliance.
2184 Add a Netwm client list gestion.
2186 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
2188 * clfswm-internal.lisp (create-group-on-request): open a new group
2189 only when the current group is not empty.
2191 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
2192 bug with null workspace.
2194 * clfswm-pager.lisp (pager-handle-event): Add a hook
2195 system. This hooks can be changed in the user configuration file.
2197 * package.lisp: All colors and font variables are set in
2198 package.lisp and can be configured in the user configuration
2200 Note: If you have configured some less ugly colors (esp. for the
2201 pager) don't hesitate to let me know :)
2203 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
2204 system. This hooks can be changed in the user configuration file.
2206 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
2207 changed in the user configuration file (~/.clfswmrc)
2209 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
2211 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
2212 arrow action, open next window in new workspace/group.
2214 * bindings.lisp (stop-all-pending-actions): new binding.
2215 (open-next-window-in-new-group-once): Open the next windows in a
2216 new group (only once) or open all new windows in a new group (like
2217 others windows managers).
2219 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
2221 * clfswm.lisp (read-conf-file): New function to read a lisp
2222 configuration file at startup.
2223 (focus-group-under-mouse): Check if group isn't the current group
2224 ( prevent a bug with unclutter ).
2226 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
2228 * bindings.lisp (run-program-from-query-string): A program can be
2229 launch from a input query window.
2231 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
2233 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
2235 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
2237 * clfswm.lisp (process-new-window): One can now open the next
2238 window in a workspace called by its number.
2240 * clfswm-util.lisp (query-font-string): Minimal editing
2242 (eval-from-string): And an REPL in the window manager... :)
2244 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2246 * clfswm.lisp (process-new-window): One can now open the next
2247 window in a new workspace or a new group.
2249 * clfswm-pager.lisp (pager-mode): Display the next arrow action
2250 with the hidden windows.
2252 * clfswm.lisp (second-key-mode): Display the current workspace
2253 number and the next arrow action in the state window.
2255 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
2256 the pager mode and then redisplay only the current workspace.
2258 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
2260 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
2261 they can be focused with a keypress, sorted or renumbered.
2263 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2265 * clfswm-pager.lisp (pager-mode): Remove multiple silly
2266 pager-draw-display. This prevent a lot of flickering in the
2269 * clfswm.lisp: Remove all display-force-output and replace them
2270 with only one display-finish-output in the event loop.
2272 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
2274 * clfswm-pager.lisp (pager-center-group): New function - center a
2275 group at the middle of the screen.
2277 * clfswm-pack.lisp (center-group): New function - center a group
2278 at the middle of the screen.
2280 * clfswm.lisp (show-group): Add a cross line under the group.
2281 (show-group): Group are showned even if fullscreened.
2282 (init-display): Add an exposure event on the root window.
2284 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
2286 * package.lisp (*default-group*): Default group is the same size
2287 of a fullscreened group.
2289 * bindings*: Use shift to move, control+shift to copy.
2291 * *.lisp: Add comments for configuration or alternatives. So grep
2292 for CONFIG to see where you can configure clfswm. And grep for
2293 Alternative to use some commented code.
2295 * clfswm.lisp (second-key-mode): Use a single window to show the
2296 second mode. See for alternatives at the end of this file.
2298 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
2300 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
2301 macro of key and mouse definitions.
2302 (define-define-key/mouse): Use state instead of modifiers list
2303 this fix a bug when the modifiers list is not in the rigth order.
2305 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
2307 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
2309 * clfswm-info.lisp (info-mode): Add an info mode.
2311 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
2313 * clfswm.lisp (process-new-window): Change border size for
2315 (show-all-windows-in-workspace): Unhide all windows even when the
2316 current group is in fullscreen mode.
2318 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
2320 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
2321 redisplay the identify window after a terminal switch.
2323 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
2324 redisplay the pager after a terminal switch.
2326 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
2328 * clfswm-util.lisp (identify-key): Add a window to display
2329 the keys to identify on screen.
2331 * bindings.lisp, bindings-pager.lisp: Define same keys to
2332 move/copy groups/windows in second mode and in pager.
2334 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
2336 (show-all-windows-in-workspace): unhide window before adapting it
2339 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
2341 * clfswm.lisp (handle-event): Revert to an older version.
2343 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
2345 * clfswm-util.lisp (force-window-in-group)
2346 (force-window-center-in-group): New functions for transient windows.
2348 * clfswm-pager.lisp (pager-remove-current-workspace/group):
2349 bugfix: hide all windows before removing group or workspace.
2351 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
2353 * bindings-pager.lisp (mouse-pager-move-selected-group)
2354 (mouse-pager-copy-selected-group)
2355 (mouse-pager-move-selected-window)
2356 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
2357 (mouse-pager-rotate-window-down): New functions to have mouse in
2360 * clfswm-pager.lisp (pager-swap-window)
2361 (pager-copy-group-on-next/previous-workspace)
2362 (pager-copy-window-on-next/previous-line): New functions
2364 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
2366 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
2367 (pager-move-group-on-next/previous-workspace): new functions.
2369 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
2370 to its half size (new functions).
2372 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
2374 * clfswm-pager.lisp: workspaces, groups and windows can now be
2375 selectionned with the keyboard or the mouse.
2377 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
2379 * clfswm-pager.lisp (pager-select-workspace-right/left):
2380 workspaces can now be selectionned with the keyboard.
2382 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
2384 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
2385 new function to remove a previous defined key or mouse combination.
2387 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
2389 * clfswm.lisp (main): Check for access error in init-display.
2391 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
2392 keycode before grabbing.
2394 * bindings.lisp: Remove nlambda and use defun to keep the function
2395 documentation with clisp.
2396 (define-shell): new macro to define shell command for the second
2399 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
2401 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
2404 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
2406 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
2407 workspace circulation.
2409 * clfswm-util.lisp (absorb-orphan-window): new function.
2411 * clfswm-keys.lisp: Keysyms support.
2413 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
2415 * clfswm.lisp (show-group): Use one gc for all groups and not one
2418 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
2420 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
2422 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
2423 width and height outside group.
2425 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
2427 * clfswm.lisp: First public release.