1 2011-06-01 Philippe Brochard <pbrochard@common-lisp.net>
3 * src/clfswm-expose-mode.lisp (define-expose-letter-keys): Add
4 0..1 and A..Z keys to select a child in exposé mode.
6 * src/clfswm-internal.lisp (display-frame-info): Remove hidden
7 infos in frames windows.
9 * src/clfswm-util.lisp (ask-close/kill-current-window): Menu
12 2011-05-30 Philippe Brochard <pbrochard@common-lisp.net>
14 * src/clfswm-internal.lisp (get-parent-layout): Minor fullscreen
17 2011-05-29 Philippe Brochard <pbrochard@common-lisp.net>
19 * src/clfswm-internal.lisp
20 (delete-child-and-children-in-all-frames): Show all children
21 before deleting/destroying a windows, so prevent a flickering.
22 (get-parent-layout): Return the fullscreen size when the current
25 2011-05-28 Philippe Brochard <pbrochard@common-lisp.net>
27 * src/clfswm-internal.lisp (get-parent-layout): Handle correctly
30 * src/clfswm-util.lisp (delete-focus-window-generic): Do not hide
31 child before removing, so prevent a flickering.
33 * src/clfswm-internal.lisp (show-all-children): Rectangular
34 optimization to display only needed children.
35 (show-all-children): Remove flickering on
36 select-next/previous-brother.
38 2011-05-17 Philippe Brochard <pbrochard@common-lisp.net>
40 * src/clfswm-util.lisp (copy-focus-window, cut-focus-window): New
41 functions and ask-close/kill-current-window menu and bindings
44 2011-05-16 Philippe Brochard <pbrochard@common-lisp.net>
46 * src/clfswm-util.lisp (ask-close/kill-current-window): Add an
47 *ask-close/kill-placement* placement window variable.
49 2011-05-09 Philippe Brochard <pbrochard@common-lisp.net>
51 * contrib/osd.lisp (funcall-button-from-code): Display osd
52 documention for buttons and fix some redefining warnings.
54 2011-05-07 Philippe Brochard <pbrochard@common-lisp.net>
56 * src/clfswm-nw-hooks.lisp (make-permanent-nw-hook-frame): New
57 function. Prevent to add or delete a new window hook for this
60 * src/clfswm-layout.lisp (update-layout-managed-children-position):
63 2011-05-06 Philippe Brochard <pbrochard@common-lisp.net>
65 * src/bindings-second-mode.lisp (set-default-second-keys):
66 select-brother-spatial-move-* binding update.
68 * src/clfswm-layout.lisp (tile-left|right|top|bottom-layout): Ask
69 to keep children positions or not.
71 * src/clfswm-internal.lisp (fixe-real-size): Takes care of border
74 * src/clfswm-layout.lisp (update-layout-managed-children): Fix a
75 bug by using the parent frame instead of the current child.
77 * src/clfswm-circulate-mode.lisp
78 (select-brother-generic-spatial-move+right/left/up/down): New
79 function to select a brother from another in a spatial move.
81 2011-04-19 Philippe Brochard <pbrochard@common-lisp.net>
83 * src/clfswm-pack.lisp (move-frame-constrained)
84 (resize-frame-constrained): Use pixels instead of floating
87 2011-04-18 Philippe Brochard <pbrochard@common-lisp.net>
89 * src/clfswm-pack.lisp (resize-frame-constrained): Takes care of
91 (implode-frame, implode-current-frame): New functions. Absorb all
92 frames subchildren in frame. Explode frame opposite.
94 2011-04-17 Philippe Brochard <pbrochard@common-lisp.net>
96 * src/clfswm-pack.lisp (move-frame-constrained)
97 (resize-frame-constrained): New function. Move and resize frame
98 with the mouse constrained by other frame brothers.
100 2011-04-14 Philippe Brochard <pbrochard@common-lisp.net>
102 * src/clfswm-util.lisp (with-movement-select-next-brother)
103 (with-movement-select-previous-brother)
104 (with-movement-select-next-child): Use a simple method (do not
105 enter in the circulate mode) to allow to circulate in all children
108 * src/clfswm-menu.lisp (open-menu): Save info hash table keys
109 instead of deleting newly created keys.
111 2011-03-21 Philippe Brochard <pbrochard@common-lisp.net>
113 * src/clfswm-internal.lisp (x-px->fl, y-px->fl): Takes care of
116 2011-03-20 Philippe Brochard <pbrochard@common-lisp.net>
118 * src/clfswm-info.lisp (show-config-variable): call
119 produce-conf-var-doc.
121 2011-03-18 Philippe Brochard <pbrochard@common-lisp.net>
123 * src/clfswm-autodoc.lisp (produce-conf-var-doc-html): Produce a
124 documentation for all configurable variables in CLFSWM -
127 * src/clfswm-internal.lisp (leave-frame): Hide all children except
130 2011-03-16 Philippe Brochard <pbrochard@common-lisp.net>
132 * src/clfswm-autodoc.lisp (produce-all-docs): Produce a
133 documentation for all configurable variables in CLFSWM.
135 * src/clfswm-layout.lisp (set-gimp-layout): Display a notify
136 window with the help on the GIMP layout.
138 2011-03-12 Philippe Brochard <pbrochard@common-lisp.net>
140 * src/menu-def.lisp: Menu update to prevent cursor keys clash.
142 * clfswm.asd: Change compilation order to prevent undefined
145 * src/clfswm-internal.lisp (show-child(frame)): Handle properly
146 the show-root-frame-p parameter.
148 2011-03-11 Philippe Brochard <pbrochard@common-lisp.net>
150 * src/clfswm-util.lisp (move-frame, resize-frame): Do not move or
151 resize a frame when it's the current root.
153 2011-03-10 Philippe Brochard <pbrochard@common-lisp.net>
155 * src/clfswm-internal.lisp (show-all-children): Handle properly
156 duplicated child in multipe frames.
158 2011-03-09 Philippe Brochard <pbrochard@common-lisp.net>
160 * contrib/volume-mode.lisp (set-default-volume-keys): Add more
161 keybindings (up/down, right/left) to raise/lower the volume.
163 * src/clfswm-layout.lisp: Add a variable border size for frames
166 2011-03-08 Philippe Brochard <pbrochard@common-lisp.net>
168 * src/clfswm-util.lisp (cut-current-child, remove-current-child)
169 (delete-current-child): Hide the current child before doing the
172 * src/clfswm-internal.lisp (show-all-children): Hide windows not
173 in the current root before displaying those in current root.
174 Remove all hide-all unnecessary calls.
176 * src/clfswm-configuration.lisp (save-variables-in-conf-file):
177 Save only variables with a different value than there original
180 2011-03-07 Philippe Brochard <pbrochard@common-lisp.net>
182 * src/clfswm-info.lisp (show-config-variable): Use the new
185 * src/clfswm-autodoc.lisp (produce-configuration-variables): Use
186 the new defconfig method.
188 * src/clfswm-configuration.lisp (create-configuration-menu):
189 Change the config system with a more lispy one and a less string
190 based one: (defconfig name value group doc).
193 2011-03-06 Philippe Brochard <pbrochard@common-lisp.net>
195 * src/clfswm-internal.lisp (show-all-children): Simplify the
197 (show-child): Display an unmanaged window whe it's the current
199 (show-all-children): add the ability to display all child from
200 *root-frame* and hide all those who are not in *current-root*.
201 -> remove hide-all-children when needed.
203 * src/xlib-util.lisp (move-window,resize-window): Add a
204 *color-move-window* border when moving or resizing a window.
206 2011-03-04 Philippe Brochard <pbrochard@common-lisp.net>
208 * src/clfswm-internal.lisp (show-all-children): Perform only one
209 recusion on the clfswm tree: calculate geometry and place child in
212 2011-03-03 Philippe Brochard <pbrochard@common-lisp.net>
214 * src/clfswm-internal.lisp (show-all-children): Rethink of display
215 child order to prevent very annoying flickering.
217 2011-02-27 Philippe Brochard <pbrochard@common-lisp.net>
219 * src/clfswm-util.lisp (query-yes-or-no): New function.
221 * src/clfswm-configuration.lisp (reset-all-config-variables): New
222 function and menu entry.
223 (query-conf-value): Add the ability to leave the field blank to
224 reset the variable to its default value.
226 2011-02-26 Philippe Brochard <pbrochard@common-lisp.net>
228 * src/clfswm-configuration.lisp
229 (add-all-configuration-default-value): Add a default value to
230 configurable variables.
232 2011-02-23 Philippe Brochard <pbrochard@common-lisp.net>
234 * src/clfswm.lisp (main-unprotected): Create the configuration
235 menu only once at startup.
237 2011-02-22 Desmond O. Chang <dochang@gmail.com>
239 * contrib/amixer.lisp: Add a volume mode inspired by the emms
240 volume package. Alsa mixer interface.
242 * contrib/volume-mode.lisp: Add a volume mode inspired by the emms
245 2011-02-22 Desmond O. Chang <dochang@gmail.com>
247 * src/clfswm.lisp (main): Use ASDF:SYSTEM-SOURCE-DIRECTORY instead
248 of *LOAD-TRUENAME*. *LOAD-TRUENAME* is only bound during a call to
249 LOAD. If one eval CLFSWM:MAIN in repl, BASE-DIR will be an empty
250 string. Use ASDF:SYSTEM-SOURCE-DIRECTORY to fix it.
252 2011-02-16 Philippe Brochard <pbrochard@common-lisp.net>
254 * src/clfswm.lisp (main-unprotected): Add a close hook. And close
255 the notify window, the virtual keyboard and the clfswm terminal by
258 2011-02-15 Philippe Brochard <pbrochard@common-lisp.net>
260 * src/clfswm.lisp (main-unprotected): Destroy the notify window
261 before closing the display. This fix a bug when resetting/reloading
264 2011-02-12 Philippe Brochard <pbrochard@common-lisp.net>
266 * src/xlib-util.lisp (equal-wm-class-fun, equal-wm-name-fun)
267 (raise-window-fun, raise-and-focus-window-fun): New functions.
269 * src/config.lisp (*clfswm-terminal-cmd*): Switch from xterm to
271 (*never-managed-window-list*): Structure change to be more
272 flexible. Let the choice to focus, raise and do nothing on never
275 2011-02-09 Philippe Brochard <pbrochard@common-lisp.net>
277 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Take
278 care of never managed windows to move or resize them if the raise
281 * src/clfswm-internal.lisp (in-frame, in-window, in-child): New
284 2011-02-08 Philippe Brochard <pbrochard@common-lisp.net>
286 * src/clfswm.lisp (main-mode): Raise or not unmanaged windows
287 following request in *never-managed-window-list*.
289 2011-02-05 Philippe Brochard <pbrochard@common-lisp.net>
291 * *: **** Release 1102 ****
293 2011-02-05 Desmond O. Chang <dochang@gmail.com>
295 * src/keysyms.lisp: Add extended keysyms from stumpwm.
297 2011-02-01 Desmond O. Chang <dochang@gmail.com>
299 * src/clfswm-util.lisp (run-or-raise): New function (thanks to
302 * src/clfswm-internal.lisp (with-all-*): add a nil block.
304 2011-01-28 Desmond O. Chang <dochang@gmail.com>
306 * src/clfswm-util.lisp (xdg-config-home): XDG_CONFIG_HOME should
307 be $HOME/.config by default.
309 2010-12-29 Philippe Brochard <pbrochard@common-lisp.net>
311 * contrib/osd.lisp (display-doc): Add another method where a
312 CLFSWM native window is used to display the key documentation.
314 2010-12-27 Philippe Brochard <pbrochard@common-lisp.net>
316 * src/xlib-util.lisp (with-xlib-protect): Force to revert to the
319 2010-12-25 Philippe Brochard <pbrochard@common-lisp.net>
321 * src/clfswm-second-mode.lisp (second-key-mode): Call the second
322 mode leave function only when the generic mode was ended.
324 2010-12-08 Philippe Brochard <pbrochard@common-lisp.net>
326 * src/clfswm-second-mode.lisp (sm-leave-function): Do not use
327 *second-mode-program* anymore.
329 2010-12-07 Philippe Brochard <pbrochard@common-lisp.net>
331 * src/clfswm-second-mode.lisp (*second-mode-leave-function*): New
332 variable bound to a function executed (when not null) on second
335 2010-11-14 Philippe Brochard <pbrochard@common-lisp.net>
337 * src/clfswm-util.lisp (find-child-under-mouse): Do not find
340 2010-11-13 Philippe Brochard <pbrochard@common-lisp.net>
342 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
343 Do not display the accel window for unmanaged windows.
345 2010-11-11 Philippe Brochard <pbrochard@common-lisp.net>
347 * src/clfswm-internal.lisp (set-current-root): Handle
348 window-parent in set-current-root.
350 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
351 focus the parent child when the current root is a window.
353 2010-11-09 Philippe Brochard <pbrochard@common-lisp.net>
355 * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
356 New function an bindings.
358 * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
361 2010-11-07 Philippe Brochard <pbrochard@common-lisp.net>
363 * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
364 function to let the user choose to keep child position with
367 * src/clfswm-internal.lisp (remove-frame-data-slot): New
370 2010-11-05 Philippe Brochard <pbrochard@common-lisp.net>
372 * src/clfswm-internal.lisp (frame-select-next-child)
373 (frame-select-previous-child): New functions and bindings. Select
374 the next/previous child in the current frame.
376 2010-10-31 Philippe Brochard <pbrochard@common-lisp.net>
378 * src/clfswm-query.lisp (query-mode-complet): New function: Handle
379 completion in query-mode.
381 2010-10-30 Philippe Brochard <pbrochard@common-lisp.net>
383 * src/clfswm-query.lisp (query-print-string): Handle long lines
386 2010-10-27 Philippe Brochard <pbrochard@common-lisp.net>
388 * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
389 all characters are printable.
391 2010-10-25 Philippe Brochard <pbrochard@common-lisp.net>
393 * contrib/server/server.lisp: Load clfswm client code in the main
394 program and let the user start it with a --client command line
397 * src/package.lisp (*main-entrance-hook*): New hook executed after
398 loading configuration file and before opening the display.
400 2010-10-23 Philippe Brochard <pbrochard@common-lisp.net>
402 * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
404 * src/clfswm-internal.lisp (show-child): Show window only if not
407 * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
408 change modifiers after binding definition.
410 2010-10-21 Philippe Brochard <pbrochard@common-lisp.net>
412 * contrib/osd.lisp: New file: OSD (On Screen Display) for
415 * src/clfswm-menu.lisp (open-menu): Modularise function.
417 2010-10-13 Philippe Brochard <pbrochard@common-lisp.net>
419 * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
420 key binding in main and second mode.
422 2010-10-10 Philippe Brochard <pbrochard@common-lisp.net>
424 * src/clfswm-util.lisp (open-notify-window): Convert hello-window
425 functions to a more generic Notify-window system.
427 * src/tools.lisp (add-timer): Add an id to identify the timer.
429 2010-10-09 Philippe Brochard <pbrochard@common-lisp.net>
431 * src/tools.lisp (erase-timer): New function.
433 * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
434 the hello window. Add Configuration variables.
436 2010-10-08 Philippe Brochard <pbrochard@common-lisp.net>
438 * src/clfswm-util.lisp (): Add an Hello window at startup.
440 * src/tools.lisp (process-timers): Add a timer system.
442 2010-10-07 Philippe Brochard <pbrochard@common-lisp.net>
444 * src/clfswm-query.lisp (add-in-query-string): Handle correctly
447 2010-10-06 Philippe Brochard <pbrochard@common-lisp.net>
449 * src/clfswm-query.lisp (query-print-string): Change cursor color
450 and show parenthesis matching with colors (on match and on
453 2010-10-05 Philippe Brochard <pbrochard@common-lisp.net>
455 * src/clfswm-internal.lisp (show-all-children): Do not raise a
456 child when its parent is hidden.
458 2010-10-02 Philippe Brochard <pbrochard@common-lisp.net>
460 * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
461 possibility to circulate over subchild of the current child.
463 * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
464 (expose-windows-generic): Add an escape-body function to return to
465 the original state on escape key.
467 * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
468 to bind the current child from the configuration file.
470 2010-10-01 Philippe Brochard <pbrochard@common-lisp.net>
472 * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
473 window hook: the frame absorb all new windows that match
474 nw-absorb-test frame data slot.
476 2010-09-30 Philippe Brochard <pbrochard@common-lisp.net>
478 * src/clfswm-expose-mode.lisp (expose-create-window): Show window
479 title in accel window.
481 2010-09-29 Philippe Brochard <pbrochard@common-lisp.net>
483 * configure: Use the Xavier Maillard clfswm script in contrib to
484 build an executable in the standard way.
486 2010-09-26 Philippe Brochard <pbrochard@common-lisp.net>
488 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
489 New functions. Add a window on each child in the expose mode to
492 * src/clfswm-internal.lisp (child-x, child-y, child-width)
493 (child-height): New methods to get real child coordinates.
495 2010-09-25 Philippe Brochard <pbrochard@common-lisp.net>
497 * src/clfswm-layout.lisp (*-layout): Use child-position.
499 * src/clfswm-internal.lisp (child-position): New function.
501 * src/clfswm-expose-mode.lisp (expose-windows-mode)
502 (expose-all-windows-mode): Use a generic mode.
504 * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
505 with handle-event-fun symbols instead of inspecting clfswm
506 internals symbols on each mode change.
508 * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
509 a separate clfswm-expose-mode.lisp file.
511 * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
512 screen size instead of hardcoded test coordinates.
514 2010-09-24 Philippe Brochard <pbrochard@common-lisp.net>
516 * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
517 (speed-mouse-right, speed-mouse-up, speed-mouse-down)
518 (speed-mouse-undo, speed-mouse-first-history): New functions to
519 quickly move the mouse. Implemented for the second mode.
521 2010-09-16 Philippe Brochard <pbrochard@common-lisp.net>
523 * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
524 write permission on $clfswm_asd_path. So anybody can start clfswm
525 even if there is no write permission on the source directory.
527 2010-09-12 Philippe Brochard <pbrochard@common-lisp.net>
529 * contrib/clfswm: Add support to cmucl, ccl and ecl.
531 2010-09-11 Philippe Brochard <pbrochard@common-lisp.net>
533 * src/clfswm-util.lisp (set-hide-unmanaged-window)
534 (set-show-unmanaged-window, set-default-hide-unmanaged-window):
535 New functions and menu entry.
536 (set-globally-hide-unmanaged-window)
537 (set-globally-show-unmanaged-window): New functions and menu
540 * src/clfswm-internal.lisp (hide-unmanager-window-p): New
542 (show-child): Add a data slot on frame to hide or not unmanaged
545 * src/clfswm-corner.lisp (present-clfswm-terminal)
546 (present-virtual-keyboard): Use a function (generic-present-body)
547 instead of a macro (generate-present-body).
549 * src/clfswm-util.lisp (update-menus): List all directories and
550 subdirectories in $XDG_DATA_DIRS/applications.
552 2010-09-10 Philippe Brochard <pbrochard@common-lisp.net>
554 * src/clfswm-corner.lisp (generate-present-body): New macro.
555 (present-clfswm-terminal, present-virtual-keyboard): Use
556 generate-present-body.
558 2010-09-09 Philippe Brochard <pbrochard@common-lisp.net>
560 * src/clfswm-util.lisp (update-menus): Follow XDG specifications
561 instead of the non-portable Debian update-menu.
563 2010-09-07 Philippe Brochard <pbrochard@common-lisp.net>
565 * src/clfswm.lisp (error-handler): New function do handle
566 asynchronous errors and ignore them.
567 (open-display): Install the new error-handler on display.
569 2010-09-05 Philippe Brochard <pbrochard@common-lisp.net>
571 * src/xlib-util.lisp (with-xlib-protect): Add a
572 with-simple-restart on top of body execution.
574 2010-09-04 Philippe Brochard <pbrochard@common-lisp.net>
576 * src/clfswm.lisp (main-loop): Protect all xlib functions with an
579 * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
580 handle-event. Add a with-simple-restart to prevent a
581 clisp/new-lisp infinite loop.
583 2010-08-30 Philippe Brochard <pbrochard@common-lisp.net>
585 * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
586 clfswm terminal working even on xterm title changes.
588 2010-08-29 Philippe Brochard <pbrochard@common-lisp.net>
590 * src/clfswm-util.lisp (run-other-window-manager): Update for
593 * src/tools.lisp (do-execute): New parameter io to change the
596 * src/clfswm-util.lisp (hide-current-child): Prevent from removing
599 * src/clfswm-internal.lisp (child-member): New predicate.
600 (child-remove): New function.
602 * src/*.lisp: Use child-member and child-remove everywhere it's
605 2010-08-28 Philippe Brochard <pbrochard@common-lisp.net>
607 * src/clfswm.lisp (main-loop): Ensure that all events have been
608 processed after a process-event.
610 * src/clfswm-internal.lisp (is-in-current-child-p): New function.
612 2010-08-27 Philippe Brochard <pbrochard@common-lisp.net>
614 * src/clfswm.lisp (main-mode:configure-request): Raise the window
615 only when present on the current child and focus it accordingly.
617 2010-08-26 Philippe Brochard <pbrochard@common-lisp.net>
619 * src/clfswm-circulate-mode.lisp (circulate-loop-function):
620 Use is-a-key-pressed-p.
622 * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
624 * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
625 returned by xlib:keysym->keycodes.
627 * src/*.lisp: Use the new child-equal-p to compare children. This
628 prevent a bug with sbcl/cmucl when the standard equal function
629 does not work with xlib:window.
631 * src/clfswm-internal.lisp (child-equal-p): New predicate.
633 2010-08-25 Philippe Brochard <pbrochard@common-lisp.net>
635 * src/clfswm-generic-mode.lisp (generic-mode): Use an
636 xlib:event-listen before processing event with
637 xlib:process-event. This prevent a bug with CLX threaded
638 implementation like sbcl.
640 * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
641 processing event with xlib:process-event. This prevent a bug with
642 CLX threaded implementation like sbcl.
644 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
646 * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
648 * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
651 * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
652 (find-parent-frame, find-frame-window, find-frame-by-name)
653 (find-frame-by-number): Use with-find-in-all-frames to search in
654 frames in the right order.
656 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
657 unwanted flickering with unmanaged windows.
659 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
661 * src/package.lisp: Remove event handler hooks as they're not
662 needed anymore (To replace them: use closure and define-handler).
664 * src/xlib-util.lisp (move-window, resize-window)
665 (wait-mouse-button-release): Use a generic mode.
667 * src/*.lisp: Replace the case to handle event with a more (tricky)
668 lispy method which bind a function to each keywords associated
671 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
673 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
674 menu entry between delete-current-child and remove-current-child.
675 ie: Delete a child and its children in all frames by default.
677 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
679 * src/package.lisp: Add a placement configuration group.
681 * src/binding*.lisp: Bind control+g to escape the current action
684 * src/clfswm-internal.lisp
685 (delete-child-and-children-in-all-frames): New function and
686 binding: Second mode - Control+Delete delete the current child and
687 its children in all frames (ie: close the current child and its
690 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
692 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
693 the frame window and the frame gc. Close a very annoying bug when
694 cuting/pasting a frame or moving a child over frames with the
697 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
698 all children in *current-root* after moving/resizing a frame.
700 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
702 * src/clfswm-util.lisp (delete-focus-window)
703 (destroy-focus-window): Remove child in parent frame before
706 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
708 * src/clfswm-util.lisp (identify-key): Add a timeout in
710 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
711 of the window passed by xlib:process-event.
713 * src/xlib-util.lisp (move-window, resize-window)
714 (wait-mouse-button-release): Add a timeout in xlib:process-event.
716 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
718 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
719 to launch an other window manager and to return to clfswm.
721 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
723 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
726 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
728 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
731 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
732 parameter and a loop timeout.
734 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
736 * src/clfswm.lisp (main): Add an alternate configuration filename
739 * load.lisp: Add a debuging code example.
741 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
743 * src/clfswm-configuration.lisp (create-configuration-menu): New
744 menu to configure all clfswm variables while clfswm is running.
746 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
748 * src/clfswm-util.lisp (save-configuration-variables): New
749 function to save all configuration variables in clfswmrc.
751 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
753 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
755 (set-default-info-keys): Add cursor key support in info mode.
757 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
759 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
762 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
763 prevent reading the configuration file (this may be useful to
764 produce the original documentation without user modifications
765 with the rc configuration file).
767 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
769 * src/bindings-second-mode.lisp (set-default-second-keys):
770 Simplification of Escape key to close/kill/remove the focus window
771 and unhide all windows.
773 * src/bindings.lisp (set-default-main-keys): Simplification of
774 Escape key to close/kill/remove the focus window and unhide all
777 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
778 focus and unhide all windows capabilities.
780 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
782 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
784 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
786 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
787 Keep child order and don't make unnecessary child movement.
788 (one-column-layout, one-line-layout): New layouts.
790 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
792 * *: **** Release 0906 ****
794 * contrib/cd-player.lisp: New file to handle the CD player.
796 * contrib/xmms.lisp: New file to handle the xmms player.
798 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
800 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
801 Maximize windows in there frame - Leave frames to there actual
804 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
805 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
807 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
809 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
811 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
813 * contrib/mpd.lisp: Use a standard menu.
815 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
817 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
819 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
821 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
823 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
826 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
828 * src/config.lisp (get-fullscreen-size): One pixel adjustment
831 * src/clfswm-placement.lisp (*-child-placement): One pixel
834 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
836 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
837 Ensure that all characters are printable.
839 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
842 * src/clfswm-placement.lisp (*-child-placement): Adjust
843 coordinates to one pixel in the current child.
845 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
847 * src/clfswm-query.lisp (query-enter-function): Assign font before
848 width and height calculation.
850 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
852 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
853 bannish the pointer in an arbitrary place.
855 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
856 place the info window in an arbitrary place.
858 * src/clfswm-query.lisp (query-enter-function): Use with-placement
859 macro to place the query window in an arbitrary place.
861 * src/clfswm-placement.lisp: New file. Allow to place info windows
862 or query windows on an arbitrary place. Allow to bannish the
863 pointer on an arbitrary place.
865 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
867 * src/clfswm-circulate-mode.lisp (reorder-child)
868 (reorder-brother): Unfocus windows before reordering children or
871 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
873 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
874 the parent is a frame.
876 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
877 motion with a default modifier.
879 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
882 * src/clfswm-info.lisp (info-mode): Handle motion with a default
884 (info-mode): Optimization in loop function.
886 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
888 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
889 root-frame correctly.
891 * clfswm.asd: Dependency fix for clfswm-generic-mode.
893 * src/clfswm-circulate-mode.lisp (reorder-child)
894 (reorder-brother): Handle empty frames.
895 (reorder-brother): Redisplay only the parent frame of the current
898 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
899 parent frame of the current frame.
901 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
903 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
904 Maximize/Unmaximize the current frame in its parent frame.
906 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
907 windows and frames in there parent frame.
909 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
911 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
913 * src/clfswm-circulate-mode.lisp (reorder-child)
914 (reorder-brother): Reinitialise on circulate type change
915 child to brother or brother to child.
917 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
918 calls xlib:display-finish-output on each map-request. So speed up
921 * src/xlib-util.lisp (map-window): New function. Call
922 xlib:display-finish-output on each map request.
924 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
926 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
927 Optimisation when drawing second mode window.
929 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
931 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
934 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
936 * src/clfswm-util.lisp (run-program-from-query-string): Launch
937 command only with a return validation.
939 2009-04-22 Xavier Maillard <xma@gnu.org>
941 * src/clfswm-query.lisp (query-string): Use a generic mode.
943 2009-04-19 Xavier Maillard <xma@gnu.org>
945 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
947 2009-04-18 Xavier Maillard <xma@gnu.org>
949 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
950 to define all other modes.
952 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
954 * src/package.lisp (): Use *default-font-string* for all
957 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
959 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
961 * src/xlib-util.lisp (null-size-window-p): Better check of null
964 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
966 * src/clfswm.lisp (handle-map-request): Add a fix to manage
967 correctly fullscreen windows (SDL particularly).
969 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
971 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
972 a segfault with clisp/new-clx.
974 * src/clfswm.lisp (handle-motion-notify): Add a needed window
977 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
978 needed window argument.
980 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
982 * src/xlib-util.lisp (wait-no-key-or-button-press)
983 (wait-a-key-or-button-press): Check buttons press/release correctly"
985 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
987 * src/menu-def.lisp: Add children navigation menu in the movement
988 menu (select next/previous child/brother/level).
990 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
992 * *: Rename 'sister' frame to 'brother' frame.
994 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
995 alias in a real modifier.
997 * src/package.lisp (*modifier-alias*): New list of modifier alias
998 For example: :alt is :mod-1, :numlock is :mod-2...
1000 * src/tools.lisp (remove-hook): New function.
1002 * src/clfswm-keys.lisp (with-capslock, without-capslock)
1003 (with-numlock, without-cnumlock): New functions.
1005 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
1007 * src/clfswm-info.lisp: Use the *binding-hook* to create info
1008 keys and mouse bindings.
1010 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
1011 second keys and mouse bindings.
1013 * src/bindings.lisp: Use the *binding-hook* to create main keys
1016 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1018 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
1021 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
1023 * src/menu-def.lisp: Use a menu instead of a function for the
1026 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
1028 * src/clfswm-util.lisp (show-standard-menu): Display the standard
1029 menu from the 'update-menus' command.
1031 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
1033 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
1034 it's already grabbed.
1036 * src/clfswm-internal.lisp (display-frame-info): Use configurable
1037 colors and fix a bug with background.
1038 (display-frame-info): Set window background when displaying info.
1040 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1042 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
1043 warning with clisp/new-clx.
1045 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
1047 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
1050 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1052 * *: **** Release 0809 ****
1054 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1056 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
1058 (ensure-unique-number): New function and menu entry.
1060 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
1062 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
1063 hook: open the next window in a named frame.
1064 (numbered-frame-nw-hook): New new window hook: open the next
1065 window in a numbered frame.
1067 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
1068 cases. So query-string can be called even in the main mode.
1070 * src/clfswm-internal.lisp (show-all-children): Do not raise a
1071 child by default => far less flickering.
1073 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
1075 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
1077 * src/menu-def.lisp: Change key binding for the CLFSWM menu
1080 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
1081 is nil. (workaround on some CLX implementation).
1083 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
1085 * src/menu-def.lisp: Add a menu to set a focus policy for all
1088 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
1089 (all-frames-set-*-focus-policy): Set a focus policy for all
1092 * src/clfswm.lisp (handle-enter-notify): sloppy-select
1093 mode. Select a child and its parents on mouse over.
1095 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
1097 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
1098 policy -> Sloppy focus only for windows in the current frame.
1099 (main-unprotected): Exit clfswm on init error (ie: when another
1100 window manager is running).
1102 * src/clfswm-util.lisp (reset-clfswm): New function.
1104 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
1106 * src/clfswm-menu.lisp (init-menu): New function.
1108 * src/clfswm-util.lisp (reload-clfswm): New function to reload
1110 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
1112 * src/clfswm.lisp (main, main-unprotected): Handle error in a
1113 superior main function. Now CLFSWM can't break the X session. It
1114 just reinitialize the display and run a new main loop.
1116 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
1117 *vt-keyboard-on* global to avoid warnings when loading clfswm.
1119 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
1120 (help-on-gimp-layout): Describe how to use the GIMP layout.
1122 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
1124 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
1125 main-window-right-layout. Change the keybinding for (shift)alt+tab
1126 to not select windows in the main window lisst.
1127 Bind F8 to add a window in the main window list.
1128 Bind F9 to remove a window in the main window list.
1129 Change the focus policy to :sloppy.
1130 (set-previous-layout): Restore the previous layout, keybinding and
1133 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
1135 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
1137 * src/clfswm-layout.lisp (main-window-left-layout)
1138 (main-window-bottom-layout, main-window-top-layout): New
1140 Factorize layouts in menu.
1142 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
1144 * src/clfswm-layout.lisp (main-window-right-layout): A possible
1145 GIMP layout: one or more main windows on one side of the
1146 frame. Others on the other size.
1148 * src/clfswm-util.lisp
1149 (current-frame-set-click/sloppy-focus-policy): Each frame can have
1150 a different focus policy (one of :click or :sloppy).
1151 The default focus policy is set with *default-focus-policy*.
1153 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
1155 * src/clfswm-info.lisp (show-config-variable): New function.
1157 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
1159 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
1161 * src/clfswm-info.lisp: Colored help for key binding and corners
1164 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
1166 * src/clfswm-util.lisp (delete-focus-window)
1167 (destroy-focus-window): Remove chid only in
1168 handle-unmap/destroy-notify. Focus *current-root* only when
1169 closing/killing the current child.
1171 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
1172 functions or corners.
1174 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1176 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
1177 action: Hide/Unhide a terminal on mouse corner action. (By default
1178 right mouse button on the top left corner).
1180 * src/config.lisp (*never-managed-window-list*): New config
1183 * src/clfswm-internal.lisp (never-managed-window-p): New function:
1184 Handle never managed window in a more simple way.
1186 * src/clfswm-corner.lisp: New file and new and more simple method
1187 to define corners actions.
1189 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
1191 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
1193 * src/clfswm-layout.lisp (fast-layout-switch)
1194 (define-fast-layout-switch): New functions: Switch between two
1197 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
1198 really in the second mode. So leave-second-mode can be used even
1201 * src/clfswm-util.lisp (switch-to-last-child): New function:
1202 Store the current child and switch to the previous one.
1204 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1206 * src/clfswm-util.lisp (display-current-window-info): Display the
1208 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
1209 (top right by default). By default 'xvkbd' is used.
1211 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1213 * src/xlib-util.lisp (move-window, resize-window): Compress motion
1216 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
1218 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
1221 * src/clfswm-info.lisp (info-mode): Compress motion events.
1223 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
1225 * src/clfswm-internal.lisp (show-all-children): Compute geometry
1226 and selection first and then show only necessary children.
1227 (show-child): remove unneeded display-p parameter.
1229 * src/config.lisp (get-fullscreen-size): Place the frame border
1230 outside the screen (this prevent the loose of 2 pixels per
1233 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
1235 * src/clfswm-internal.lisp (focus-child): Algorithm change to
1236 raise only the selected child.
1238 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
1240 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
1241 Raise only viewable children.
1243 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
1245 * src/clfswm-internal.lisp (show-all-children): Always raise all
1246 displayed children. Remove all references to raise-p.
1248 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1250 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
1253 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
1254 second mode binding on raise/lower child in its frame.
1256 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
1257 behaviour to the new raise/lower property.
1258 Call clear-nw-hook before the rest of the hook.
1260 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
1261 (mouse-click-to-focus-and-resize-window): Stop button event. This
1262 prevent a keyboard/pointer freeze.
1264 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1266 * src/clfswm-internal.lisp (frame-lower-child)
1267 (frame-raise-child): New functions to raise/lower a child in its
1270 * src/clfswm-util.lisp (have-to-present-windows)
1271 (have-to-present-all-windows): New functions to have an MaxOS
1272 expose like on mouse click in screen corner.
1274 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
1276 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
1278 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
1279 child from a choice in all frames with hidden children.
1281 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
1283 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
1285 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
1286 (unhide-all-children): New functions.
1288 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
1291 * src/clfswm-util.lisp (hide/show-frame-window): new function and
1294 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
1296 * src/clfswm-util.lisp (rename-current-child): Do not display the
1297 frame info for a window.
1299 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
1301 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
1302 frame window for the removed child and its children.
1304 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
1306 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
1309 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
1311 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
1312 the ROX pinboard (ie: leave it lowered in the root window as
1315 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
1316 (tile-left-layout, tile-right-layout, tile-top-layout)
1317 (tile-bottom-layout): Use all the frame space when there is only
1320 * src/clfswm-internal.lisp (place-window-from-hints): Center
1321 unmanaged windows in the root screen.
1323 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
1326 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1328 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
1329 typo in managed types.
1331 * src/clfswm-internal.lisp (show-child): Always display frame info
1332 even if the frame is hidden.
1334 * src/xlib-util.lisp (resize-window): Use a better algorithme to
1337 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1339 * src/clfswm-util.lisp (with-movement): Display frame info for all
1340 frames in current root.
1342 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1344 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
1346 * src/bindings-second-mode.lisp (define-second-key #\a): New
1347 binding on 'add-default-frame'.
1349 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1350 message to follow the autodocumentation process.
1352 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1354 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1355 "Space" to jump to a child. "B" to bind a slot on the current
1358 * src/bindings-second-mode.lisp: Use "Tab" instead of
1361 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
1363 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1364 unmanaged (hidden) windows.
1366 * src/clfswm-internal.lisp (place-window-from-hints): Give a
1367 minimal size for windows.
1368 (with-all-windows-frames-and-parent): New function.
1370 * src/config.lisp (*default-window-width/height*): New parameters.
1372 * src/clfswm-internal.lisp (place-window-from-hints): Center
1373 windows in the screen instead of in there frame.
1375 * src/bindings-second-mode.lisp (tile-space-current-frame): New
1378 * src/clfswm-layout.lisp (register-layout): Intern the once name
1379 in the right package.
1381 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1383 * doc/dot-clfswmrc: Update to follow the new clfswm way.
1385 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
1387 * src/clfswm-internal.lisp (set-current-child)
1388 (adapt-child-to-parent, show-child, hide-child): Handle the case
1389 where child is not a frame or a window.
1391 * src/clfswm-util.lisp
1392 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1393 Check if child is a frame.
1395 * src/clfswm-internal.lisp (managed-window-p): Handle the case
1396 where frame is null.
1397 (place-frame): Check if frame and parent are frames.
1399 * src/clfswm-info.lisp (info-mode): display all frame info before
1402 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1403 info before leaving.
1405 * src/clfswm-internal.lisp (display-all-frame-info): New function.
1407 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
1409 * src/tools.lisp (getenv): Implemented for ECL.
1410 (urun-prog): Implemented for ECL.
1412 * src/clfswm-util.lisp (identify-key): Use a double buffer to
1415 * src/clfswm-query.lisp (query-string): Use a double buffer to
1418 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1421 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1424 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
1426 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1428 * src/menu-def.lisp: New file: move all menu definition in
1431 * src/clfswm-layout.lisp (register-layout): Use a function instead
1434 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
1436 * src/clfswm-autodoc.lisp (produce-menu-doc,
1437 (produce-menu-doc-html): New functions.
1438 (produce-doc-*): Moved to clfswm-autodoc.lisp.
1440 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1441 paste a child on one of its own children. (this prevent a
1443 (move-child-to): Rename move/copy-current-child-by to
1445 (mouse-move-window-over-frame): New function to move the window
1446 under the mouse cursor to another frame.
1448 * src/clfswm-internal.lisp (find-child-in-parent): New function.
1450 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1452 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1453 windows only when its window parent is the current child.
1455 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1457 * src/clfswm-util.lisp (manage-current-window)
1458 (unmanage-current-window): New functions: Allow to force to manage
1459 or unmanage a window by its parent frame.
1461 * src/bindings-second-mode.lisp (#\o): binded to
1462 set-open-in-new-frame-in-parent-frame-nw-hook and
1463 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1465 * src/clfswm-util.lisp (with-current-window): New macro.
1467 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1468 exposure and enter-window handle event.
1470 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1471 children for the current child after the move/resize.
1473 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1475 * src/xlib-util.lisp (resize-window): Take care of window size
1478 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1479 move/resize unmanaged windows.
1481 * src/xlib-util.lisp (move-window, resize-window): New functions.
1483 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1485 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1486 user choose what window type the current frame must handle.
1487 (display-current-window-info): New function.
1488 (current-frame-manage-all-window-type)
1489 (current-frame-manage-only-normal-window-type)
1490 (current-frame-manage-no-window-type): New functions.
1492 * src/clfswm-internal.lisp (managed-window-p): New function.
1494 * src/package.lisp (frame): Managed type: new frame
1495 parameter. This allow to choose what window type a frame must
1498 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1500 * src/clfswm-nw-hooks.lisp
1501 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1503 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1506 * src/tools.lisp (ensure-printable): Return always a string even
1509 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
1511 * src/config.lisp (*default-nw-hook*): New variable to change the
1512 default new window hook.
1514 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1516 * clfswm.asd (clfswm): Add a dependency from
1517 clfswm-second-mode.lisp to clfswm.lisp.
1519 * src/clfswm-util.lisp (identify-key): Show the documentation for
1520 the function bound on a key.
1521 (with-movement): Move with-movement,
1522 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
1523 to clfswm-util.lisp.
1525 * src/clfswm-menu.lisp: New menu system that let user change keys
1526 or functions associated to keys.
1528 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
1530 * src/clfswm-internal.lisp (show-all-children): Display-child is
1531 the first child by default. Solve a bug with father-p.
1533 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
1535 * src/clfswm-internal.lisp (add-frame): Add frame return the
1537 (show-all-children): Move the size computation outside the
1540 * src/bindings-second-mode.lisp (with-movement): Redisplay only
1543 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1544 only the current child.
1546 * src/clfswm-internal.lisp (show-all-children): New display-child
1547 parameter to display only the desired child and its children.
1548 (select-next/previous-child): Only display the current child.
1550 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
1552 * src/clfswm.lisp (init-display): Move the default frame creation
1553 on the default init hook.
1555 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1556 the main mode (for example: "1" on an azerty keyboard).
1558 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
1560 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1561 keysyms. Revert to old grabbing method for the main mode.
1563 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
1565 * src/clfswm.lisp (init-display): Add key handling on no focus
1566 window and on frame windows.
1568 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1570 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1571 all keys by default and replay just what is needed. No change for
1574 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1575 (find-key-from-code): Test for shift and not shift presence.
1577 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
1579 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1580 new key parameter to have less flickering.
1582 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
1584 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1585 layout only one time and revert to no-layout to freely handle
1588 * src/clfswm-nw-hooks.lisp
1589 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1590 with new created window.
1592 * src/clfswm-layout.lisp (register-layout): Now register
1593 automatically a once layout to set the layout only one time and
1594 revert to no-layout to freely handle frames.
1596 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1598 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1599 nw-hook: Open the next window in the current frame and leave the
1600 focus to the current child.
1602 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
1604 * src/bindings-second-mode.lisp: Add keys definitions to
1605 bind-or-jump in the second mode.
1607 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
1608 macro for bind-or-jump-(1|2|3...).
1610 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
1611 arguments to function. This allow to do things like:
1612 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
1613 are passed to my-function on key press.
1615 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
1617 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
1619 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
1621 * src/clfswm-internal.lisp (child-fullname): New function
1623 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
1624 docstring in info-mode-menu. An item can be
1625 '((key function) (key function)) or with docstring
1626 '((key function "documentation 1") (key function "bla bla") (key function))
1628 * src/tools.lisp (ensure-n-elems): New function.
1630 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
1631 resize a frame or the window's father.
1633 * src/clfswm.lisp (init-display): Remove tile-space-layout by
1634 default on the root frame.
1636 * src/clfswm-util.lisp (move/resize-frame): Add standard event
1637 hooks handlers (map-request, configure-notify...)
1639 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
1642 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1644 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
1645 or the window's father.
1647 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
1648 event only if there is a geometry change.
1649 (mouse-focus-move/resize-generic): Generic function to move or
1650 resize a frame or a window father frame.
1652 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1654 * src/clfswm-internal.lisp (show-all-children): Return t if there
1655 is a geometry change.
1657 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
1659 * src/bindings.lisp (Up/Down): Swap select previous/next level.
1661 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
1663 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
1665 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
1666 (with-all-*): Reverse the child list to manage the first child last (like in
1669 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
1670 root window only if true.
1672 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
1673 root window only if *create-frame-on-root* is true.
1675 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
1678 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
1680 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
1681 the current child (even if it's a window).
1683 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
1685 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
1686 (mouse-click-to-focus-and-resize): New functions.
1688 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
1689 (*-px->fl): Convert pixel coordinates to float.
1691 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
1693 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
1695 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
1698 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
1699 and hide-all-children.
1700 (raise-if-needed): New function.
1701 (show-child): Use a first-p parameter to raise windows only when they are
1704 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
1706 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
1709 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
1711 * src/clfswm-info.lisp (keys-from-list): new function.
1713 * src/*: rename 'childs' in 'children'.
1715 * src/*: rename 'group' in 'frame'.
1717 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
1719 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
1721 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
1723 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
1725 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
1727 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
1728 Bind control+o to open the next window in a new group in the root group
1729 (as open in next window in a new workspace in 0801 version).
1731 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
1733 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
1736 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
1738 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
1739 instead of Tab for select-previous-child.
1741 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
1743 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
1746 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
1748 * clfswm-util.lisp (identify-key): Display the documentation
1749 associated to keys when identifying a key.
1751 2008-03-10 Xavier Maillard <xma@gnu.org>
1753 * contrib/clfswm: Complete rewrite of the script. Detect error and
1754 act accordingly. Add command line arguments to configure the
1755 script execution. User can now choose different common lisp
1756 implementation (clisp and sbcl only), choose where to store the
1757 dumped image, where to find clfswm source.
1759 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
1761 * clfswm-internal.lisp (process-new-window): Beginning of new
1762 window hook: each group have a hook to tell what he wants to do
1763 with the new created window.
1765 2008-03-08 Xavier Maillard <xma@gnu.org>
1767 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
1768 call the resulting executable.
1770 * clfswm.lisp (read-conf-file): Check for the user config file in
1771 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
1772 prefered whenever possible.
1774 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
1776 * clfswm-layout.lisp (*-layout): Add an optional raise-p
1777 parameter in each layout.
1779 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
1781 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
1783 (copy/move-current-child-by-name/number): new functions
1784 (focus-group-by-name/number): new functions
1785 (delete-group-by-name/number): new functions
1787 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
1789 * ************************************************************ *
1790 *: Major update - No more reference to workspaces. The main *
1791 structure is a tree of groups or application windows. *
1792 * ************************************************************ *
1794 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
1796 * clfswm.lisp (read-conf-file): Read configuration in
1797 $HOME/.clfswmrc or in /etc/clfswmrc or in
1798 $XDG_CONFIG_HOME/clfswm/clfswmrc.
1799 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
1802 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
1804 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
1807 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
1809 * clfswm-internal.lisp (find-window-group): New function.
1811 * clfswm*: Change to make clfswm run with clisp/new-clx.
1813 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
1815 * clfswm-util.lisp (query-show-paren): Add show parent matching in
1817 (query-string): Bind control+k to delete end of line.
1819 * clfswm-second-mode.lisp (draw-second-mode-window): Display
1820 the action on mouse motion in second mode.
1822 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
1823 event but do not clear the root window.
1824 (handle-configure-request): Adjust unmanaged window from there
1827 * clfswm-internal.lisp (process-new-window): Adjust new window
1828 with the specified hints (max/min/base width/height).
1830 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
1832 * clfswm.lisp (handle-configure-request): Send an Configuration
1833 Notify event. This solve a bug with xterm and rxvt who takes some
1834 times to be mapped. Now there is no delay.
1836 * bindings-second-mode.lisp (define-shell): Run programs after
1837 living the second mode.
1839 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
1841 * clfswm-internal.lisp (process-new-window): Do not crop transient
1842 window to group size.
1843 (adapt-window-to-group): Do not crop transient window to group
1846 * clfswm.lisp (handle-configure-request): Adapt just the window to
1847 its group and don't take care of the configure request. Remove the
1848 bug with the Gimp outside the group and speed up the window
1850 (handle-exposure): Remove show-all-group on exposure event
1853 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
1855 * clfswm-util.lisp (circulate-group-up-copy-window)
1856 (circulate-group-down-copy-window)
1857 (circulate-workspace-up-copy-group)
1858 (circulate-workspace-down-copy-group): Prevent the copy of the
1859 same window in the same workspace.
1861 * bindings-second-mode.lisp (release-copy-selected-window)
1862 (release-copy-selected-group): Prevent the copy of the same window
1863 in the same workspace.
1865 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
1866 (generic-pager-move-window-on-next-line): Remove the copy
1868 (generic-pager-move-group-on-next-workspace)
1869 (generic-pager-move-group-on-previous-workspace): Prevent the copy
1870 of the same window in the same workspace.
1872 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
1873 (mouse-pager-copy-selected-group-release): Prevent the copy of the
1874 same window in the same workspace.
1876 * tools.lisp (setf/=): new macro to set a variable only when
1879 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
1880 x, y... only when necessary.
1882 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
1884 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
1885 new function and hook: force windows to stay in its group (solve a
1888 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
1890 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
1891 less flickering when moving/resizing groups.
1893 * clfswm-internal.lisp (hide-group): new function.
1894 (show-all-group): clear-all: new parameter.
1896 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
1898 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
1900 * clfswm*: Color change for the pager. Typo or better description
1901 in bindings definitions. Define bindings for a qwerty keyboard by
1902 default. dot-clfswmrc show examples to switch to an azerty
1904 License change to GPL v3.
1905 * config.lisp: new file - group all globals variables in this
1908 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
1910 * xlib-util.lisp (hide-window): Remove structure-notivy events
1911 when hidding a window.
1913 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
1915 * package.lisp (*sm-property-notify-hook*): Readded
1916 property-notify-hook in second mode.
1918 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1920 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
1922 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1924 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
1925 Tile the current workspace with the current window on one side and
1926 others on the other (this emulate the larswm, dwm, wmii way). See
1927 the default configuration file to enable this mode by default.
1929 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
1932 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1934 * clfswm-pager.lisp (pager-draw-window-in-group): Add
1935 ensure-printable to print windows name even with non-ascii
1938 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
1940 * clfswm-pager.lisp (pager-explode-current-group): Create a new
1941 group for each window in group.
1942 (pager-implode-current-group): Move all windows in workspace to
1943 one group and remove other groups.
1945 * clfswm-pack.lisp (explode-group): Create a new group for each
1947 (implode-group): Move all windows in workspace to one group and
1948 remove other groups.
1950 * clfswm-util.lisp (identify-key): Remove local configuration
1951 variables and made them available for configuration from
1953 (query-string): idem.
1955 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1957 * netwm-util.lisp: Start of NetWM compliance.
1958 Add a Netwm client list gestion.
1960 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1962 * clfswm-internal.lisp (create-group-on-request): open a new group
1963 only when the current group is not empty.
1965 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
1966 bug with null workspace.
1968 * clfswm-pager.lisp (pager-handle-event): Add a hook
1969 system. This hooks can be changed in the user configuration file.
1971 * package.lisp: All colors and font variables are set in
1972 package.lisp and can be configured in the user configuration
1974 Note: If you have configured some less ugly colors (esp. for the
1975 pager) don't hesitate to let me know :)
1977 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
1978 system. This hooks can be changed in the user configuration file.
1980 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
1981 changed in the user configuration file (~/.clfswmrc)
1983 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1985 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
1986 arrow action, open next window in new workspace/group.
1988 * bindings.lisp (stop-all-pending-actions): new binding.
1989 (open-next-window-in-new-group-once): Open the next windows in a
1990 new group (only once) or open all new windows in a new group (like
1991 others windows managers).
1993 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1995 * clfswm.lisp (read-conf-file): New function to read a lisp
1996 configuration file at startup.
1997 (focus-group-under-mouse): Check if group isn't the current group
1998 ( prevent a bug with unclutter ).
2000 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
2002 * bindings.lisp (run-program-from-query-string): A program can be
2003 launch from a input query window.
2005 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
2007 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
2009 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
2011 * clfswm.lisp (process-new-window): One can now open the next
2012 window in a workspace called by its number.
2014 * clfswm-util.lisp (query-font-string): Minimal editing
2016 (eval-from-string): And an REPL in the window manager... :)
2018 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2020 * clfswm.lisp (process-new-window): One can now open the next
2021 window in a new workspace or a new group.
2023 * clfswm-pager.lisp (pager-mode): Display the next arrow action
2024 with the hidden windows.
2026 * clfswm.lisp (second-key-mode): Display the current workspace
2027 number and the next arrow action in the state window.
2029 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
2030 the pager mode and then redisplay only the current workspace.
2032 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
2034 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
2035 they can be focused with a keypress, sorted or renumbered.
2037 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2039 * clfswm-pager.lisp (pager-mode): Remove multiple silly
2040 pager-draw-display. This prevent a lot of flickering in the
2043 * clfswm.lisp: Remove all display-force-output and replace them
2044 with only one display-finish-output in the event loop.
2046 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
2048 * clfswm-pager.lisp (pager-center-group): New function - center a
2049 group at the middle of the screen.
2051 * clfswm-pack.lisp (center-group): New function - center a group
2052 at the middle of the screen.
2054 * clfswm.lisp (show-group): Add a cross line under the group.
2055 (show-group): Group are showned even if fullscreened.
2056 (init-display): Add an exposure event on the root window.
2058 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
2060 * package.lisp (*default-group*): Default group is the same size
2061 of a fullscreened group.
2063 * bindings*: Use shift to move, control+shift to copy.
2065 * *.lisp: Add comments for configuration or alternatives. So grep
2066 for CONFIG to see where you can configure clfswm. And grep for
2067 Alternative to use some commented code.
2069 * clfswm.lisp (second-key-mode): Use a single window to show the
2070 second mode. See for alternatives at the end of this file.
2072 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
2074 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
2075 macro of key and mouse definitions.
2076 (define-define-key/mouse): Use state instead of modifiers list
2077 this fix a bug when the modifiers list is not in the rigth order.
2079 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
2081 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
2083 * clfswm-info.lisp (info-mode): Add an info mode.
2085 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
2087 * clfswm.lisp (process-new-window): Change border size for
2089 (show-all-windows-in-workspace): Unhide all windows even when the
2090 current group is in fullscreen mode.
2092 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
2094 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
2095 redisplay the identify window after a terminal switch.
2097 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
2098 redisplay the pager after a terminal switch.
2100 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
2102 * clfswm-util.lisp (identify-key): Add a window to display
2103 the keys to identify on screen.
2105 * bindings.lisp, bindings-pager.lisp: Define same keys to
2106 move/copy groups/windows in second mode and in pager.
2108 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
2110 (show-all-windows-in-workspace): unhide window before adapting it
2113 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
2115 * clfswm.lisp (handle-event): Revert to an older version.
2117 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
2119 * clfswm-util.lisp (force-window-in-group)
2120 (force-window-center-in-group): New functions for transient windows.
2122 * clfswm-pager.lisp (pager-remove-current-workspace/group):
2123 bugfix: hide all windows before removing group or workspace.
2125 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
2127 * bindings-pager.lisp (mouse-pager-move-selected-group)
2128 (mouse-pager-copy-selected-group)
2129 (mouse-pager-move-selected-window)
2130 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
2131 (mouse-pager-rotate-window-down): New functions to have mouse in
2134 * clfswm-pager.lisp (pager-swap-window)
2135 (pager-copy-group-on-next/previous-workspace)
2136 (pager-copy-window-on-next/previous-line): New functions
2138 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
2140 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
2141 (pager-move-group-on-next/previous-workspace): new functions.
2143 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
2144 to its half size (new functions).
2146 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
2148 * clfswm-pager.lisp: workspaces, groups and windows can now be
2149 selectionned with the keyboard or the mouse.
2151 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
2153 * clfswm-pager.lisp (pager-select-workspace-right/left):
2154 workspaces can now be selectionned with the keyboard.
2156 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
2158 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
2159 new function to remove a previous defined key or mouse combination.
2161 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
2163 * clfswm.lisp (main): Check for access error in init-display.
2165 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
2166 keycode before grabbing.
2168 * bindings.lisp: Remove nlambda and use defun to keep the function
2169 documentation with clisp.
2170 (define-shell): new macro to define shell command for the second
2173 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
2175 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
2178 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
2180 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
2181 workspace circulation.
2183 * clfswm-util.lisp (absorb-orphan-window): new function.
2185 * clfswm-keys.lisp: Keysyms support.
2187 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
2189 * clfswm.lisp (show-group): Use one gc for all groups and not one
2192 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
2194 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
2196 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
2197 width and height outside group.
2199 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
2201 * clfswm.lisp: First public release.