1 2011-06-04 Philippe Brochard <pbrochard@common-lisp.net>
3 * src/clfswm.lisp (main-unprotected): Destroy all frames windows
4 before closing the display (not really needed).
6 2011-06-02 Philippe Brochard <pbrochard@common-lisp.net>
8 * src/clfswm-layout.lisp (inc-tile-layout-size)
9 (dec-tile-layout-size, inc-slow-tile-layout-size)
10 (dec-slow-tile-layout-size): New functions and bindings.
12 2011-06-01 Philippe Brochard <pbrochard@common-lisp.net>
14 * src/clfswm-expose-mode.lisp (define-expose-letter-keys): Add
15 0..1 and A..Z keys to select a child in exposé mode.
17 * src/clfswm-internal.lisp (display-frame-info): Remove hidden
18 infos in frames windows.
20 * src/clfswm-util.lisp (ask-close/kill-current-window): Menu
23 2011-05-30 Philippe Brochard <pbrochard@common-lisp.net>
25 * src/clfswm-internal.lisp (get-parent-layout): Minor fullscreen
28 2011-05-29 Philippe Brochard <pbrochard@common-lisp.net>
30 * src/clfswm-internal.lisp
31 (delete-child-and-children-in-all-frames): Show all children
32 before deleting/destroying a windows, so prevent a flickering.
33 (get-parent-layout): Return the fullscreen size when the current
36 2011-05-28 Philippe Brochard <pbrochard@common-lisp.net>
38 * src/clfswm-internal.lisp (get-parent-layout): Handle correctly
41 * src/clfswm-util.lisp (delete-focus-window-generic): Do not hide
42 child before removing, so prevent a flickering.
44 * src/clfswm-internal.lisp (show-all-children): Rectangular
45 optimization to display only needed children.
46 (show-all-children): Remove flickering on
47 select-next/previous-brother.
49 2011-05-17 Philippe Brochard <pbrochard@common-lisp.net>
51 * src/clfswm-util.lisp (copy-focus-window, cut-focus-window): New
52 functions and ask-close/kill-current-window menu and bindings
55 2011-05-16 Philippe Brochard <pbrochard@common-lisp.net>
57 * src/clfswm-util.lisp (ask-close/kill-current-window): Add an
58 *ask-close/kill-placement* placement window variable.
60 2011-05-09 Philippe Brochard <pbrochard@common-lisp.net>
62 * contrib/osd.lisp (funcall-button-from-code): Display osd
63 documention for buttons and fix some redefining warnings.
65 2011-05-07 Philippe Brochard <pbrochard@common-lisp.net>
67 * src/clfswm-nw-hooks.lisp (make-permanent-nw-hook-frame): New
68 function. Prevent to add or delete a new window hook for this
71 * src/clfswm-layout.lisp (update-layout-managed-children-position):
74 2011-05-06 Philippe Brochard <pbrochard@common-lisp.net>
76 * src/bindings-second-mode.lisp (set-default-second-keys):
77 select-brother-spatial-move-* binding update.
79 * src/clfswm-layout.lisp (tile-left|right|top|bottom-layout): Ask
80 to keep children positions or not.
82 * src/clfswm-internal.lisp (fixe-real-size): Takes care of border
85 * src/clfswm-layout.lisp (update-layout-managed-children): Fix a
86 bug by using the parent frame instead of the current child.
88 * src/clfswm-circulate-mode.lisp
89 (select-brother-generic-spatial-move+right/left/up/down): New
90 function to select a brother from another in a spatial move.
92 2011-04-19 Philippe Brochard <pbrochard@common-lisp.net>
94 * src/clfswm-pack.lisp (move-frame-constrained)
95 (resize-frame-constrained): Use pixels instead of floating
98 2011-04-18 Philippe Brochard <pbrochard@common-lisp.net>
100 * src/clfswm-pack.lisp (resize-frame-constrained): Takes care of
102 (implode-frame, implode-current-frame): New functions. Absorb all
103 frames subchildren in frame. Explode frame opposite.
105 2011-04-17 Philippe Brochard <pbrochard@common-lisp.net>
107 * src/clfswm-pack.lisp (move-frame-constrained)
108 (resize-frame-constrained): New function. Move and resize frame
109 with the mouse constrained by other frame brothers.
111 2011-04-14 Philippe Brochard <pbrochard@common-lisp.net>
113 * src/clfswm-util.lisp (with-movement-select-next-brother)
114 (with-movement-select-previous-brother)
115 (with-movement-select-next-child): Use a simple method (do not
116 enter in the circulate mode) to allow to circulate in all children
119 * src/clfswm-menu.lisp (open-menu): Save info hash table keys
120 instead of deleting newly created keys.
122 2011-03-21 Philippe Brochard <pbrochard@common-lisp.net>
124 * src/clfswm-internal.lisp (x-px->fl, y-px->fl): Takes care of
127 2011-03-20 Philippe Brochard <pbrochard@common-lisp.net>
129 * src/clfswm-info.lisp (show-config-variable): call
130 produce-conf-var-doc.
132 2011-03-18 Philippe Brochard <pbrochard@common-lisp.net>
134 * src/clfswm-autodoc.lisp (produce-conf-var-doc-html): Produce a
135 documentation for all configurable variables in CLFSWM -
138 * src/clfswm-internal.lisp (leave-frame): Hide all children except
141 2011-03-16 Philippe Brochard <pbrochard@common-lisp.net>
143 * src/clfswm-autodoc.lisp (produce-all-docs): Produce a
144 documentation for all configurable variables in CLFSWM.
146 * src/clfswm-layout.lisp (set-gimp-layout): Display a notify
147 window with the help on the GIMP layout.
149 2011-03-12 Philippe Brochard <pbrochard@common-lisp.net>
151 * src/menu-def.lisp: Menu update to prevent cursor keys clash.
153 * clfswm.asd: Change compilation order to prevent undefined
156 * src/clfswm-internal.lisp (show-child(frame)): Handle properly
157 the show-root-frame-p parameter.
159 2011-03-11 Philippe Brochard <pbrochard@common-lisp.net>
161 * src/clfswm-util.lisp (move-frame, resize-frame): Do not move or
162 resize a frame when it's the current root.
164 2011-03-10 Philippe Brochard <pbrochard@common-lisp.net>
166 * src/clfswm-internal.lisp (show-all-children): Handle properly
167 duplicated child in multipe frames.
169 2011-03-09 Philippe Brochard <pbrochard@common-lisp.net>
171 * contrib/volume-mode.lisp (set-default-volume-keys): Add more
172 keybindings (up/down, right/left) to raise/lower the volume.
174 * src/clfswm-layout.lisp: Add a variable border size for frames
177 2011-03-08 Philippe Brochard <pbrochard@common-lisp.net>
179 * src/clfswm-util.lisp (cut-current-child, remove-current-child)
180 (delete-current-child): Hide the current child before doing the
183 * src/clfswm-internal.lisp (show-all-children): Hide windows not
184 in the current root before displaying those in current root.
185 Remove all hide-all unnecessary calls.
187 * src/clfswm-configuration.lisp (save-variables-in-conf-file):
188 Save only variables with a different value than there original
191 2011-03-07 Philippe Brochard <pbrochard@common-lisp.net>
193 * src/clfswm-info.lisp (show-config-variable): Use the new
196 * src/clfswm-autodoc.lisp (produce-configuration-variables): Use
197 the new defconfig method.
199 * src/clfswm-configuration.lisp (create-configuration-menu):
200 Change the config system with a more lispy one and a less string
201 based one: (defconfig name value group doc).
204 2011-03-06 Philippe Brochard <pbrochard@common-lisp.net>
206 * src/clfswm-internal.lisp (show-all-children): Simplify the
208 (show-child): Display an unmanaged window whe it's the current
210 (show-all-children): add the ability to display all child from
211 *root-frame* and hide all those who are not in *current-root*.
212 -> remove hide-all-children when needed.
214 * src/xlib-util.lisp (move-window,resize-window): Add a
215 *color-move-window* border when moving or resizing a window.
217 2011-03-04 Philippe Brochard <pbrochard@common-lisp.net>
219 * src/clfswm-internal.lisp (show-all-children): Perform only one
220 recusion on the clfswm tree: calculate geometry and place child in
223 2011-03-03 Philippe Brochard <pbrochard@common-lisp.net>
225 * src/clfswm-internal.lisp (show-all-children): Rethink of display
226 child order to prevent very annoying flickering.
228 2011-02-27 Philippe Brochard <pbrochard@common-lisp.net>
230 * src/clfswm-util.lisp (query-yes-or-no): New function.
232 * src/clfswm-configuration.lisp (reset-all-config-variables): New
233 function and menu entry.
234 (query-conf-value): Add the ability to leave the field blank to
235 reset the variable to its default value.
237 2011-02-26 Philippe Brochard <pbrochard@common-lisp.net>
239 * src/clfswm-configuration.lisp
240 (add-all-configuration-default-value): Add a default value to
241 configurable variables.
243 2011-02-23 Philippe Brochard <pbrochard@common-lisp.net>
245 * src/clfswm.lisp (main-unprotected): Create the configuration
246 menu only once at startup.
248 2011-02-22 Desmond O. Chang <dochang@gmail.com>
250 * contrib/amixer.lisp: Add a volume mode inspired by the emms
251 volume package. Alsa mixer interface.
253 * contrib/volume-mode.lisp: Add a volume mode inspired by the emms
256 2011-02-22 Desmond O. Chang <dochang@gmail.com>
258 * src/clfswm.lisp (main): Use ASDF:SYSTEM-SOURCE-DIRECTORY instead
259 of *LOAD-TRUENAME*. *LOAD-TRUENAME* is only bound during a call to
260 LOAD. If one eval CLFSWM:MAIN in repl, BASE-DIR will be an empty
261 string. Use ASDF:SYSTEM-SOURCE-DIRECTORY to fix it.
263 2011-02-16 Philippe Brochard <pbrochard@common-lisp.net>
265 * src/clfswm.lisp (main-unprotected): Add a close hook. And close
266 the notify window, the virtual keyboard and the clfswm terminal by
269 2011-02-15 Philippe Brochard <pbrochard@common-lisp.net>
271 * src/clfswm.lisp (main-unprotected): Destroy the notify window
272 before closing the display. This fix a bug when resetting/reloading
275 2011-02-12 Philippe Brochard <pbrochard@common-lisp.net>
277 * src/xlib-util.lisp (equal-wm-class-fun, equal-wm-name-fun)
278 (raise-window-fun, raise-and-focus-window-fun): New functions.
280 * src/config.lisp (*clfswm-terminal-cmd*): Switch from xterm to
282 (*never-managed-window-list*): Structure change to be more
283 flexible. Let the choice to focus, raise and do nothing on never
286 2011-02-09 Philippe Brochard <pbrochard@common-lisp.net>
288 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Take
289 care of never managed windows to move or resize them if the raise
292 * src/clfswm-internal.lisp (in-frame, in-window, in-child): New
295 2011-02-08 Philippe Brochard <pbrochard@common-lisp.net>
297 * src/clfswm.lisp (main-mode): Raise or not unmanaged windows
298 following request in *never-managed-window-list*.
300 2011-02-05 Philippe Brochard <pbrochard@common-lisp.net>
302 * *: **** Release 1102 ****
304 2011-02-05 Desmond O. Chang <dochang@gmail.com>
306 * src/keysyms.lisp: Add extended keysyms from stumpwm.
308 2011-02-01 Desmond O. Chang <dochang@gmail.com>
310 * src/clfswm-util.lisp (run-or-raise): New function (thanks to
313 * src/clfswm-internal.lisp (with-all-*): add a nil block.
315 2011-01-28 Desmond O. Chang <dochang@gmail.com>
317 * src/clfswm-util.lisp (xdg-config-home): XDG_CONFIG_HOME should
318 be $HOME/.config by default.
320 2010-12-29 Philippe Brochard <pbrochard@common-lisp.net>
322 * contrib/osd.lisp (display-doc): Add another method where a
323 CLFSWM native window is used to display the key documentation.
325 2010-12-27 Philippe Brochard <pbrochard@common-lisp.net>
327 * src/xlib-util.lisp (with-xlib-protect): Force to revert to the
330 2010-12-25 Philippe Brochard <pbrochard@common-lisp.net>
332 * src/clfswm-second-mode.lisp (second-key-mode): Call the second
333 mode leave function only when the generic mode was ended.
335 2010-12-08 Philippe Brochard <pbrochard@common-lisp.net>
337 * src/clfswm-second-mode.lisp (sm-leave-function): Do not use
338 *second-mode-program* anymore.
340 2010-12-07 Philippe Brochard <pbrochard@common-lisp.net>
342 * src/clfswm-second-mode.lisp (*second-mode-leave-function*): New
343 variable bound to a function executed (when not null) on second
346 2010-11-14 Philippe Brochard <pbrochard@common-lisp.net>
348 * src/clfswm-util.lisp (find-child-under-mouse): Do not find
351 2010-11-13 Philippe Brochard <pbrochard@common-lisp.net>
353 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
354 Do not display the accel window for unmanaged windows.
356 2010-11-11 Philippe Brochard <pbrochard@common-lisp.net>
358 * src/clfswm-internal.lisp (set-current-root): Handle
359 window-parent in set-current-root.
361 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
362 focus the parent child when the current root is a window.
364 2010-11-09 Philippe Brochard <pbrochard@common-lisp.net>
366 * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
367 New function an bindings.
369 * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
372 2010-11-07 Philippe Brochard <pbrochard@common-lisp.net>
374 * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
375 function to let the user choose to keep child position with
378 * src/clfswm-internal.lisp (remove-frame-data-slot): New
381 2010-11-05 Philippe Brochard <pbrochard@common-lisp.net>
383 * src/clfswm-internal.lisp (frame-select-next-child)
384 (frame-select-previous-child): New functions and bindings. Select
385 the next/previous child in the current frame.
387 2010-10-31 Philippe Brochard <pbrochard@common-lisp.net>
389 * src/clfswm-query.lisp (query-mode-complet): New function: Handle
390 completion in query-mode.
392 2010-10-30 Philippe Brochard <pbrochard@common-lisp.net>
394 * src/clfswm-query.lisp (query-print-string): Handle long lines
397 2010-10-27 Philippe Brochard <pbrochard@common-lisp.net>
399 * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
400 all characters are printable.
402 2010-10-25 Philippe Brochard <pbrochard@common-lisp.net>
404 * contrib/server/server.lisp: Load clfswm client code in the main
405 program and let the user start it with a --client command line
408 * src/package.lisp (*main-entrance-hook*): New hook executed after
409 loading configuration file and before opening the display.
411 2010-10-23 Philippe Brochard <pbrochard@common-lisp.net>
413 * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
415 * src/clfswm-internal.lisp (show-child): Show window only if not
418 * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
419 change modifiers after binding definition.
421 2010-10-21 Philippe Brochard <pbrochard@common-lisp.net>
423 * contrib/osd.lisp: New file: OSD (On Screen Display) for
426 * src/clfswm-menu.lisp (open-menu): Modularise function.
428 2010-10-13 Philippe Brochard <pbrochard@common-lisp.net>
430 * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
431 key binding in main and second mode.
433 2010-10-10 Philippe Brochard <pbrochard@common-lisp.net>
435 * src/clfswm-util.lisp (open-notify-window): Convert hello-window
436 functions to a more generic Notify-window system.
438 * src/tools.lisp (add-timer): Add an id to identify the timer.
440 2010-10-09 Philippe Brochard <pbrochard@common-lisp.net>
442 * src/tools.lisp (erase-timer): New function.
444 * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
445 the hello window. Add Configuration variables.
447 2010-10-08 Philippe Brochard <pbrochard@common-lisp.net>
449 * src/clfswm-util.lisp (): Add an Hello window at startup.
451 * src/tools.lisp (process-timers): Add a timer system.
453 2010-10-07 Philippe Brochard <pbrochard@common-lisp.net>
455 * src/clfswm-query.lisp (add-in-query-string): Handle correctly
458 2010-10-06 Philippe Brochard <pbrochard@common-lisp.net>
460 * src/clfswm-query.lisp (query-print-string): Change cursor color
461 and show parenthesis matching with colors (on match and on
464 2010-10-05 Philippe Brochard <pbrochard@common-lisp.net>
466 * src/clfswm-internal.lisp (show-all-children): Do not raise a
467 child when its parent is hidden.
469 2010-10-02 Philippe Brochard <pbrochard@common-lisp.net>
471 * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
472 possibility to circulate over subchild of the current child.
474 * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
475 (expose-windows-generic): Add an escape-body function to return to
476 the original state on escape key.
478 * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
479 to bind the current child from the configuration file.
481 2010-10-01 Philippe Brochard <pbrochard@common-lisp.net>
483 * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
484 window hook: the frame absorb all new windows that match
485 nw-absorb-test frame data slot.
487 2010-09-30 Philippe Brochard <pbrochard@common-lisp.net>
489 * src/clfswm-expose-mode.lisp (expose-create-window): Show window
490 title in accel window.
492 2010-09-29 Philippe Brochard <pbrochard@common-lisp.net>
494 * configure: Use the Xavier Maillard clfswm script in contrib to
495 build an executable in the standard way.
497 2010-09-26 Philippe Brochard <pbrochard@common-lisp.net>
499 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
500 New functions. Add a window on each child in the expose mode to
503 * src/clfswm-internal.lisp (child-x, child-y, child-width)
504 (child-height): New methods to get real child coordinates.
506 2010-09-25 Philippe Brochard <pbrochard@common-lisp.net>
508 * src/clfswm-layout.lisp (*-layout): Use child-position.
510 * src/clfswm-internal.lisp (child-position): New function.
512 * src/clfswm-expose-mode.lisp (expose-windows-mode)
513 (expose-all-windows-mode): Use a generic mode.
515 * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
516 with handle-event-fun symbols instead of inspecting clfswm
517 internals symbols on each mode change.
519 * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
520 a separate clfswm-expose-mode.lisp file.
522 * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
523 screen size instead of hardcoded test coordinates.
525 2010-09-24 Philippe Brochard <pbrochard@common-lisp.net>
527 * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
528 (speed-mouse-right, speed-mouse-up, speed-mouse-down)
529 (speed-mouse-undo, speed-mouse-first-history): New functions to
530 quickly move the mouse. Implemented for the second mode.
532 2010-09-16 Philippe Brochard <pbrochard@common-lisp.net>
534 * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
535 write permission on $clfswm_asd_path. So anybody can start clfswm
536 even if there is no write permission on the source directory.
538 2010-09-12 Philippe Brochard <pbrochard@common-lisp.net>
540 * contrib/clfswm: Add support to cmucl, ccl and ecl.
542 2010-09-11 Philippe Brochard <pbrochard@common-lisp.net>
544 * src/clfswm-util.lisp (set-hide-unmanaged-window)
545 (set-show-unmanaged-window, set-default-hide-unmanaged-window):
546 New functions and menu entry.
547 (set-globally-hide-unmanaged-window)
548 (set-globally-show-unmanaged-window): New functions and menu
551 * src/clfswm-internal.lisp (hide-unmanager-window-p): New
553 (show-child): Add a data slot on frame to hide or not unmanaged
556 * src/clfswm-corner.lisp (present-clfswm-terminal)
557 (present-virtual-keyboard): Use a function (generic-present-body)
558 instead of a macro (generate-present-body).
560 * src/clfswm-util.lisp (update-menus): List all directories and
561 subdirectories in $XDG_DATA_DIRS/applications.
563 2010-09-10 Philippe Brochard <pbrochard@common-lisp.net>
565 * src/clfswm-corner.lisp (generate-present-body): New macro.
566 (present-clfswm-terminal, present-virtual-keyboard): Use
567 generate-present-body.
569 2010-09-09 Philippe Brochard <pbrochard@common-lisp.net>
571 * src/clfswm-util.lisp (update-menus): Follow XDG specifications
572 instead of the non-portable Debian update-menu.
574 2010-09-07 Philippe Brochard <pbrochard@common-lisp.net>
576 * src/clfswm.lisp (error-handler): New function do handle
577 asynchronous errors and ignore them.
578 (open-display): Install the new error-handler on display.
580 2010-09-05 Philippe Brochard <pbrochard@common-lisp.net>
582 * src/xlib-util.lisp (with-xlib-protect): Add a
583 with-simple-restart on top of body execution.
585 2010-09-04 Philippe Brochard <pbrochard@common-lisp.net>
587 * src/clfswm.lisp (main-loop): Protect all xlib functions with an
590 * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
591 handle-event. Add a with-simple-restart to prevent a
592 clisp/new-lisp infinite loop.
594 2010-08-30 Philippe Brochard <pbrochard@common-lisp.net>
596 * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
597 clfswm terminal working even on xterm title changes.
599 2010-08-29 Philippe Brochard <pbrochard@common-lisp.net>
601 * src/clfswm-util.lisp (run-other-window-manager): Update for
604 * src/tools.lisp (do-execute): New parameter io to change the
607 * src/clfswm-util.lisp (hide-current-child): Prevent from removing
610 * src/clfswm-internal.lisp (child-member): New predicate.
611 (child-remove): New function.
613 * src/*.lisp: Use child-member and child-remove everywhere it's
616 2010-08-28 Philippe Brochard <pbrochard@common-lisp.net>
618 * src/clfswm.lisp (main-loop): Ensure that all events have been
619 processed after a process-event.
621 * src/clfswm-internal.lisp (is-in-current-child-p): New function.
623 2010-08-27 Philippe Brochard <pbrochard@common-lisp.net>
625 * src/clfswm.lisp (main-mode:configure-request): Raise the window
626 only when present on the current child and focus it accordingly.
628 2010-08-26 Philippe Brochard <pbrochard@common-lisp.net>
630 * src/clfswm-circulate-mode.lisp (circulate-loop-function):
631 Use is-a-key-pressed-p.
633 * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
635 * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
636 returned by xlib:keysym->keycodes.
638 * src/*.lisp: Use the new child-equal-p to compare children. This
639 prevent a bug with sbcl/cmucl when the standard equal function
640 does not work with xlib:window.
642 * src/clfswm-internal.lisp (child-equal-p): New predicate.
644 2010-08-25 Philippe Brochard <pbrochard@common-lisp.net>
646 * src/clfswm-generic-mode.lisp (generic-mode): Use an
647 xlib:event-listen before processing event with
648 xlib:process-event. This prevent a bug with CLX threaded
649 implementation like sbcl.
651 * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
652 processing event with xlib:process-event. This prevent a bug with
653 CLX threaded implementation like sbcl.
655 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
657 * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
659 * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
662 * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
663 (find-parent-frame, find-frame-window, find-frame-by-name)
664 (find-frame-by-number): Use with-find-in-all-frames to search in
665 frames in the right order.
667 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
668 unwanted flickering with unmanaged windows.
670 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
672 * src/package.lisp: Remove event handler hooks as they're not
673 needed anymore (To replace them: use closure and define-handler).
675 * src/xlib-util.lisp (move-window, resize-window)
676 (wait-mouse-button-release): Use a generic mode.
678 * src/*.lisp: Replace the case to handle event with a more (tricky)
679 lispy method which bind a function to each keywords associated
682 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
684 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
685 menu entry between delete-current-child and remove-current-child.
686 ie: Delete a child and its children in all frames by default.
688 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
690 * src/package.lisp: Add a placement configuration group.
692 * src/binding*.lisp: Bind control+g to escape the current action
695 * src/clfswm-internal.lisp
696 (delete-child-and-children-in-all-frames): New function and
697 binding: Second mode - Control+Delete delete the current child and
698 its children in all frames (ie: close the current child and its
701 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
703 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
704 the frame window and the frame gc. Close a very annoying bug when
705 cuting/pasting a frame or moving a child over frames with the
708 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
709 all children in *current-root* after moving/resizing a frame.
711 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
713 * src/clfswm-util.lisp (delete-focus-window)
714 (destroy-focus-window): Remove child in parent frame before
717 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
719 * src/clfswm-util.lisp (identify-key): Add a timeout in
721 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
722 of the window passed by xlib:process-event.
724 * src/xlib-util.lisp (move-window, resize-window)
725 (wait-mouse-button-release): Add a timeout in xlib:process-event.
727 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
729 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
730 to launch an other window manager and to return to clfswm.
732 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
734 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
737 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
739 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
742 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
743 parameter and a loop timeout.
745 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
747 * src/clfswm.lisp (main): Add an alternate configuration filename
750 * load.lisp: Add a debuging code example.
752 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
754 * src/clfswm-configuration.lisp (create-configuration-menu): New
755 menu to configure all clfswm variables while clfswm is running.
757 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
759 * src/clfswm-util.lisp (save-configuration-variables): New
760 function to save all configuration variables in clfswmrc.
762 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
764 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
766 (set-default-info-keys): Add cursor key support in info mode.
768 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
770 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
773 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
774 prevent reading the configuration file (this may be useful to
775 produce the original documentation without user modifications
776 with the rc configuration file).
778 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
780 * src/bindings-second-mode.lisp (set-default-second-keys):
781 Simplification of Escape key to close/kill/remove the focus window
782 and unhide all windows.
784 * src/bindings.lisp (set-default-main-keys): Simplification of
785 Escape key to close/kill/remove the focus window and unhide all
788 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
789 focus and unhide all windows capabilities.
791 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
793 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
795 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
797 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
798 Keep child order and don't make unnecessary child movement.
799 (one-column-layout, one-line-layout): New layouts.
801 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
803 * *: **** Release 0906 ****
805 * contrib/cd-player.lisp: New file to handle the CD player.
807 * contrib/xmms.lisp: New file to handle the xmms player.
809 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
811 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
812 Maximize windows in there frame - Leave frames to there actual
815 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
816 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
818 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
820 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
822 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
824 * contrib/mpd.lisp: Use a standard menu.
826 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
828 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
830 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
832 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
834 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
837 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
839 * src/config.lisp (get-fullscreen-size): One pixel adjustment
842 * src/clfswm-placement.lisp (*-child-placement): One pixel
845 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
847 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
848 Ensure that all characters are printable.
850 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
853 * src/clfswm-placement.lisp (*-child-placement): Adjust
854 coordinates to one pixel in the current child.
856 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
858 * src/clfswm-query.lisp (query-enter-function): Assign font before
859 width and height calculation.
861 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
863 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
864 bannish the pointer in an arbitrary place.
866 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
867 place the info window in an arbitrary place.
869 * src/clfswm-query.lisp (query-enter-function): Use with-placement
870 macro to place the query window in an arbitrary place.
872 * src/clfswm-placement.lisp: New file. Allow to place info windows
873 or query windows on an arbitrary place. Allow to bannish the
874 pointer on an arbitrary place.
876 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
878 * src/clfswm-circulate-mode.lisp (reorder-child)
879 (reorder-brother): Unfocus windows before reordering children or
882 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
884 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
885 the parent is a frame.
887 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
888 motion with a default modifier.
890 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
893 * src/clfswm-info.lisp (info-mode): Handle motion with a default
895 (info-mode): Optimization in loop function.
897 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
899 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
900 root-frame correctly.
902 * clfswm.asd: Dependency fix for clfswm-generic-mode.
904 * src/clfswm-circulate-mode.lisp (reorder-child)
905 (reorder-brother): Handle empty frames.
906 (reorder-brother): Redisplay only the parent frame of the current
909 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
910 parent frame of the current frame.
912 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
914 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
915 Maximize/Unmaximize the current frame in its parent frame.
917 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
918 windows and frames in there parent frame.
920 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
922 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
924 * src/clfswm-circulate-mode.lisp (reorder-child)
925 (reorder-brother): Reinitialise on circulate type change
926 child to brother or brother to child.
928 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
929 calls xlib:display-finish-output on each map-request. So speed up
932 * src/xlib-util.lisp (map-window): New function. Call
933 xlib:display-finish-output on each map request.
935 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
937 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
938 Optimisation when drawing second mode window.
940 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
942 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
945 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
947 * src/clfswm-util.lisp (run-program-from-query-string): Launch
948 command only with a return validation.
950 2009-04-22 Xavier Maillard <xma@gnu.org>
952 * src/clfswm-query.lisp (query-string): Use a generic mode.
954 2009-04-19 Xavier Maillard <xma@gnu.org>
956 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
958 2009-04-18 Xavier Maillard <xma@gnu.org>
960 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
961 to define all other modes.
963 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
965 * src/package.lisp (): Use *default-font-string* for all
968 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
970 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
972 * src/xlib-util.lisp (null-size-window-p): Better check of null
975 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
977 * src/clfswm.lisp (handle-map-request): Add a fix to manage
978 correctly fullscreen windows (SDL particularly).
980 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
982 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
983 a segfault with clisp/new-clx.
985 * src/clfswm.lisp (handle-motion-notify): Add a needed window
988 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
989 needed window argument.
991 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
993 * src/xlib-util.lisp (wait-no-key-or-button-press)
994 (wait-a-key-or-button-press): Check buttons press/release correctly"
996 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
998 * src/menu-def.lisp: Add children navigation menu in the movement
999 menu (select next/previous child/brother/level).
1001 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
1003 * *: Rename 'sister' frame to 'brother' frame.
1005 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
1006 alias in a real modifier.
1008 * src/package.lisp (*modifier-alias*): New list of modifier alias
1009 For example: :alt is :mod-1, :numlock is :mod-2...
1011 * src/tools.lisp (remove-hook): New function.
1013 * src/clfswm-keys.lisp (with-capslock, without-capslock)
1014 (with-numlock, without-cnumlock): New functions.
1016 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
1018 * src/clfswm-info.lisp: Use the *binding-hook* to create info
1019 keys and mouse bindings.
1021 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
1022 second keys and mouse bindings.
1024 * src/bindings.lisp: Use the *binding-hook* to create main keys
1027 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1029 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
1032 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
1034 * src/menu-def.lisp: Use a menu instead of a function for the
1037 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
1039 * src/clfswm-util.lisp (show-standard-menu): Display the standard
1040 menu from the 'update-menus' command.
1042 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
1044 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
1045 it's already grabbed.
1047 * src/clfswm-internal.lisp (display-frame-info): Use configurable
1048 colors and fix a bug with background.
1049 (display-frame-info): Set window background when displaying info.
1051 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1053 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
1054 warning with clisp/new-clx.
1056 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
1058 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
1061 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1063 * *: **** Release 0809 ****
1065 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1067 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
1069 (ensure-unique-number): New function and menu entry.
1071 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
1073 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
1074 hook: open the next window in a named frame.
1075 (numbered-frame-nw-hook): New new window hook: open the next
1076 window in a numbered frame.
1078 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
1079 cases. So query-string can be called even in the main mode.
1081 * src/clfswm-internal.lisp (show-all-children): Do not raise a
1082 child by default => far less flickering.
1084 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
1086 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
1088 * src/menu-def.lisp: Change key binding for the CLFSWM menu
1091 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
1092 is nil. (workaround on some CLX implementation).
1094 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
1096 * src/menu-def.lisp: Add a menu to set a focus policy for all
1099 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
1100 (all-frames-set-*-focus-policy): Set a focus policy for all
1103 * src/clfswm.lisp (handle-enter-notify): sloppy-select
1104 mode. Select a child and its parents on mouse over.
1106 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
1108 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
1109 policy -> Sloppy focus only for windows in the current frame.
1110 (main-unprotected): Exit clfswm on init error (ie: when another
1111 window manager is running).
1113 * src/clfswm-util.lisp (reset-clfswm): New function.
1115 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
1117 * src/clfswm-menu.lisp (init-menu): New function.
1119 * src/clfswm-util.lisp (reload-clfswm): New function to reload
1121 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
1123 * src/clfswm.lisp (main, main-unprotected): Handle error in a
1124 superior main function. Now CLFSWM can't break the X session. It
1125 just reinitialize the display and run a new main loop.
1127 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
1128 *vt-keyboard-on* global to avoid warnings when loading clfswm.
1130 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
1131 (help-on-gimp-layout): Describe how to use the GIMP layout.
1133 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
1135 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
1136 main-window-right-layout. Change the keybinding for (shift)alt+tab
1137 to not select windows in the main window lisst.
1138 Bind F8 to add a window in the main window list.
1139 Bind F9 to remove a window in the main window list.
1140 Change the focus policy to :sloppy.
1141 (set-previous-layout): Restore the previous layout, keybinding and
1144 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
1146 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
1148 * src/clfswm-layout.lisp (main-window-left-layout)
1149 (main-window-bottom-layout, main-window-top-layout): New
1151 Factorize layouts in menu.
1153 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
1155 * src/clfswm-layout.lisp (main-window-right-layout): A possible
1156 GIMP layout: one or more main windows on one side of the
1157 frame. Others on the other size.
1159 * src/clfswm-util.lisp
1160 (current-frame-set-click/sloppy-focus-policy): Each frame can have
1161 a different focus policy (one of :click or :sloppy).
1162 The default focus policy is set with *default-focus-policy*.
1164 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
1166 * src/clfswm-info.lisp (show-config-variable): New function.
1168 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
1170 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
1172 * src/clfswm-info.lisp: Colored help for key binding and corners
1175 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
1177 * src/clfswm-util.lisp (delete-focus-window)
1178 (destroy-focus-window): Remove chid only in
1179 handle-unmap/destroy-notify. Focus *current-root* only when
1180 closing/killing the current child.
1182 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
1183 functions or corners.
1185 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1187 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
1188 action: Hide/Unhide a terminal on mouse corner action. (By default
1189 right mouse button on the top left corner).
1191 * src/config.lisp (*never-managed-window-list*): New config
1194 * src/clfswm-internal.lisp (never-managed-window-p): New function:
1195 Handle never managed window in a more simple way.
1197 * src/clfswm-corner.lisp: New file and new and more simple method
1198 to define corners actions.
1200 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
1202 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
1204 * src/clfswm-layout.lisp (fast-layout-switch)
1205 (define-fast-layout-switch): New functions: Switch between two
1208 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
1209 really in the second mode. So leave-second-mode can be used even
1212 * src/clfswm-util.lisp (switch-to-last-child): New function:
1213 Store the current child and switch to the previous one.
1215 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1217 * src/clfswm-util.lisp (display-current-window-info): Display the
1219 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
1220 (top right by default). By default 'xvkbd' is used.
1222 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1224 * src/xlib-util.lisp (move-window, resize-window): Compress motion
1227 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
1229 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
1232 * src/clfswm-info.lisp (info-mode): Compress motion events.
1234 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
1236 * src/clfswm-internal.lisp (show-all-children): Compute geometry
1237 and selection first and then show only necessary children.
1238 (show-child): remove unneeded display-p parameter.
1240 * src/config.lisp (get-fullscreen-size): Place the frame border
1241 outside the screen (this prevent the loose of 2 pixels per
1244 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
1246 * src/clfswm-internal.lisp (focus-child): Algorithm change to
1247 raise only the selected child.
1249 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
1251 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
1252 Raise only viewable children.
1254 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
1256 * src/clfswm-internal.lisp (show-all-children): Always raise all
1257 displayed children. Remove all references to raise-p.
1259 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1261 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
1264 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
1265 second mode binding on raise/lower child in its frame.
1267 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
1268 behaviour to the new raise/lower property.
1269 Call clear-nw-hook before the rest of the hook.
1271 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
1272 (mouse-click-to-focus-and-resize-window): Stop button event. This
1273 prevent a keyboard/pointer freeze.
1275 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1277 * src/clfswm-internal.lisp (frame-lower-child)
1278 (frame-raise-child): New functions to raise/lower a child in its
1281 * src/clfswm-util.lisp (have-to-present-windows)
1282 (have-to-present-all-windows): New functions to have an MaxOS
1283 expose like on mouse click in screen corner.
1285 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
1287 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
1289 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
1290 child from a choice in all frames with hidden children.
1292 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
1294 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
1296 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
1297 (unhide-all-children): New functions.
1299 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
1302 * src/clfswm-util.lisp (hide/show-frame-window): new function and
1305 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
1307 * src/clfswm-util.lisp (rename-current-child): Do not display the
1308 frame info for a window.
1310 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
1312 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
1313 frame window for the removed child and its children.
1315 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
1317 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
1320 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
1322 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
1323 the ROX pinboard (ie: leave it lowered in the root window as
1326 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
1327 (tile-left-layout, tile-right-layout, tile-top-layout)
1328 (tile-bottom-layout): Use all the frame space when there is only
1331 * src/clfswm-internal.lisp (place-window-from-hints): Center
1332 unmanaged windows in the root screen.
1334 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
1337 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1339 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
1340 typo in managed types.
1342 * src/clfswm-internal.lisp (show-child): Always display frame info
1343 even if the frame is hidden.
1345 * src/xlib-util.lisp (resize-window): Use a better algorithme to
1348 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1350 * src/clfswm-util.lisp (with-movement): Display frame info for all
1351 frames in current root.
1353 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1355 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
1357 * src/bindings-second-mode.lisp (define-second-key #\a): New
1358 binding on 'add-default-frame'.
1360 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1361 message to follow the autodocumentation process.
1363 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1365 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1366 "Space" to jump to a child. "B" to bind a slot on the current
1369 * src/bindings-second-mode.lisp: Use "Tab" instead of
1372 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
1374 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1375 unmanaged (hidden) windows.
1377 * src/clfswm-internal.lisp (place-window-from-hints): Give a
1378 minimal size for windows.
1379 (with-all-windows-frames-and-parent): New function.
1381 * src/config.lisp (*default-window-width/height*): New parameters.
1383 * src/clfswm-internal.lisp (place-window-from-hints): Center
1384 windows in the screen instead of in there frame.
1386 * src/bindings-second-mode.lisp (tile-space-current-frame): New
1389 * src/clfswm-layout.lisp (register-layout): Intern the once name
1390 in the right package.
1392 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1394 * doc/dot-clfswmrc: Update to follow the new clfswm way.
1396 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
1398 * src/clfswm-internal.lisp (set-current-child)
1399 (adapt-child-to-parent, show-child, hide-child): Handle the case
1400 where child is not a frame or a window.
1402 * src/clfswm-util.lisp
1403 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1404 Check if child is a frame.
1406 * src/clfswm-internal.lisp (managed-window-p): Handle the case
1407 where frame is null.
1408 (place-frame): Check if frame and parent are frames.
1410 * src/clfswm-info.lisp (info-mode): display all frame info before
1413 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1414 info before leaving.
1416 * src/clfswm-internal.lisp (display-all-frame-info): New function.
1418 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
1420 * src/tools.lisp (getenv): Implemented for ECL.
1421 (urun-prog): Implemented for ECL.
1423 * src/clfswm-util.lisp (identify-key): Use a double buffer to
1426 * src/clfswm-query.lisp (query-string): Use a double buffer to
1429 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1432 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1435 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
1437 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1439 * src/menu-def.lisp: New file: move all menu definition in
1442 * src/clfswm-layout.lisp (register-layout): Use a function instead
1445 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
1447 * src/clfswm-autodoc.lisp (produce-menu-doc,
1448 (produce-menu-doc-html): New functions.
1449 (produce-doc-*): Moved to clfswm-autodoc.lisp.
1451 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1452 paste a child on one of its own children. (this prevent a
1454 (move-child-to): Rename move/copy-current-child-by to
1456 (mouse-move-window-over-frame): New function to move the window
1457 under the mouse cursor to another frame.
1459 * src/clfswm-internal.lisp (find-child-in-parent): New function.
1461 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1463 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1464 windows only when its window parent is the current child.
1466 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1468 * src/clfswm-util.lisp (manage-current-window)
1469 (unmanage-current-window): New functions: Allow to force to manage
1470 or unmanage a window by its parent frame.
1472 * src/bindings-second-mode.lisp (#\o): binded to
1473 set-open-in-new-frame-in-parent-frame-nw-hook and
1474 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1476 * src/clfswm-util.lisp (with-current-window): New macro.
1478 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1479 exposure and enter-window handle event.
1481 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1482 children for the current child after the move/resize.
1484 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1486 * src/xlib-util.lisp (resize-window): Take care of window size
1489 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1490 move/resize unmanaged windows.
1492 * src/xlib-util.lisp (move-window, resize-window): New functions.
1494 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1496 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1497 user choose what window type the current frame must handle.
1498 (display-current-window-info): New function.
1499 (current-frame-manage-all-window-type)
1500 (current-frame-manage-only-normal-window-type)
1501 (current-frame-manage-no-window-type): New functions.
1503 * src/clfswm-internal.lisp (managed-window-p): New function.
1505 * src/package.lisp (frame): Managed type: new frame
1506 parameter. This allow to choose what window type a frame must
1509 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1511 * src/clfswm-nw-hooks.lisp
1512 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1514 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1517 * src/tools.lisp (ensure-printable): Return always a string even
1520 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
1522 * src/config.lisp (*default-nw-hook*): New variable to change the
1523 default new window hook.
1525 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1527 * clfswm.asd (clfswm): Add a dependency from
1528 clfswm-second-mode.lisp to clfswm.lisp.
1530 * src/clfswm-util.lisp (identify-key): Show the documentation for
1531 the function bound on a key.
1532 (with-movement): Move with-movement,
1533 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
1534 to clfswm-util.lisp.
1536 * src/clfswm-menu.lisp: New menu system that let user change keys
1537 or functions associated to keys.
1539 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
1541 * src/clfswm-internal.lisp (show-all-children): Display-child is
1542 the first child by default. Solve a bug with father-p.
1544 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
1546 * src/clfswm-internal.lisp (add-frame): Add frame return the
1548 (show-all-children): Move the size computation outside the
1551 * src/bindings-second-mode.lisp (with-movement): Redisplay only
1554 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1555 only the current child.
1557 * src/clfswm-internal.lisp (show-all-children): New display-child
1558 parameter to display only the desired child and its children.
1559 (select-next/previous-child): Only display the current child.
1561 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
1563 * src/clfswm.lisp (init-display): Move the default frame creation
1564 on the default init hook.
1566 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1567 the main mode (for example: "1" on an azerty keyboard).
1569 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
1571 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1572 keysyms. Revert to old grabbing method for the main mode.
1574 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
1576 * src/clfswm.lisp (init-display): Add key handling on no focus
1577 window and on frame windows.
1579 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1581 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1582 all keys by default and replay just what is needed. No change for
1585 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1586 (find-key-from-code): Test for shift and not shift presence.
1588 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
1590 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1591 new key parameter to have less flickering.
1593 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
1595 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1596 layout only one time and revert to no-layout to freely handle
1599 * src/clfswm-nw-hooks.lisp
1600 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1601 with new created window.
1603 * src/clfswm-layout.lisp (register-layout): Now register
1604 automatically a once layout to set the layout only one time and
1605 revert to no-layout to freely handle frames.
1607 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1609 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1610 nw-hook: Open the next window in the current frame and leave the
1611 focus to the current child.
1613 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
1615 * src/bindings-second-mode.lisp: Add keys definitions to
1616 bind-or-jump in the second mode.
1618 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
1619 macro for bind-or-jump-(1|2|3...).
1621 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
1622 arguments to function. This allow to do things like:
1623 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
1624 are passed to my-function on key press.
1626 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
1628 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
1630 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
1632 * src/clfswm-internal.lisp (child-fullname): New function
1634 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
1635 docstring in info-mode-menu. An item can be
1636 '((key function) (key function)) or with docstring
1637 '((key function "documentation 1") (key function "bla bla") (key function))
1639 * src/tools.lisp (ensure-n-elems): New function.
1641 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
1642 resize a frame or the window's father.
1644 * src/clfswm.lisp (init-display): Remove tile-space-layout by
1645 default on the root frame.
1647 * src/clfswm-util.lisp (move/resize-frame): Add standard event
1648 hooks handlers (map-request, configure-notify...)
1650 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
1653 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1655 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
1656 or the window's father.
1658 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
1659 event only if there is a geometry change.
1660 (mouse-focus-move/resize-generic): Generic function to move or
1661 resize a frame or a window father frame.
1663 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1665 * src/clfswm-internal.lisp (show-all-children): Return t if there
1666 is a geometry change.
1668 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
1670 * src/bindings.lisp (Up/Down): Swap select previous/next level.
1672 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
1674 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
1676 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
1677 (with-all-*): Reverse the child list to manage the first child last (like in
1680 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
1681 root window only if true.
1683 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
1684 root window only if *create-frame-on-root* is true.
1686 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
1689 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
1691 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
1692 the current child (even if it's a window).
1694 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
1696 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
1697 (mouse-click-to-focus-and-resize): New functions.
1699 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
1700 (*-px->fl): Convert pixel coordinates to float.
1702 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
1704 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
1706 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
1709 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
1710 and hide-all-children.
1711 (raise-if-needed): New function.
1712 (show-child): Use a first-p parameter to raise windows only when they are
1715 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
1717 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
1720 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
1722 * src/clfswm-info.lisp (keys-from-list): new function.
1724 * src/*: rename 'childs' in 'children'.
1726 * src/*: rename 'group' in 'frame'.
1728 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
1730 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
1732 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
1734 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
1736 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
1738 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
1739 Bind control+o to open the next window in a new group in the root group
1740 (as open in next window in a new workspace in 0801 version).
1742 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
1744 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
1747 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
1749 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
1750 instead of Tab for select-previous-child.
1752 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
1754 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
1757 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
1759 * clfswm-util.lisp (identify-key): Display the documentation
1760 associated to keys when identifying a key.
1762 2008-03-10 Xavier Maillard <xma@gnu.org>
1764 * contrib/clfswm: Complete rewrite of the script. Detect error and
1765 act accordingly. Add command line arguments to configure the
1766 script execution. User can now choose different common lisp
1767 implementation (clisp and sbcl only), choose where to store the
1768 dumped image, where to find clfswm source.
1770 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
1772 * clfswm-internal.lisp (process-new-window): Beginning of new
1773 window hook: each group have a hook to tell what he wants to do
1774 with the new created window.
1776 2008-03-08 Xavier Maillard <xma@gnu.org>
1778 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
1779 call the resulting executable.
1781 * clfswm.lisp (read-conf-file): Check for the user config file in
1782 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
1783 prefered whenever possible.
1785 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
1787 * clfswm-layout.lisp (*-layout): Add an optional raise-p
1788 parameter in each layout.
1790 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
1792 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
1794 (copy/move-current-child-by-name/number): new functions
1795 (focus-group-by-name/number): new functions
1796 (delete-group-by-name/number): new functions
1798 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
1800 * ************************************************************ *
1801 *: Major update - No more reference to workspaces. The main *
1802 structure is a tree of groups or application windows. *
1803 * ************************************************************ *
1805 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
1807 * clfswm.lisp (read-conf-file): Read configuration in
1808 $HOME/.clfswmrc or in /etc/clfswmrc or in
1809 $XDG_CONFIG_HOME/clfswm/clfswmrc.
1810 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
1813 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
1815 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
1818 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
1820 * clfswm-internal.lisp (find-window-group): New function.
1822 * clfswm*: Change to make clfswm run with clisp/new-clx.
1824 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
1826 * clfswm-util.lisp (query-show-paren): Add show parent matching in
1828 (query-string): Bind control+k to delete end of line.
1830 * clfswm-second-mode.lisp (draw-second-mode-window): Display
1831 the action on mouse motion in second mode.
1833 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
1834 event but do not clear the root window.
1835 (handle-configure-request): Adjust unmanaged window from there
1838 * clfswm-internal.lisp (process-new-window): Adjust new window
1839 with the specified hints (max/min/base width/height).
1841 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
1843 * clfswm.lisp (handle-configure-request): Send an Configuration
1844 Notify event. This solve a bug with xterm and rxvt who takes some
1845 times to be mapped. Now there is no delay.
1847 * bindings-second-mode.lisp (define-shell): Run programs after
1848 living the second mode.
1850 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
1852 * clfswm-internal.lisp (process-new-window): Do not crop transient
1853 window to group size.
1854 (adapt-window-to-group): Do not crop transient window to group
1857 * clfswm.lisp (handle-configure-request): Adapt just the window to
1858 its group and don't take care of the configure request. Remove the
1859 bug with the Gimp outside the group and speed up the window
1861 (handle-exposure): Remove show-all-group on exposure event
1864 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
1866 * clfswm-util.lisp (circulate-group-up-copy-window)
1867 (circulate-group-down-copy-window)
1868 (circulate-workspace-up-copy-group)
1869 (circulate-workspace-down-copy-group): Prevent the copy of the
1870 same window in the same workspace.
1872 * bindings-second-mode.lisp (release-copy-selected-window)
1873 (release-copy-selected-group): Prevent the copy of the same window
1874 in the same workspace.
1876 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
1877 (generic-pager-move-window-on-next-line): Remove the copy
1879 (generic-pager-move-group-on-next-workspace)
1880 (generic-pager-move-group-on-previous-workspace): Prevent the copy
1881 of the same window in the same workspace.
1883 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
1884 (mouse-pager-copy-selected-group-release): Prevent the copy of the
1885 same window in the same workspace.
1887 * tools.lisp (setf/=): new macro to set a variable only when
1890 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
1891 x, y... only when necessary.
1893 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
1895 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
1896 new function and hook: force windows to stay in its group (solve a
1899 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
1901 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
1902 less flickering when moving/resizing groups.
1904 * clfswm-internal.lisp (hide-group): new function.
1905 (show-all-group): clear-all: new parameter.
1907 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
1909 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
1911 * clfswm*: Color change for the pager. Typo or better description
1912 in bindings definitions. Define bindings for a qwerty keyboard by
1913 default. dot-clfswmrc show examples to switch to an azerty
1915 License change to GPL v3.
1916 * config.lisp: new file - group all globals variables in this
1919 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
1921 * xlib-util.lisp (hide-window): Remove structure-notivy events
1922 when hidding a window.
1924 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
1926 * package.lisp (*sm-property-notify-hook*): Readded
1927 property-notify-hook in second mode.
1929 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1931 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
1933 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1935 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
1936 Tile the current workspace with the current window on one side and
1937 others on the other (this emulate the larswm, dwm, wmii way). See
1938 the default configuration file to enable this mode by default.
1940 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
1943 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1945 * clfswm-pager.lisp (pager-draw-window-in-group): Add
1946 ensure-printable to print windows name even with non-ascii
1949 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
1951 * clfswm-pager.lisp (pager-explode-current-group): Create a new
1952 group for each window in group.
1953 (pager-implode-current-group): Move all windows in workspace to
1954 one group and remove other groups.
1956 * clfswm-pack.lisp (explode-group): Create a new group for each
1958 (implode-group): Move all windows in workspace to one group and
1959 remove other groups.
1961 * clfswm-util.lisp (identify-key): Remove local configuration
1962 variables and made them available for configuration from
1964 (query-string): idem.
1966 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1968 * netwm-util.lisp: Start of NetWM compliance.
1969 Add a Netwm client list gestion.
1971 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1973 * clfswm-internal.lisp (create-group-on-request): open a new group
1974 only when the current group is not empty.
1976 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
1977 bug with null workspace.
1979 * clfswm-pager.lisp (pager-handle-event): Add a hook
1980 system. This hooks can be changed in the user configuration file.
1982 * package.lisp: All colors and font variables are set in
1983 package.lisp and can be configured in the user configuration
1985 Note: If you have configured some less ugly colors (esp. for the
1986 pager) don't hesitate to let me know :)
1988 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
1989 system. This hooks can be changed in the user configuration file.
1991 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
1992 changed in the user configuration file (~/.clfswmrc)
1994 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1996 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
1997 arrow action, open next window in new workspace/group.
1999 * bindings.lisp (stop-all-pending-actions): new binding.
2000 (open-next-window-in-new-group-once): Open the next windows in a
2001 new group (only once) or open all new windows in a new group (like
2002 others windows managers).
2004 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
2006 * clfswm.lisp (read-conf-file): New function to read a lisp
2007 configuration file at startup.
2008 (focus-group-under-mouse): Check if group isn't the current group
2009 ( prevent a bug with unclutter ).
2011 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
2013 * bindings.lisp (run-program-from-query-string): A program can be
2014 launch from a input query window.
2016 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
2018 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
2020 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
2022 * clfswm.lisp (process-new-window): One can now open the next
2023 window in a workspace called by its number.
2025 * clfswm-util.lisp (query-font-string): Minimal editing
2027 (eval-from-string): And an REPL in the window manager... :)
2029 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2031 * clfswm.lisp (process-new-window): One can now open the next
2032 window in a new workspace or a new group.
2034 * clfswm-pager.lisp (pager-mode): Display the next arrow action
2035 with the hidden windows.
2037 * clfswm.lisp (second-key-mode): Display the current workspace
2038 number and the next arrow action in the state window.
2040 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
2041 the pager mode and then redisplay only the current workspace.
2043 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
2045 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
2046 they can be focused with a keypress, sorted or renumbered.
2048 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2050 * clfswm-pager.lisp (pager-mode): Remove multiple silly
2051 pager-draw-display. This prevent a lot of flickering in the
2054 * clfswm.lisp: Remove all display-force-output and replace them
2055 with only one display-finish-output in the event loop.
2057 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
2059 * clfswm-pager.lisp (pager-center-group): New function - center a
2060 group at the middle of the screen.
2062 * clfswm-pack.lisp (center-group): New function - center a group
2063 at the middle of the screen.
2065 * clfswm.lisp (show-group): Add a cross line under the group.
2066 (show-group): Group are showned even if fullscreened.
2067 (init-display): Add an exposure event on the root window.
2069 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
2071 * package.lisp (*default-group*): Default group is the same size
2072 of a fullscreened group.
2074 * bindings*: Use shift to move, control+shift to copy.
2076 * *.lisp: Add comments for configuration or alternatives. So grep
2077 for CONFIG to see where you can configure clfswm. And grep for
2078 Alternative to use some commented code.
2080 * clfswm.lisp (second-key-mode): Use a single window to show the
2081 second mode. See for alternatives at the end of this file.
2083 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
2085 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
2086 macro of key and mouse definitions.
2087 (define-define-key/mouse): Use state instead of modifiers list
2088 this fix a bug when the modifiers list is not in the rigth order.
2090 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
2092 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
2094 * clfswm-info.lisp (info-mode): Add an info mode.
2096 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
2098 * clfswm.lisp (process-new-window): Change border size for
2100 (show-all-windows-in-workspace): Unhide all windows even when the
2101 current group is in fullscreen mode.
2103 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
2105 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
2106 redisplay the identify window after a terminal switch.
2108 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
2109 redisplay the pager after a terminal switch.
2111 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
2113 * clfswm-util.lisp (identify-key): Add a window to display
2114 the keys to identify on screen.
2116 * bindings.lisp, bindings-pager.lisp: Define same keys to
2117 move/copy groups/windows in second mode and in pager.
2119 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
2121 (show-all-windows-in-workspace): unhide window before adapting it
2124 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
2126 * clfswm.lisp (handle-event): Revert to an older version.
2128 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
2130 * clfswm-util.lisp (force-window-in-group)
2131 (force-window-center-in-group): New functions for transient windows.
2133 * clfswm-pager.lisp (pager-remove-current-workspace/group):
2134 bugfix: hide all windows before removing group or workspace.
2136 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
2138 * bindings-pager.lisp (mouse-pager-move-selected-group)
2139 (mouse-pager-copy-selected-group)
2140 (mouse-pager-move-selected-window)
2141 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
2142 (mouse-pager-rotate-window-down): New functions to have mouse in
2145 * clfswm-pager.lisp (pager-swap-window)
2146 (pager-copy-group-on-next/previous-workspace)
2147 (pager-copy-window-on-next/previous-line): New functions
2149 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
2151 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
2152 (pager-move-group-on-next/previous-workspace): new functions.
2154 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
2155 to its half size (new functions).
2157 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
2159 * clfswm-pager.lisp: workspaces, groups and windows can now be
2160 selectionned with the keyboard or the mouse.
2162 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
2164 * clfswm-pager.lisp (pager-select-workspace-right/left):
2165 workspaces can now be selectionned with the keyboard.
2167 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
2169 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
2170 new function to remove a previous defined key or mouse combination.
2172 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
2174 * clfswm.lisp (main): Check for access error in init-display.
2176 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
2177 keycode before grabbing.
2179 * bindings.lisp: Remove nlambda and use defun to keep the function
2180 documentation with clisp.
2181 (define-shell): new macro to define shell command for the second
2184 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
2186 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
2189 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
2191 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
2192 workspace circulation.
2194 * clfswm-util.lisp (absorb-orphan-window): new function.
2196 * clfswm-keys.lisp: Keysyms support.
2198 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
2200 * clfswm.lisp (show-group): Use one gc for all groups and not one
2203 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
2205 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
2207 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
2208 width and height outside group.
2210 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
2212 * clfswm.lisp: First public release.