1 2011-06-02 Philippe Brochard <pbrochard@common-lisp.net>
3 * src/clfswm-layout.lisp (inc-tile-layout-size)
4 (dec-tile-layout-size, inc-slow-tile-layout-size)
5 (dec-slow-tile-layout-size): New functions and bindings.
7 2011-06-01 Philippe Brochard <pbrochard@common-lisp.net>
9 * src/clfswm-expose-mode.lisp (define-expose-letter-keys): Add
10 0..1 and A..Z keys to select a child in exposé mode.
12 * src/clfswm-internal.lisp (display-frame-info): Remove hidden
13 infos in frames windows.
15 * src/clfswm-util.lisp (ask-close/kill-current-window): Menu
18 2011-05-30 Philippe Brochard <pbrochard@common-lisp.net>
20 * src/clfswm-internal.lisp (get-parent-layout): Minor fullscreen
23 2011-05-29 Philippe Brochard <pbrochard@common-lisp.net>
25 * src/clfswm-internal.lisp
26 (delete-child-and-children-in-all-frames): Show all children
27 before deleting/destroying a windows, so prevent a flickering.
28 (get-parent-layout): Return the fullscreen size when the current
31 2011-05-28 Philippe Brochard <pbrochard@common-lisp.net>
33 * src/clfswm-internal.lisp (get-parent-layout): Handle correctly
36 * src/clfswm-util.lisp (delete-focus-window-generic): Do not hide
37 child before removing, so prevent a flickering.
39 * src/clfswm-internal.lisp (show-all-children): Rectangular
40 optimization to display only needed children.
41 (show-all-children): Remove flickering on
42 select-next/previous-brother.
44 2011-05-17 Philippe Brochard <pbrochard@common-lisp.net>
46 * src/clfswm-util.lisp (copy-focus-window, cut-focus-window): New
47 functions and ask-close/kill-current-window menu and bindings
50 2011-05-16 Philippe Brochard <pbrochard@common-lisp.net>
52 * src/clfswm-util.lisp (ask-close/kill-current-window): Add an
53 *ask-close/kill-placement* placement window variable.
55 2011-05-09 Philippe Brochard <pbrochard@common-lisp.net>
57 * contrib/osd.lisp (funcall-button-from-code): Display osd
58 documention for buttons and fix some redefining warnings.
60 2011-05-07 Philippe Brochard <pbrochard@common-lisp.net>
62 * src/clfswm-nw-hooks.lisp (make-permanent-nw-hook-frame): New
63 function. Prevent to add or delete a new window hook for this
66 * src/clfswm-layout.lisp (update-layout-managed-children-position):
69 2011-05-06 Philippe Brochard <pbrochard@common-lisp.net>
71 * src/bindings-second-mode.lisp (set-default-second-keys):
72 select-brother-spatial-move-* binding update.
74 * src/clfswm-layout.lisp (tile-left|right|top|bottom-layout): Ask
75 to keep children positions or not.
77 * src/clfswm-internal.lisp (fixe-real-size): Takes care of border
80 * src/clfswm-layout.lisp (update-layout-managed-children): Fix a
81 bug by using the parent frame instead of the current child.
83 * src/clfswm-circulate-mode.lisp
84 (select-brother-generic-spatial-move+right/left/up/down): New
85 function to select a brother from another in a spatial move.
87 2011-04-19 Philippe Brochard <pbrochard@common-lisp.net>
89 * src/clfswm-pack.lisp (move-frame-constrained)
90 (resize-frame-constrained): Use pixels instead of floating
93 2011-04-18 Philippe Brochard <pbrochard@common-lisp.net>
95 * src/clfswm-pack.lisp (resize-frame-constrained): Takes care of
97 (implode-frame, implode-current-frame): New functions. Absorb all
98 frames subchildren in frame. Explode frame opposite.
100 2011-04-17 Philippe Brochard <pbrochard@common-lisp.net>
102 * src/clfswm-pack.lisp (move-frame-constrained)
103 (resize-frame-constrained): New function. Move and resize frame
104 with the mouse constrained by other frame brothers.
106 2011-04-14 Philippe Brochard <pbrochard@common-lisp.net>
108 * src/clfswm-util.lisp (with-movement-select-next-brother)
109 (with-movement-select-previous-brother)
110 (with-movement-select-next-child): Use a simple method (do not
111 enter in the circulate mode) to allow to circulate in all children
114 * src/clfswm-menu.lisp (open-menu): Save info hash table keys
115 instead of deleting newly created keys.
117 2011-03-21 Philippe Brochard <pbrochard@common-lisp.net>
119 * src/clfswm-internal.lisp (x-px->fl, y-px->fl): Takes care of
122 2011-03-20 Philippe Brochard <pbrochard@common-lisp.net>
124 * src/clfswm-info.lisp (show-config-variable): call
125 produce-conf-var-doc.
127 2011-03-18 Philippe Brochard <pbrochard@common-lisp.net>
129 * src/clfswm-autodoc.lisp (produce-conf-var-doc-html): Produce a
130 documentation for all configurable variables in CLFSWM -
133 * src/clfswm-internal.lisp (leave-frame): Hide all children except
136 2011-03-16 Philippe Brochard <pbrochard@common-lisp.net>
138 * src/clfswm-autodoc.lisp (produce-all-docs): Produce a
139 documentation for all configurable variables in CLFSWM.
141 * src/clfswm-layout.lisp (set-gimp-layout): Display a notify
142 window with the help on the GIMP layout.
144 2011-03-12 Philippe Brochard <pbrochard@common-lisp.net>
146 * src/menu-def.lisp: Menu update to prevent cursor keys clash.
148 * clfswm.asd: Change compilation order to prevent undefined
151 * src/clfswm-internal.lisp (show-child(frame)): Handle properly
152 the show-root-frame-p parameter.
154 2011-03-11 Philippe Brochard <pbrochard@common-lisp.net>
156 * src/clfswm-util.lisp (move-frame, resize-frame): Do not move or
157 resize a frame when it's the current root.
159 2011-03-10 Philippe Brochard <pbrochard@common-lisp.net>
161 * src/clfswm-internal.lisp (show-all-children): Handle properly
162 duplicated child in multipe frames.
164 2011-03-09 Philippe Brochard <pbrochard@common-lisp.net>
166 * contrib/volume-mode.lisp (set-default-volume-keys): Add more
167 keybindings (up/down, right/left) to raise/lower the volume.
169 * src/clfswm-layout.lisp: Add a variable border size for frames
172 2011-03-08 Philippe Brochard <pbrochard@common-lisp.net>
174 * src/clfswm-util.lisp (cut-current-child, remove-current-child)
175 (delete-current-child): Hide the current child before doing the
178 * src/clfswm-internal.lisp (show-all-children): Hide windows not
179 in the current root before displaying those in current root.
180 Remove all hide-all unnecessary calls.
182 * src/clfswm-configuration.lisp (save-variables-in-conf-file):
183 Save only variables with a different value than there original
186 2011-03-07 Philippe Brochard <pbrochard@common-lisp.net>
188 * src/clfswm-info.lisp (show-config-variable): Use the new
191 * src/clfswm-autodoc.lisp (produce-configuration-variables): Use
192 the new defconfig method.
194 * src/clfswm-configuration.lisp (create-configuration-menu):
195 Change the config system with a more lispy one and a less string
196 based one: (defconfig name value group doc).
199 2011-03-06 Philippe Brochard <pbrochard@common-lisp.net>
201 * src/clfswm-internal.lisp (show-all-children): Simplify the
203 (show-child): Display an unmanaged window whe it's the current
205 (show-all-children): add the ability to display all child from
206 *root-frame* and hide all those who are not in *current-root*.
207 -> remove hide-all-children when needed.
209 * src/xlib-util.lisp (move-window,resize-window): Add a
210 *color-move-window* border when moving or resizing a window.
212 2011-03-04 Philippe Brochard <pbrochard@common-lisp.net>
214 * src/clfswm-internal.lisp (show-all-children): Perform only one
215 recusion on the clfswm tree: calculate geometry and place child in
218 2011-03-03 Philippe Brochard <pbrochard@common-lisp.net>
220 * src/clfswm-internal.lisp (show-all-children): Rethink of display
221 child order to prevent very annoying flickering.
223 2011-02-27 Philippe Brochard <pbrochard@common-lisp.net>
225 * src/clfswm-util.lisp (query-yes-or-no): New function.
227 * src/clfswm-configuration.lisp (reset-all-config-variables): New
228 function and menu entry.
229 (query-conf-value): Add the ability to leave the field blank to
230 reset the variable to its default value.
232 2011-02-26 Philippe Brochard <pbrochard@common-lisp.net>
234 * src/clfswm-configuration.lisp
235 (add-all-configuration-default-value): Add a default value to
236 configurable variables.
238 2011-02-23 Philippe Brochard <pbrochard@common-lisp.net>
240 * src/clfswm.lisp (main-unprotected): Create the configuration
241 menu only once at startup.
243 2011-02-22 Desmond O. Chang <dochang@gmail.com>
245 * contrib/amixer.lisp: Add a volume mode inspired by the emms
246 volume package. Alsa mixer interface.
248 * contrib/volume-mode.lisp: Add a volume mode inspired by the emms
251 2011-02-22 Desmond O. Chang <dochang@gmail.com>
253 * src/clfswm.lisp (main): Use ASDF:SYSTEM-SOURCE-DIRECTORY instead
254 of *LOAD-TRUENAME*. *LOAD-TRUENAME* is only bound during a call to
255 LOAD. If one eval CLFSWM:MAIN in repl, BASE-DIR will be an empty
256 string. Use ASDF:SYSTEM-SOURCE-DIRECTORY to fix it.
258 2011-02-16 Philippe Brochard <pbrochard@common-lisp.net>
260 * src/clfswm.lisp (main-unprotected): Add a close hook. And close
261 the notify window, the virtual keyboard and the clfswm terminal by
264 2011-02-15 Philippe Brochard <pbrochard@common-lisp.net>
266 * src/clfswm.lisp (main-unprotected): Destroy the notify window
267 before closing the display. This fix a bug when resetting/reloading
270 2011-02-12 Philippe Brochard <pbrochard@common-lisp.net>
272 * src/xlib-util.lisp (equal-wm-class-fun, equal-wm-name-fun)
273 (raise-window-fun, raise-and-focus-window-fun): New functions.
275 * src/config.lisp (*clfswm-terminal-cmd*): Switch from xterm to
277 (*never-managed-window-list*): Structure change to be more
278 flexible. Let the choice to focus, raise and do nothing on never
281 2011-02-09 Philippe Brochard <pbrochard@common-lisp.net>
283 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Take
284 care of never managed windows to move or resize them if the raise
287 * src/clfswm-internal.lisp (in-frame, in-window, in-child): New
290 2011-02-08 Philippe Brochard <pbrochard@common-lisp.net>
292 * src/clfswm.lisp (main-mode): Raise or not unmanaged windows
293 following request in *never-managed-window-list*.
295 2011-02-05 Philippe Brochard <pbrochard@common-lisp.net>
297 * *: **** Release 1102 ****
299 2011-02-05 Desmond O. Chang <dochang@gmail.com>
301 * src/keysyms.lisp: Add extended keysyms from stumpwm.
303 2011-02-01 Desmond O. Chang <dochang@gmail.com>
305 * src/clfswm-util.lisp (run-or-raise): New function (thanks to
308 * src/clfswm-internal.lisp (with-all-*): add a nil block.
310 2011-01-28 Desmond O. Chang <dochang@gmail.com>
312 * src/clfswm-util.lisp (xdg-config-home): XDG_CONFIG_HOME should
313 be $HOME/.config by default.
315 2010-12-29 Philippe Brochard <pbrochard@common-lisp.net>
317 * contrib/osd.lisp (display-doc): Add another method where a
318 CLFSWM native window is used to display the key documentation.
320 2010-12-27 Philippe Brochard <pbrochard@common-lisp.net>
322 * src/xlib-util.lisp (with-xlib-protect): Force to revert to the
325 2010-12-25 Philippe Brochard <pbrochard@common-lisp.net>
327 * src/clfswm-second-mode.lisp (second-key-mode): Call the second
328 mode leave function only when the generic mode was ended.
330 2010-12-08 Philippe Brochard <pbrochard@common-lisp.net>
332 * src/clfswm-second-mode.lisp (sm-leave-function): Do not use
333 *second-mode-program* anymore.
335 2010-12-07 Philippe Brochard <pbrochard@common-lisp.net>
337 * src/clfswm-second-mode.lisp (*second-mode-leave-function*): New
338 variable bound to a function executed (when not null) on second
341 2010-11-14 Philippe Brochard <pbrochard@common-lisp.net>
343 * src/clfswm-util.lisp (find-child-under-mouse): Do not find
346 2010-11-13 Philippe Brochard <pbrochard@common-lisp.net>
348 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
349 Do not display the accel window for unmanaged windows.
351 2010-11-11 Philippe Brochard <pbrochard@common-lisp.net>
353 * src/clfswm-internal.lisp (set-current-root): Handle
354 window-parent in set-current-root.
356 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
357 focus the parent child when the current root is a window.
359 2010-11-09 Philippe Brochard <pbrochard@common-lisp.net>
361 * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
362 New function an bindings.
364 * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
367 2010-11-07 Philippe Brochard <pbrochard@common-lisp.net>
369 * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
370 function to let the user choose to keep child position with
373 * src/clfswm-internal.lisp (remove-frame-data-slot): New
376 2010-11-05 Philippe Brochard <pbrochard@common-lisp.net>
378 * src/clfswm-internal.lisp (frame-select-next-child)
379 (frame-select-previous-child): New functions and bindings. Select
380 the next/previous child in the current frame.
382 2010-10-31 Philippe Brochard <pbrochard@common-lisp.net>
384 * src/clfswm-query.lisp (query-mode-complet): New function: Handle
385 completion in query-mode.
387 2010-10-30 Philippe Brochard <pbrochard@common-lisp.net>
389 * src/clfswm-query.lisp (query-print-string): Handle long lines
392 2010-10-27 Philippe Brochard <pbrochard@common-lisp.net>
394 * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
395 all characters are printable.
397 2010-10-25 Philippe Brochard <pbrochard@common-lisp.net>
399 * contrib/server/server.lisp: Load clfswm client code in the main
400 program and let the user start it with a --client command line
403 * src/package.lisp (*main-entrance-hook*): New hook executed after
404 loading configuration file and before opening the display.
406 2010-10-23 Philippe Brochard <pbrochard@common-lisp.net>
408 * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
410 * src/clfswm-internal.lisp (show-child): Show window only if not
413 * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
414 change modifiers after binding definition.
416 2010-10-21 Philippe Brochard <pbrochard@common-lisp.net>
418 * contrib/osd.lisp: New file: OSD (On Screen Display) for
421 * src/clfswm-menu.lisp (open-menu): Modularise function.
423 2010-10-13 Philippe Brochard <pbrochard@common-lisp.net>
425 * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
426 key binding in main and second mode.
428 2010-10-10 Philippe Brochard <pbrochard@common-lisp.net>
430 * src/clfswm-util.lisp (open-notify-window): Convert hello-window
431 functions to a more generic Notify-window system.
433 * src/tools.lisp (add-timer): Add an id to identify the timer.
435 2010-10-09 Philippe Brochard <pbrochard@common-lisp.net>
437 * src/tools.lisp (erase-timer): New function.
439 * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
440 the hello window. Add Configuration variables.
442 2010-10-08 Philippe Brochard <pbrochard@common-lisp.net>
444 * src/clfswm-util.lisp (): Add an Hello window at startup.
446 * src/tools.lisp (process-timers): Add a timer system.
448 2010-10-07 Philippe Brochard <pbrochard@common-lisp.net>
450 * src/clfswm-query.lisp (add-in-query-string): Handle correctly
453 2010-10-06 Philippe Brochard <pbrochard@common-lisp.net>
455 * src/clfswm-query.lisp (query-print-string): Change cursor color
456 and show parenthesis matching with colors (on match and on
459 2010-10-05 Philippe Brochard <pbrochard@common-lisp.net>
461 * src/clfswm-internal.lisp (show-all-children): Do not raise a
462 child when its parent is hidden.
464 2010-10-02 Philippe Brochard <pbrochard@common-lisp.net>
466 * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
467 possibility to circulate over subchild of the current child.
469 * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
470 (expose-windows-generic): Add an escape-body function to return to
471 the original state on escape key.
473 * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
474 to bind the current child from the configuration file.
476 2010-10-01 Philippe Brochard <pbrochard@common-lisp.net>
478 * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
479 window hook: the frame absorb all new windows that match
480 nw-absorb-test frame data slot.
482 2010-09-30 Philippe Brochard <pbrochard@common-lisp.net>
484 * src/clfswm-expose-mode.lisp (expose-create-window): Show window
485 title in accel window.
487 2010-09-29 Philippe Brochard <pbrochard@common-lisp.net>
489 * configure: Use the Xavier Maillard clfswm script in contrib to
490 build an executable in the standard way.
492 2010-09-26 Philippe Brochard <pbrochard@common-lisp.net>
494 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
495 New functions. Add a window on each child in the expose mode to
498 * src/clfswm-internal.lisp (child-x, child-y, child-width)
499 (child-height): New methods to get real child coordinates.
501 2010-09-25 Philippe Brochard <pbrochard@common-lisp.net>
503 * src/clfswm-layout.lisp (*-layout): Use child-position.
505 * src/clfswm-internal.lisp (child-position): New function.
507 * src/clfswm-expose-mode.lisp (expose-windows-mode)
508 (expose-all-windows-mode): Use a generic mode.
510 * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
511 with handle-event-fun symbols instead of inspecting clfswm
512 internals symbols on each mode change.
514 * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
515 a separate clfswm-expose-mode.lisp file.
517 * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
518 screen size instead of hardcoded test coordinates.
520 2010-09-24 Philippe Brochard <pbrochard@common-lisp.net>
522 * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
523 (speed-mouse-right, speed-mouse-up, speed-mouse-down)
524 (speed-mouse-undo, speed-mouse-first-history): New functions to
525 quickly move the mouse. Implemented for the second mode.
527 2010-09-16 Philippe Brochard <pbrochard@common-lisp.net>
529 * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
530 write permission on $clfswm_asd_path. So anybody can start clfswm
531 even if there is no write permission on the source directory.
533 2010-09-12 Philippe Brochard <pbrochard@common-lisp.net>
535 * contrib/clfswm: Add support to cmucl, ccl and ecl.
537 2010-09-11 Philippe Brochard <pbrochard@common-lisp.net>
539 * src/clfswm-util.lisp (set-hide-unmanaged-window)
540 (set-show-unmanaged-window, set-default-hide-unmanaged-window):
541 New functions and menu entry.
542 (set-globally-hide-unmanaged-window)
543 (set-globally-show-unmanaged-window): New functions and menu
546 * src/clfswm-internal.lisp (hide-unmanager-window-p): New
548 (show-child): Add a data slot on frame to hide or not unmanaged
551 * src/clfswm-corner.lisp (present-clfswm-terminal)
552 (present-virtual-keyboard): Use a function (generic-present-body)
553 instead of a macro (generate-present-body).
555 * src/clfswm-util.lisp (update-menus): List all directories and
556 subdirectories in $XDG_DATA_DIRS/applications.
558 2010-09-10 Philippe Brochard <pbrochard@common-lisp.net>
560 * src/clfswm-corner.lisp (generate-present-body): New macro.
561 (present-clfswm-terminal, present-virtual-keyboard): Use
562 generate-present-body.
564 2010-09-09 Philippe Brochard <pbrochard@common-lisp.net>
566 * src/clfswm-util.lisp (update-menus): Follow XDG specifications
567 instead of the non-portable Debian update-menu.
569 2010-09-07 Philippe Brochard <pbrochard@common-lisp.net>
571 * src/clfswm.lisp (error-handler): New function do handle
572 asynchronous errors and ignore them.
573 (open-display): Install the new error-handler on display.
575 2010-09-05 Philippe Brochard <pbrochard@common-lisp.net>
577 * src/xlib-util.lisp (with-xlib-protect): Add a
578 with-simple-restart on top of body execution.
580 2010-09-04 Philippe Brochard <pbrochard@common-lisp.net>
582 * src/clfswm.lisp (main-loop): Protect all xlib functions with an
585 * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
586 handle-event. Add a with-simple-restart to prevent a
587 clisp/new-lisp infinite loop.
589 2010-08-30 Philippe Brochard <pbrochard@common-lisp.net>
591 * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
592 clfswm terminal working even on xterm title changes.
594 2010-08-29 Philippe Brochard <pbrochard@common-lisp.net>
596 * src/clfswm-util.lisp (run-other-window-manager): Update for
599 * src/tools.lisp (do-execute): New parameter io to change the
602 * src/clfswm-util.lisp (hide-current-child): Prevent from removing
605 * src/clfswm-internal.lisp (child-member): New predicate.
606 (child-remove): New function.
608 * src/*.lisp: Use child-member and child-remove everywhere it's
611 2010-08-28 Philippe Brochard <pbrochard@common-lisp.net>
613 * src/clfswm.lisp (main-loop): Ensure that all events have been
614 processed after a process-event.
616 * src/clfswm-internal.lisp (is-in-current-child-p): New function.
618 2010-08-27 Philippe Brochard <pbrochard@common-lisp.net>
620 * src/clfswm.lisp (main-mode:configure-request): Raise the window
621 only when present on the current child and focus it accordingly.
623 2010-08-26 Philippe Brochard <pbrochard@common-lisp.net>
625 * src/clfswm-circulate-mode.lisp (circulate-loop-function):
626 Use is-a-key-pressed-p.
628 * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
630 * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
631 returned by xlib:keysym->keycodes.
633 * src/*.lisp: Use the new child-equal-p to compare children. This
634 prevent a bug with sbcl/cmucl when the standard equal function
635 does not work with xlib:window.
637 * src/clfswm-internal.lisp (child-equal-p): New predicate.
639 2010-08-25 Philippe Brochard <pbrochard@common-lisp.net>
641 * src/clfswm-generic-mode.lisp (generic-mode): Use an
642 xlib:event-listen before processing event with
643 xlib:process-event. This prevent a bug with CLX threaded
644 implementation like sbcl.
646 * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
647 processing event with xlib:process-event. This prevent a bug with
648 CLX threaded implementation like sbcl.
650 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
652 * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
654 * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
657 * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
658 (find-parent-frame, find-frame-window, find-frame-by-name)
659 (find-frame-by-number): Use with-find-in-all-frames to search in
660 frames in the right order.
662 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
663 unwanted flickering with unmanaged windows.
665 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
667 * src/package.lisp: Remove event handler hooks as they're not
668 needed anymore (To replace them: use closure and define-handler).
670 * src/xlib-util.lisp (move-window, resize-window)
671 (wait-mouse-button-release): Use a generic mode.
673 * src/*.lisp: Replace the case to handle event with a more (tricky)
674 lispy method which bind a function to each keywords associated
677 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
679 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
680 menu entry between delete-current-child and remove-current-child.
681 ie: Delete a child and its children in all frames by default.
683 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
685 * src/package.lisp: Add a placement configuration group.
687 * src/binding*.lisp: Bind control+g to escape the current action
690 * src/clfswm-internal.lisp
691 (delete-child-and-children-in-all-frames): New function and
692 binding: Second mode - Control+Delete delete the current child and
693 its children in all frames (ie: close the current child and its
696 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
698 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
699 the frame window and the frame gc. Close a very annoying bug when
700 cuting/pasting a frame or moving a child over frames with the
703 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
704 all children in *current-root* after moving/resizing a frame.
706 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
708 * src/clfswm-util.lisp (delete-focus-window)
709 (destroy-focus-window): Remove child in parent frame before
712 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
714 * src/clfswm-util.lisp (identify-key): Add a timeout in
716 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
717 of the window passed by xlib:process-event.
719 * src/xlib-util.lisp (move-window, resize-window)
720 (wait-mouse-button-release): Add a timeout in xlib:process-event.
722 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
724 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
725 to launch an other window manager and to return to clfswm.
727 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
729 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
732 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
734 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
737 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
738 parameter and a loop timeout.
740 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
742 * src/clfswm.lisp (main): Add an alternate configuration filename
745 * load.lisp: Add a debuging code example.
747 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
749 * src/clfswm-configuration.lisp (create-configuration-menu): New
750 menu to configure all clfswm variables while clfswm is running.
752 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
754 * src/clfswm-util.lisp (save-configuration-variables): New
755 function to save all configuration variables in clfswmrc.
757 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
759 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
761 (set-default-info-keys): Add cursor key support in info mode.
763 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
765 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
768 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
769 prevent reading the configuration file (this may be useful to
770 produce the original documentation without user modifications
771 with the rc configuration file).
773 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
775 * src/bindings-second-mode.lisp (set-default-second-keys):
776 Simplification of Escape key to close/kill/remove the focus window
777 and unhide all windows.
779 * src/bindings.lisp (set-default-main-keys): Simplification of
780 Escape key to close/kill/remove the focus window and unhide all
783 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
784 focus and unhide all windows capabilities.
786 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
788 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
790 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
792 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
793 Keep child order and don't make unnecessary child movement.
794 (one-column-layout, one-line-layout): New layouts.
796 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
798 * *: **** Release 0906 ****
800 * contrib/cd-player.lisp: New file to handle the CD player.
802 * contrib/xmms.lisp: New file to handle the xmms player.
804 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
806 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
807 Maximize windows in there frame - Leave frames to there actual
810 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
811 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
813 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
815 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
817 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
819 * contrib/mpd.lisp: Use a standard menu.
821 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
823 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
825 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
827 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
829 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
832 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
834 * src/config.lisp (get-fullscreen-size): One pixel adjustment
837 * src/clfswm-placement.lisp (*-child-placement): One pixel
840 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
842 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
843 Ensure that all characters are printable.
845 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
848 * src/clfswm-placement.lisp (*-child-placement): Adjust
849 coordinates to one pixel in the current child.
851 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
853 * src/clfswm-query.lisp (query-enter-function): Assign font before
854 width and height calculation.
856 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
858 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
859 bannish the pointer in an arbitrary place.
861 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
862 place the info window in an arbitrary place.
864 * src/clfswm-query.lisp (query-enter-function): Use with-placement
865 macro to place the query window in an arbitrary place.
867 * src/clfswm-placement.lisp: New file. Allow to place info windows
868 or query windows on an arbitrary place. Allow to bannish the
869 pointer on an arbitrary place.
871 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
873 * src/clfswm-circulate-mode.lisp (reorder-child)
874 (reorder-brother): Unfocus windows before reordering children or
877 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
879 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
880 the parent is a frame.
882 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
883 motion with a default modifier.
885 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
888 * src/clfswm-info.lisp (info-mode): Handle motion with a default
890 (info-mode): Optimization in loop function.
892 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
894 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
895 root-frame correctly.
897 * clfswm.asd: Dependency fix for clfswm-generic-mode.
899 * src/clfswm-circulate-mode.lisp (reorder-child)
900 (reorder-brother): Handle empty frames.
901 (reorder-brother): Redisplay only the parent frame of the current
904 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
905 parent frame of the current frame.
907 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
909 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
910 Maximize/Unmaximize the current frame in its parent frame.
912 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
913 windows and frames in there parent frame.
915 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
917 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
919 * src/clfswm-circulate-mode.lisp (reorder-child)
920 (reorder-brother): Reinitialise on circulate type change
921 child to brother or brother to child.
923 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
924 calls xlib:display-finish-output on each map-request. So speed up
927 * src/xlib-util.lisp (map-window): New function. Call
928 xlib:display-finish-output on each map request.
930 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
932 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
933 Optimisation when drawing second mode window.
935 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
937 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
940 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
942 * src/clfswm-util.lisp (run-program-from-query-string): Launch
943 command only with a return validation.
945 2009-04-22 Xavier Maillard <xma@gnu.org>
947 * src/clfswm-query.lisp (query-string): Use a generic mode.
949 2009-04-19 Xavier Maillard <xma@gnu.org>
951 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
953 2009-04-18 Xavier Maillard <xma@gnu.org>
955 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
956 to define all other modes.
958 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
960 * src/package.lisp (): Use *default-font-string* for all
963 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
965 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
967 * src/xlib-util.lisp (null-size-window-p): Better check of null
970 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
972 * src/clfswm.lisp (handle-map-request): Add a fix to manage
973 correctly fullscreen windows (SDL particularly).
975 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
977 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
978 a segfault with clisp/new-clx.
980 * src/clfswm.lisp (handle-motion-notify): Add a needed window
983 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
984 needed window argument.
986 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
988 * src/xlib-util.lisp (wait-no-key-or-button-press)
989 (wait-a-key-or-button-press): Check buttons press/release correctly"
991 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
993 * src/menu-def.lisp: Add children navigation menu in the movement
994 menu (select next/previous child/brother/level).
996 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
998 * *: Rename 'sister' frame to 'brother' frame.
1000 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
1001 alias in a real modifier.
1003 * src/package.lisp (*modifier-alias*): New list of modifier alias
1004 For example: :alt is :mod-1, :numlock is :mod-2...
1006 * src/tools.lisp (remove-hook): New function.
1008 * src/clfswm-keys.lisp (with-capslock, without-capslock)
1009 (with-numlock, without-cnumlock): New functions.
1011 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
1013 * src/clfswm-info.lisp: Use the *binding-hook* to create info
1014 keys and mouse bindings.
1016 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
1017 second keys and mouse bindings.
1019 * src/bindings.lisp: Use the *binding-hook* to create main keys
1022 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1024 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
1027 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
1029 * src/menu-def.lisp: Use a menu instead of a function for the
1032 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
1034 * src/clfswm-util.lisp (show-standard-menu): Display the standard
1035 menu from the 'update-menus' command.
1037 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
1039 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
1040 it's already grabbed.
1042 * src/clfswm-internal.lisp (display-frame-info): Use configurable
1043 colors and fix a bug with background.
1044 (display-frame-info): Set window background when displaying info.
1046 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1048 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
1049 warning with clisp/new-clx.
1051 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
1053 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
1056 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1058 * *: **** Release 0809 ****
1060 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1062 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
1064 (ensure-unique-number): New function and menu entry.
1066 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
1068 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
1069 hook: open the next window in a named frame.
1070 (numbered-frame-nw-hook): New new window hook: open the next
1071 window in a numbered frame.
1073 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
1074 cases. So query-string can be called even in the main mode.
1076 * src/clfswm-internal.lisp (show-all-children): Do not raise a
1077 child by default => far less flickering.
1079 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
1081 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
1083 * src/menu-def.lisp: Change key binding for the CLFSWM menu
1086 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
1087 is nil. (workaround on some CLX implementation).
1089 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
1091 * src/menu-def.lisp: Add a menu to set a focus policy for all
1094 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
1095 (all-frames-set-*-focus-policy): Set a focus policy for all
1098 * src/clfswm.lisp (handle-enter-notify): sloppy-select
1099 mode. Select a child and its parents on mouse over.
1101 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
1103 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
1104 policy -> Sloppy focus only for windows in the current frame.
1105 (main-unprotected): Exit clfswm on init error (ie: when another
1106 window manager is running).
1108 * src/clfswm-util.lisp (reset-clfswm): New function.
1110 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
1112 * src/clfswm-menu.lisp (init-menu): New function.
1114 * src/clfswm-util.lisp (reload-clfswm): New function to reload
1116 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
1118 * src/clfswm.lisp (main, main-unprotected): Handle error in a
1119 superior main function. Now CLFSWM can't break the X session. It
1120 just reinitialize the display and run a new main loop.
1122 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
1123 *vt-keyboard-on* global to avoid warnings when loading clfswm.
1125 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
1126 (help-on-gimp-layout): Describe how to use the GIMP layout.
1128 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
1130 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
1131 main-window-right-layout. Change the keybinding for (shift)alt+tab
1132 to not select windows in the main window lisst.
1133 Bind F8 to add a window in the main window list.
1134 Bind F9 to remove a window in the main window list.
1135 Change the focus policy to :sloppy.
1136 (set-previous-layout): Restore the previous layout, keybinding and
1139 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
1141 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
1143 * src/clfswm-layout.lisp (main-window-left-layout)
1144 (main-window-bottom-layout, main-window-top-layout): New
1146 Factorize layouts in menu.
1148 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
1150 * src/clfswm-layout.lisp (main-window-right-layout): A possible
1151 GIMP layout: one or more main windows on one side of the
1152 frame. Others on the other size.
1154 * src/clfswm-util.lisp
1155 (current-frame-set-click/sloppy-focus-policy): Each frame can have
1156 a different focus policy (one of :click or :sloppy).
1157 The default focus policy is set with *default-focus-policy*.
1159 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
1161 * src/clfswm-info.lisp (show-config-variable): New function.
1163 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
1165 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
1167 * src/clfswm-info.lisp: Colored help for key binding and corners
1170 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
1172 * src/clfswm-util.lisp (delete-focus-window)
1173 (destroy-focus-window): Remove chid only in
1174 handle-unmap/destroy-notify. Focus *current-root* only when
1175 closing/killing the current child.
1177 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
1178 functions or corners.
1180 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1182 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
1183 action: Hide/Unhide a terminal on mouse corner action. (By default
1184 right mouse button on the top left corner).
1186 * src/config.lisp (*never-managed-window-list*): New config
1189 * src/clfswm-internal.lisp (never-managed-window-p): New function:
1190 Handle never managed window in a more simple way.
1192 * src/clfswm-corner.lisp: New file and new and more simple method
1193 to define corners actions.
1195 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
1197 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
1199 * src/clfswm-layout.lisp (fast-layout-switch)
1200 (define-fast-layout-switch): New functions: Switch between two
1203 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
1204 really in the second mode. So leave-second-mode can be used even
1207 * src/clfswm-util.lisp (switch-to-last-child): New function:
1208 Store the current child and switch to the previous one.
1210 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1212 * src/clfswm-util.lisp (display-current-window-info): Display the
1214 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
1215 (top right by default). By default 'xvkbd' is used.
1217 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1219 * src/xlib-util.lisp (move-window, resize-window): Compress motion
1222 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
1224 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
1227 * src/clfswm-info.lisp (info-mode): Compress motion events.
1229 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
1231 * src/clfswm-internal.lisp (show-all-children): Compute geometry
1232 and selection first and then show only necessary children.
1233 (show-child): remove unneeded display-p parameter.
1235 * src/config.lisp (get-fullscreen-size): Place the frame border
1236 outside the screen (this prevent the loose of 2 pixels per
1239 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
1241 * src/clfswm-internal.lisp (focus-child): Algorithm change to
1242 raise only the selected child.
1244 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
1246 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
1247 Raise only viewable children.
1249 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
1251 * src/clfswm-internal.lisp (show-all-children): Always raise all
1252 displayed children. Remove all references to raise-p.
1254 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1256 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
1259 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
1260 second mode binding on raise/lower child in its frame.
1262 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
1263 behaviour to the new raise/lower property.
1264 Call clear-nw-hook before the rest of the hook.
1266 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
1267 (mouse-click-to-focus-and-resize-window): Stop button event. This
1268 prevent a keyboard/pointer freeze.
1270 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1272 * src/clfswm-internal.lisp (frame-lower-child)
1273 (frame-raise-child): New functions to raise/lower a child in its
1276 * src/clfswm-util.lisp (have-to-present-windows)
1277 (have-to-present-all-windows): New functions to have an MaxOS
1278 expose like on mouse click in screen corner.
1280 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
1282 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
1284 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
1285 child from a choice in all frames with hidden children.
1287 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
1289 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
1291 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
1292 (unhide-all-children): New functions.
1294 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
1297 * src/clfswm-util.lisp (hide/show-frame-window): new function and
1300 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
1302 * src/clfswm-util.lisp (rename-current-child): Do not display the
1303 frame info for a window.
1305 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
1307 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
1308 frame window for the removed child and its children.
1310 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
1312 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
1315 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
1317 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
1318 the ROX pinboard (ie: leave it lowered in the root window as
1321 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
1322 (tile-left-layout, tile-right-layout, tile-top-layout)
1323 (tile-bottom-layout): Use all the frame space when there is only
1326 * src/clfswm-internal.lisp (place-window-from-hints): Center
1327 unmanaged windows in the root screen.
1329 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
1332 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1334 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
1335 typo in managed types.
1337 * src/clfswm-internal.lisp (show-child): Always display frame info
1338 even if the frame is hidden.
1340 * src/xlib-util.lisp (resize-window): Use a better algorithme to
1343 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1345 * src/clfswm-util.lisp (with-movement): Display frame info for all
1346 frames in current root.
1348 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1350 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
1352 * src/bindings-second-mode.lisp (define-second-key #\a): New
1353 binding on 'add-default-frame'.
1355 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1356 message to follow the autodocumentation process.
1358 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1360 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1361 "Space" to jump to a child. "B" to bind a slot on the current
1364 * src/bindings-second-mode.lisp: Use "Tab" instead of
1367 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
1369 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1370 unmanaged (hidden) windows.
1372 * src/clfswm-internal.lisp (place-window-from-hints): Give a
1373 minimal size for windows.
1374 (with-all-windows-frames-and-parent): New function.
1376 * src/config.lisp (*default-window-width/height*): New parameters.
1378 * src/clfswm-internal.lisp (place-window-from-hints): Center
1379 windows in the screen instead of in there frame.
1381 * src/bindings-second-mode.lisp (tile-space-current-frame): New
1384 * src/clfswm-layout.lisp (register-layout): Intern the once name
1385 in the right package.
1387 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1389 * doc/dot-clfswmrc: Update to follow the new clfswm way.
1391 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
1393 * src/clfswm-internal.lisp (set-current-child)
1394 (adapt-child-to-parent, show-child, hide-child): Handle the case
1395 where child is not a frame or a window.
1397 * src/clfswm-util.lisp
1398 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1399 Check if child is a frame.
1401 * src/clfswm-internal.lisp (managed-window-p): Handle the case
1402 where frame is null.
1403 (place-frame): Check if frame and parent are frames.
1405 * src/clfswm-info.lisp (info-mode): display all frame info before
1408 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1409 info before leaving.
1411 * src/clfswm-internal.lisp (display-all-frame-info): New function.
1413 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
1415 * src/tools.lisp (getenv): Implemented for ECL.
1416 (urun-prog): Implemented for ECL.
1418 * src/clfswm-util.lisp (identify-key): Use a double buffer to
1421 * src/clfswm-query.lisp (query-string): Use a double buffer to
1424 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1427 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1430 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
1432 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1434 * src/menu-def.lisp: New file: move all menu definition in
1437 * src/clfswm-layout.lisp (register-layout): Use a function instead
1440 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
1442 * src/clfswm-autodoc.lisp (produce-menu-doc,
1443 (produce-menu-doc-html): New functions.
1444 (produce-doc-*): Moved to clfswm-autodoc.lisp.
1446 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1447 paste a child on one of its own children. (this prevent a
1449 (move-child-to): Rename move/copy-current-child-by to
1451 (mouse-move-window-over-frame): New function to move the window
1452 under the mouse cursor to another frame.
1454 * src/clfswm-internal.lisp (find-child-in-parent): New function.
1456 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1458 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1459 windows only when its window parent is the current child.
1461 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1463 * src/clfswm-util.lisp (manage-current-window)
1464 (unmanage-current-window): New functions: Allow to force to manage
1465 or unmanage a window by its parent frame.
1467 * src/bindings-second-mode.lisp (#\o): binded to
1468 set-open-in-new-frame-in-parent-frame-nw-hook and
1469 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1471 * src/clfswm-util.lisp (with-current-window): New macro.
1473 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1474 exposure and enter-window handle event.
1476 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1477 children for the current child after the move/resize.
1479 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1481 * src/xlib-util.lisp (resize-window): Take care of window size
1484 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1485 move/resize unmanaged windows.
1487 * src/xlib-util.lisp (move-window, resize-window): New functions.
1489 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1491 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1492 user choose what window type the current frame must handle.
1493 (display-current-window-info): New function.
1494 (current-frame-manage-all-window-type)
1495 (current-frame-manage-only-normal-window-type)
1496 (current-frame-manage-no-window-type): New functions.
1498 * src/clfswm-internal.lisp (managed-window-p): New function.
1500 * src/package.lisp (frame): Managed type: new frame
1501 parameter. This allow to choose what window type a frame must
1504 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1506 * src/clfswm-nw-hooks.lisp
1507 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1509 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1512 * src/tools.lisp (ensure-printable): Return always a string even
1515 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
1517 * src/config.lisp (*default-nw-hook*): New variable to change the
1518 default new window hook.
1520 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1522 * clfswm.asd (clfswm): Add a dependency from
1523 clfswm-second-mode.lisp to clfswm.lisp.
1525 * src/clfswm-util.lisp (identify-key): Show the documentation for
1526 the function bound on a key.
1527 (with-movement): Move with-movement,
1528 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
1529 to clfswm-util.lisp.
1531 * src/clfswm-menu.lisp: New menu system that let user change keys
1532 or functions associated to keys.
1534 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
1536 * src/clfswm-internal.lisp (show-all-children): Display-child is
1537 the first child by default. Solve a bug with father-p.
1539 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
1541 * src/clfswm-internal.lisp (add-frame): Add frame return the
1543 (show-all-children): Move the size computation outside the
1546 * src/bindings-second-mode.lisp (with-movement): Redisplay only
1549 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1550 only the current child.
1552 * src/clfswm-internal.lisp (show-all-children): New display-child
1553 parameter to display only the desired child and its children.
1554 (select-next/previous-child): Only display the current child.
1556 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
1558 * src/clfswm.lisp (init-display): Move the default frame creation
1559 on the default init hook.
1561 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1562 the main mode (for example: "1" on an azerty keyboard).
1564 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
1566 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1567 keysyms. Revert to old grabbing method for the main mode.
1569 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
1571 * src/clfswm.lisp (init-display): Add key handling on no focus
1572 window and on frame windows.
1574 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1576 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1577 all keys by default and replay just what is needed. No change for
1580 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1581 (find-key-from-code): Test for shift and not shift presence.
1583 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
1585 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1586 new key parameter to have less flickering.
1588 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
1590 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1591 layout only one time and revert to no-layout to freely handle
1594 * src/clfswm-nw-hooks.lisp
1595 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1596 with new created window.
1598 * src/clfswm-layout.lisp (register-layout): Now register
1599 automatically a once layout to set the layout only one time and
1600 revert to no-layout to freely handle frames.
1602 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1604 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1605 nw-hook: Open the next window in the current frame and leave the
1606 focus to the current child.
1608 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
1610 * src/bindings-second-mode.lisp: Add keys definitions to
1611 bind-or-jump in the second mode.
1613 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
1614 macro for bind-or-jump-(1|2|3...).
1616 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
1617 arguments to function. This allow to do things like:
1618 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
1619 are passed to my-function on key press.
1621 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
1623 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
1625 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
1627 * src/clfswm-internal.lisp (child-fullname): New function
1629 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
1630 docstring in info-mode-menu. An item can be
1631 '((key function) (key function)) or with docstring
1632 '((key function "documentation 1") (key function "bla bla") (key function))
1634 * src/tools.lisp (ensure-n-elems): New function.
1636 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
1637 resize a frame or the window's father.
1639 * src/clfswm.lisp (init-display): Remove tile-space-layout by
1640 default on the root frame.
1642 * src/clfswm-util.lisp (move/resize-frame): Add standard event
1643 hooks handlers (map-request, configure-notify...)
1645 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
1648 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1650 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
1651 or the window's father.
1653 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
1654 event only if there is a geometry change.
1655 (mouse-focus-move/resize-generic): Generic function to move or
1656 resize a frame or a window father frame.
1658 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1660 * src/clfswm-internal.lisp (show-all-children): Return t if there
1661 is a geometry change.
1663 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
1665 * src/bindings.lisp (Up/Down): Swap select previous/next level.
1667 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
1669 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
1671 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
1672 (with-all-*): Reverse the child list to manage the first child last (like in
1675 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
1676 root window only if true.
1678 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
1679 root window only if *create-frame-on-root* is true.
1681 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
1684 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
1686 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
1687 the current child (even if it's a window).
1689 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
1691 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
1692 (mouse-click-to-focus-and-resize): New functions.
1694 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
1695 (*-px->fl): Convert pixel coordinates to float.
1697 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
1699 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
1701 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
1704 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
1705 and hide-all-children.
1706 (raise-if-needed): New function.
1707 (show-child): Use a first-p parameter to raise windows only when they are
1710 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
1712 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
1715 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
1717 * src/clfswm-info.lisp (keys-from-list): new function.
1719 * src/*: rename 'childs' in 'children'.
1721 * src/*: rename 'group' in 'frame'.
1723 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
1725 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
1727 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
1729 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
1731 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
1733 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
1734 Bind control+o to open the next window in a new group in the root group
1735 (as open in next window in a new workspace in 0801 version).
1737 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
1739 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
1742 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
1744 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
1745 instead of Tab for select-previous-child.
1747 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
1749 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
1752 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
1754 * clfswm-util.lisp (identify-key): Display the documentation
1755 associated to keys when identifying a key.
1757 2008-03-10 Xavier Maillard <xma@gnu.org>
1759 * contrib/clfswm: Complete rewrite of the script. Detect error and
1760 act accordingly. Add command line arguments to configure the
1761 script execution. User can now choose different common lisp
1762 implementation (clisp and sbcl only), choose where to store the
1763 dumped image, where to find clfswm source.
1765 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
1767 * clfswm-internal.lisp (process-new-window): Beginning of new
1768 window hook: each group have a hook to tell what he wants to do
1769 with the new created window.
1771 2008-03-08 Xavier Maillard <xma@gnu.org>
1773 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
1774 call the resulting executable.
1776 * clfswm.lisp (read-conf-file): Check for the user config file in
1777 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
1778 prefered whenever possible.
1780 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
1782 * clfswm-layout.lisp (*-layout): Add an optional raise-p
1783 parameter in each layout.
1785 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
1787 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
1789 (copy/move-current-child-by-name/number): new functions
1790 (focus-group-by-name/number): new functions
1791 (delete-group-by-name/number): new functions
1793 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
1795 * ************************************************************ *
1796 *: Major update - No more reference to workspaces. The main *
1797 structure is a tree of groups or application windows. *
1798 * ************************************************************ *
1800 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
1802 * clfswm.lisp (read-conf-file): Read configuration in
1803 $HOME/.clfswmrc or in /etc/clfswmrc or in
1804 $XDG_CONFIG_HOME/clfswm/clfswmrc.
1805 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
1808 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
1810 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
1813 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
1815 * clfswm-internal.lisp (find-window-group): New function.
1817 * clfswm*: Change to make clfswm run with clisp/new-clx.
1819 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
1821 * clfswm-util.lisp (query-show-paren): Add show parent matching in
1823 (query-string): Bind control+k to delete end of line.
1825 * clfswm-second-mode.lisp (draw-second-mode-window): Display
1826 the action on mouse motion in second mode.
1828 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
1829 event but do not clear the root window.
1830 (handle-configure-request): Adjust unmanaged window from there
1833 * clfswm-internal.lisp (process-new-window): Adjust new window
1834 with the specified hints (max/min/base width/height).
1836 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
1838 * clfswm.lisp (handle-configure-request): Send an Configuration
1839 Notify event. This solve a bug with xterm and rxvt who takes some
1840 times to be mapped. Now there is no delay.
1842 * bindings-second-mode.lisp (define-shell): Run programs after
1843 living the second mode.
1845 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
1847 * clfswm-internal.lisp (process-new-window): Do not crop transient
1848 window to group size.
1849 (adapt-window-to-group): Do not crop transient window to group
1852 * clfswm.lisp (handle-configure-request): Adapt just the window to
1853 its group and don't take care of the configure request. Remove the
1854 bug with the Gimp outside the group and speed up the window
1856 (handle-exposure): Remove show-all-group on exposure event
1859 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
1861 * clfswm-util.lisp (circulate-group-up-copy-window)
1862 (circulate-group-down-copy-window)
1863 (circulate-workspace-up-copy-group)
1864 (circulate-workspace-down-copy-group): Prevent the copy of the
1865 same window in the same workspace.
1867 * bindings-second-mode.lisp (release-copy-selected-window)
1868 (release-copy-selected-group): Prevent the copy of the same window
1869 in the same workspace.
1871 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
1872 (generic-pager-move-window-on-next-line): Remove the copy
1874 (generic-pager-move-group-on-next-workspace)
1875 (generic-pager-move-group-on-previous-workspace): Prevent the copy
1876 of the same window in the same workspace.
1878 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
1879 (mouse-pager-copy-selected-group-release): Prevent the copy of the
1880 same window in the same workspace.
1882 * tools.lisp (setf/=): new macro to set a variable only when
1885 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
1886 x, y... only when necessary.
1888 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
1890 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
1891 new function and hook: force windows to stay in its group (solve a
1894 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
1896 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
1897 less flickering when moving/resizing groups.
1899 * clfswm-internal.lisp (hide-group): new function.
1900 (show-all-group): clear-all: new parameter.
1902 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
1904 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
1906 * clfswm*: Color change for the pager. Typo or better description
1907 in bindings definitions. Define bindings for a qwerty keyboard by
1908 default. dot-clfswmrc show examples to switch to an azerty
1910 License change to GPL v3.
1911 * config.lisp: new file - group all globals variables in this
1914 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
1916 * xlib-util.lisp (hide-window): Remove structure-notivy events
1917 when hidding a window.
1919 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
1921 * package.lisp (*sm-property-notify-hook*): Readded
1922 property-notify-hook in second mode.
1924 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1926 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
1928 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1930 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
1931 Tile the current workspace with the current window on one side and
1932 others on the other (this emulate the larswm, dwm, wmii way). See
1933 the default configuration file to enable this mode by default.
1935 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
1938 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1940 * clfswm-pager.lisp (pager-draw-window-in-group): Add
1941 ensure-printable to print windows name even with non-ascii
1944 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
1946 * clfswm-pager.lisp (pager-explode-current-group): Create a new
1947 group for each window in group.
1948 (pager-implode-current-group): Move all windows in workspace to
1949 one group and remove other groups.
1951 * clfswm-pack.lisp (explode-group): Create a new group for each
1953 (implode-group): Move all windows in workspace to one group and
1954 remove other groups.
1956 * clfswm-util.lisp (identify-key): Remove local configuration
1957 variables and made them available for configuration from
1959 (query-string): idem.
1961 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1963 * netwm-util.lisp: Start of NetWM compliance.
1964 Add a Netwm client list gestion.
1966 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1968 * clfswm-internal.lisp (create-group-on-request): open a new group
1969 only when the current group is not empty.
1971 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
1972 bug with null workspace.
1974 * clfswm-pager.lisp (pager-handle-event): Add a hook
1975 system. This hooks can be changed in the user configuration file.
1977 * package.lisp: All colors and font variables are set in
1978 package.lisp and can be configured in the user configuration
1980 Note: If you have configured some less ugly colors (esp. for the
1981 pager) don't hesitate to let me know :)
1983 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
1984 system. This hooks can be changed in the user configuration file.
1986 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
1987 changed in the user configuration file (~/.clfswmrc)
1989 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1991 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
1992 arrow action, open next window in new workspace/group.
1994 * bindings.lisp (stop-all-pending-actions): new binding.
1995 (open-next-window-in-new-group-once): Open the next windows in a
1996 new group (only once) or open all new windows in a new group (like
1997 others windows managers).
1999 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
2001 * clfswm.lisp (read-conf-file): New function to read a lisp
2002 configuration file at startup.
2003 (focus-group-under-mouse): Check if group isn't the current group
2004 ( prevent a bug with unclutter ).
2006 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
2008 * bindings.lisp (run-program-from-query-string): A program can be
2009 launch from a input query window.
2011 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
2013 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
2015 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
2017 * clfswm.lisp (process-new-window): One can now open the next
2018 window in a workspace called by its number.
2020 * clfswm-util.lisp (query-font-string): Minimal editing
2022 (eval-from-string): And an REPL in the window manager... :)
2024 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2026 * clfswm.lisp (process-new-window): One can now open the next
2027 window in a new workspace or a new group.
2029 * clfswm-pager.lisp (pager-mode): Display the next arrow action
2030 with the hidden windows.
2032 * clfswm.lisp (second-key-mode): Display the current workspace
2033 number and the next arrow action in the state window.
2035 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
2036 the pager mode and then redisplay only the current workspace.
2038 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
2040 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
2041 they can be focused with a keypress, sorted or renumbered.
2043 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2045 * clfswm-pager.lisp (pager-mode): Remove multiple silly
2046 pager-draw-display. This prevent a lot of flickering in the
2049 * clfswm.lisp: Remove all display-force-output and replace them
2050 with only one display-finish-output in the event loop.
2052 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
2054 * clfswm-pager.lisp (pager-center-group): New function - center a
2055 group at the middle of the screen.
2057 * clfswm-pack.lisp (center-group): New function - center a group
2058 at the middle of the screen.
2060 * clfswm.lisp (show-group): Add a cross line under the group.
2061 (show-group): Group are showned even if fullscreened.
2062 (init-display): Add an exposure event on the root window.
2064 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
2066 * package.lisp (*default-group*): Default group is the same size
2067 of a fullscreened group.
2069 * bindings*: Use shift to move, control+shift to copy.
2071 * *.lisp: Add comments for configuration or alternatives. So grep
2072 for CONFIG to see where you can configure clfswm. And grep for
2073 Alternative to use some commented code.
2075 * clfswm.lisp (second-key-mode): Use a single window to show the
2076 second mode. See for alternatives at the end of this file.
2078 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
2080 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
2081 macro of key and mouse definitions.
2082 (define-define-key/mouse): Use state instead of modifiers list
2083 this fix a bug when the modifiers list is not in the rigth order.
2085 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
2087 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
2089 * clfswm-info.lisp (info-mode): Add an info mode.
2091 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
2093 * clfswm.lisp (process-new-window): Change border size for
2095 (show-all-windows-in-workspace): Unhide all windows even when the
2096 current group is in fullscreen mode.
2098 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
2100 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
2101 redisplay the identify window after a terminal switch.
2103 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
2104 redisplay the pager after a terminal switch.
2106 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
2108 * clfswm-util.lisp (identify-key): Add a window to display
2109 the keys to identify on screen.
2111 * bindings.lisp, bindings-pager.lisp: Define same keys to
2112 move/copy groups/windows in second mode and in pager.
2114 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
2116 (show-all-windows-in-workspace): unhide window before adapting it
2119 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
2121 * clfswm.lisp (handle-event): Revert to an older version.
2123 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
2125 * clfswm-util.lisp (force-window-in-group)
2126 (force-window-center-in-group): New functions for transient windows.
2128 * clfswm-pager.lisp (pager-remove-current-workspace/group):
2129 bugfix: hide all windows before removing group or workspace.
2131 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
2133 * bindings-pager.lisp (mouse-pager-move-selected-group)
2134 (mouse-pager-copy-selected-group)
2135 (mouse-pager-move-selected-window)
2136 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
2137 (mouse-pager-rotate-window-down): New functions to have mouse in
2140 * clfswm-pager.lisp (pager-swap-window)
2141 (pager-copy-group-on-next/previous-workspace)
2142 (pager-copy-window-on-next/previous-line): New functions
2144 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
2146 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
2147 (pager-move-group-on-next/previous-workspace): new functions.
2149 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
2150 to its half size (new functions).
2152 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
2154 * clfswm-pager.lisp: workspaces, groups and windows can now be
2155 selectionned with the keyboard or the mouse.
2157 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
2159 * clfswm-pager.lisp (pager-select-workspace-right/left):
2160 workspaces can now be selectionned with the keyboard.
2162 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
2164 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
2165 new function to remove a previous defined key or mouse combination.
2167 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
2169 * clfswm.lisp (main): Check for access error in init-display.
2171 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
2172 keycode before grabbing.
2174 * bindings.lisp: Remove nlambda and use defun to keep the function
2175 documentation with clisp.
2176 (define-shell): new macro to define shell command for the second
2179 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
2181 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
2184 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
2186 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
2187 workspace circulation.
2189 * clfswm-util.lisp (absorb-orphan-window): new function.
2191 * clfswm-keys.lisp: Keysyms support.
2193 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
2195 * clfswm.lisp (show-group): Use one gc for all groups and not one
2198 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
2200 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
2202 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
2203 width and height outside group.
2205 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
2207 * clfswm.lisp: First public release.