1 2012-04-30 Philippe Brochard <pbrochard@common-lisp.net>
3 * src/clfswm-internal.lisp: Big change to replace *current-root*
4 variable to support multiple root.
6 2012-04-18 Philippe Brochard <pbrochard@common-lisp.net>
8 * src/tools.lisp (add-new-hook, add-hook): New macro. Do not
9 duplicate hooks by default. Use add-new-hook if you want to
12 2012-04-16 Philippe Brochard <pbrochard@common-lisp.net>
14 * src/clfswm-corner.lisp (wait-window-in-query-tree): Add a limit
15 of try to wait the command window.
17 2012-02-25 Philippe Brochard <pbrochard@common-lisp.net>
19 * src/clfswm-util.lisp (place-frames-from-xrandr)
20 (swap-frame-geometry, rotate-frame-geometry): New helper functions
21 for multiple physical screen.
22 (jump-to-slot, add-frame-in-parent-frame): Change *current-root*
25 2012-01-18 Philippe Brochard <pbrochard@common-lisp.net>
27 * src/*.lisp: Use create-symbol and create-symbol-in-package
28 instead of the shorter symb. (Thanks Aad Versteden).
30 * src/bindings-second-mode.lisp (set-default-second-keys): New
31 key binding to set window and frame transparency.
33 * src/bindings.lisp (set-default-main-mouse): New mouse binding to
34 set window and frame transparency.
36 * src/clfswm-keys.lisp (define-keys): New macro to ease multiple
37 keys definitions. (Thanks Valentin Plechinger for the request).
39 * src/*.lisp: Add full transparency support with xcompmgr.
41 2012-01-14 Philippe Brochard <pbrochard@common-lisp.net>
43 * src/*.lisp: Add transparency support.
45 2012-01-09 Ales Guzik <ales.guzik@gmail.com>
47 * src/clfswm-layout.lisp (tile-layout-mix): New layout to
48 automatically choose between vertival and horizontal tile layout.
49 (tile-space-layout): Fix to have space between screen border and
50 frame the same as between frames.
52 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
54 * load.lisp: Support clisp 2.49+ module system to load CLX.
56 2012-01-04 Ales Guzik <ales.guzik@gmail.com>
58 * src/clfswm-layout.lisp (update-layout-managed-children-keep-position):
59 Fix an inattention error.
61 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
63 * src/xlib-util.lisp (with-xlib-protect): Protect from
64 xlib:lookup-error. This prevent an error in clisp/new-clx when
65 sometimes an xlib:colormap is expected instead of an xlib:window.
67 2012-01-03 Philippe Brochard <pbrochard@common-lisp.net>
69 * src/xlib-util.lisp (handle-event): Fix a clisp/new-clx error
70 when sometimes window slot of event-slots is a pixmap instead of a
73 2011-12-26 Philippe Brochard <pbrochard@common-lisp.net>
75 * src/clfswm-query.lisp: Fill the history list with a non-nil
78 2011-12-25 Philippe Brochard <pbrochard@common-lisp.net>
80 * src/package.lisp (make-x-drawable): Drawable wrapper to prevent
81 type error in some CLX versions.
82 Replace xlib:drawable-* functions with x-drawable-* equivalents
84 2011-12-14 Philippe Brochard <pbrochard@common-lisp.net>
86 * src/clfswm-util.lisp (um-create-xdg-section-list): Add at least
87 the 'Utility menu entry.
89 * src/config.lisp (*xdg-section-list*): moved to config.lisp.
91 * src/clfswm-util.lisp (update-menus): Set a default value for
92 searching .desktop files when XDG_DATA_DIRS is not set.
94 2011-10-15 Philippe Brochard <pbrochard@common-lisp.net>
96 * src/clfswm-internal.lisp (place-window-from-hints): Use
97 with-placement macro to place unmanaged windows in an arbitrary
100 2011-06-16 Philippe Brochard <pbrochard@common-lisp.net>
102 * src/clfswm-internal.lisp (clean-windows-in-all-frames): Prevent
103 current root and current child being equal to child.
105 2011-06-13 Philippe Brochard <pbrochard@common-lisp.net>
107 * src/keysyms.lisp: Repeat Page_Down/Up keysym definitions at the
108 end of the file to change keysyms priority.
110 2011-06-13 Sylvain HENRY <hsyl20@gmail.com>
112 * *.*: Minor spelling fix.
114 2011-06-12 Philippe Brochard <pbrochard@common-lisp.net>
116 * src/clfswm.lisp (:unmap-notify, :destroy-notify): Show all
117 children just after the xlib tree cleanup -> reduce the
118 flickering when a window is deleted or destroyed.
120 * src/clfswm-internal.lisp (process-existing-windows): Do not
121 process the notify window.
123 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
125 * *: **** Release 1106 ****
127 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
129 * src/clfswm-internal.lisp (clean-windows-in-all-frames): New
130 function to prevent xlib error when a window is deleted.
132 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
134 * src/clfswm-internal.lisp
135 (delete-child-and-children-in-all-frames): Delete or destroy
136 children before displaying all children.
138 2011-06-05 Philippe Brochard <pbrochard@common-lisp.net>
140 * src/clfswm-util.lisp (add-frame-in-parent-frame): New function
143 2011-06-04 Philippe Brochard <pbrochard@common-lisp.net>
145 * src/clfswm.lisp (main-unprotected): Destroy all frames windows
146 before closing the display (not really needed).
148 2011-06-02 Philippe Brochard <pbrochard@common-lisp.net>
150 * src/clfswm-layout.lisp (inc-tile-layout-size)
151 (dec-tile-layout-size, inc-slow-tile-layout-size)
152 (dec-slow-tile-layout-size): New functions and bindings.
154 2011-06-01 Philippe Brochard <pbrochard@common-lisp.net>
156 * src/clfswm-expose-mode.lisp (define-expose-letter-keys): Add
157 0..1 and A..Z keys to select a child in exposé mode.
159 * src/clfswm-internal.lisp (display-frame-info): Remove hidden
160 infos in frames windows.
162 * src/clfswm-util.lisp (ask-close/kill-current-window): Menu
165 2011-05-30 Philippe Brochard <pbrochard@common-lisp.net>
167 * src/clfswm-internal.lisp (get-parent-layout): Minor fullscreen
170 2011-05-29 Philippe Brochard <pbrochard@common-lisp.net>
172 * src/clfswm-internal.lisp
173 (delete-child-and-children-in-all-frames): Show all children
174 before deleting/destroying a windows, so prevent a flickering.
175 (get-parent-layout): Return the fullscreen size when the current
178 2011-05-28 Philippe Brochard <pbrochard@common-lisp.net>
180 * src/clfswm-internal.lisp (get-parent-layout): Handle correctly
183 * src/clfswm-util.lisp (delete-focus-window-generic): Do not hide
184 child before removing, so prevent a flickering.
186 * src/clfswm-internal.lisp (show-all-children): Rectangular
187 optimization to display only needed children.
188 (show-all-children): Remove flickering on
189 select-next/previous-brother.
191 2011-05-17 Philippe Brochard <pbrochard@common-lisp.net>
193 * src/clfswm-util.lisp (copy-focus-window, cut-focus-window): New
194 functions and ask-close/kill-current-window menu and bindings
197 2011-05-16 Philippe Brochard <pbrochard@common-lisp.net>
199 * src/clfswm-util.lisp (ask-close/kill-current-window): Add an
200 *ask-close/kill-placement* placement window variable.
202 2011-05-09 Philippe Brochard <pbrochard@common-lisp.net>
204 * contrib/osd.lisp (funcall-button-from-code): Display osd
205 documention for buttons and fix some redefining warnings.
207 2011-05-07 Philippe Brochard <pbrochard@common-lisp.net>
209 * src/clfswm-nw-hooks.lisp (make-permanent-nw-hook-frame): New
210 function. Prevent to add or delete a new window hook for this
213 * src/clfswm-layout.lisp (update-layout-managed-children-position):
216 2011-05-06 Philippe Brochard <pbrochard@common-lisp.net>
218 * src/bindings-second-mode.lisp (set-default-second-keys):
219 select-brother-spatial-move-* binding update.
221 * src/clfswm-layout.lisp (tile-left|right|top|bottom-layout): Ask
222 to keep children positions or not.
224 * src/clfswm-internal.lisp (fixe-real-size): Takes care of border
227 * src/clfswm-layout.lisp (update-layout-managed-children): Fix a
228 bug by using the parent frame instead of the current child.
230 * src/clfswm-circulate-mode.lisp
231 (select-brother-generic-spatial-move+right/left/up/down): New
232 function to select a brother from another in a spatial move.
234 2011-04-19 Philippe Brochard <pbrochard@common-lisp.net>
236 * src/clfswm-pack.lisp (move-frame-constrained)
237 (resize-frame-constrained): Use pixels instead of floating
240 2011-04-18 Philippe Brochard <pbrochard@common-lisp.net>
242 * src/clfswm-pack.lisp (resize-frame-constrained): Takes care of
244 (implode-frame, implode-current-frame): New functions. Absorb all
245 frames subchildren in frame. Explode frame opposite.
247 2011-04-17 Philippe Brochard <pbrochard@common-lisp.net>
249 * src/clfswm-pack.lisp (move-frame-constrained)
250 (resize-frame-constrained): New function. Move and resize frame
251 with the mouse constrained by other frame brothers.
253 2011-04-14 Philippe Brochard <pbrochard@common-lisp.net>
255 * src/clfswm-util.lisp (with-movement-select-next-brother)
256 (with-movement-select-previous-brother)
257 (with-movement-select-next-child): Use a simple method (do not
258 enter in the circulate mode) to allow to circulate in all children
261 * src/clfswm-menu.lisp (open-menu): Save info hash table keys
262 instead of deleting newly created keys.
264 2011-03-21 Philippe Brochard <pbrochard@common-lisp.net>
266 * src/clfswm-internal.lisp (x-px->fl, y-px->fl): Takes care of
269 2011-03-20 Philippe Brochard <pbrochard@common-lisp.net>
271 * src/clfswm-info.lisp (show-config-variable): call
272 produce-conf-var-doc.
274 2011-03-18 Philippe Brochard <pbrochard@common-lisp.net>
276 * src/clfswm-autodoc.lisp (produce-conf-var-doc-html): Produce a
277 documentation for all configurable variables in CLFSWM -
280 * src/clfswm-internal.lisp (leave-frame): Hide all children except
283 2011-03-16 Philippe Brochard <pbrochard@common-lisp.net>
285 * src/clfswm-autodoc.lisp (produce-all-docs): Produce a
286 documentation for all configurable variables in CLFSWM.
288 * src/clfswm-layout.lisp (set-gimp-layout): Display a notify
289 window with the help on the GIMP layout.
291 2011-03-12 Philippe Brochard <pbrochard@common-lisp.net>
293 * src/menu-def.lisp: Menu update to prevent cursor keys clash.
295 * clfswm.asd: Change compilation order to prevent undefined
298 * src/clfswm-internal.lisp (show-child(frame)): Handle properly
299 the show-root-frame-p parameter.
301 2011-03-11 Philippe Brochard <pbrochard@common-lisp.net>
303 * src/clfswm-util.lisp (move-frame, resize-frame): Do not move or
304 resize a frame when it's the current root.
306 2011-03-10 Philippe Brochard <pbrochard@common-lisp.net>
308 * src/clfswm-internal.lisp (show-all-children): Handle properly
309 duplicated child in multipe frames.
311 2011-03-09 Philippe Brochard <pbrochard@common-lisp.net>
313 * contrib/volume-mode.lisp (set-default-volume-keys): Add more
314 keybindings (up/down, right/left) to raise/lower the volume.
316 * src/clfswm-layout.lisp: Add a variable border size for frames
319 2011-03-08 Philippe Brochard <pbrochard@common-lisp.net>
321 * src/clfswm-util.lisp (cut-current-child, remove-current-child)
322 (delete-current-child): Hide the current child before doing the
325 * src/clfswm-internal.lisp (show-all-children): Hide windows not
326 in the current root before displaying those in current root.
327 Remove all hide-all unnecessary calls.
329 * src/clfswm-configuration.lisp (save-variables-in-conf-file):
330 Save only variables with a different value than their original
333 2011-03-07 Philippe Brochard <pbrochard@common-lisp.net>
335 * src/clfswm-info.lisp (show-config-variable): Use the new
338 * src/clfswm-autodoc.lisp (produce-configuration-variables): Use
339 the new defconfig method.
341 * src/clfswm-configuration.lisp (create-configuration-menu):
342 Change the config system with a more lispy one and a less string
343 based one: (defconfig name value group doc).
346 2011-03-06 Philippe Brochard <pbrochard@common-lisp.net>
348 * src/clfswm-internal.lisp (show-all-children): Simplify the
350 (show-child): Display an unmanaged window whe it's the current
352 (show-all-children): add the ability to display all child from
353 *root-frame* and hide all those who are not in *current-root*.
354 -> remove hide-all-children when needed.
356 * src/xlib-util.lisp (move-window,resize-window): Add a
357 *color-move-window* border when moving or resizing a window.
359 2011-03-04 Philippe Brochard <pbrochard@common-lisp.net>
361 * src/clfswm-internal.lisp (show-all-children): Perform only one
362 recusion on the clfswm tree: calculate geometry and place child in
365 2011-03-03 Philippe Brochard <pbrochard@common-lisp.net>
367 * src/clfswm-internal.lisp (show-all-children): Rethink of display
368 child order to prevent very annoying flickering.
370 2011-02-27 Philippe Brochard <pbrochard@common-lisp.net>
372 * src/clfswm-util.lisp (query-yes-or-no): New function.
374 * src/clfswm-configuration.lisp (reset-all-config-variables): New
375 function and menu entry.
376 (query-conf-value): Add the ability to leave the field blank to
377 reset the variable to its default value.
379 2011-02-26 Philippe Brochard <pbrochard@common-lisp.net>
381 * src/clfswm-configuration.lisp
382 (add-all-configuration-default-value): Add a default value to
383 configurable variables.
385 2011-02-23 Philippe Brochard <pbrochard@common-lisp.net>
387 * src/clfswm.lisp (main-unprotected): Create the configuration
388 menu only once at startup.
390 2011-02-22 Desmond O. Chang <dochang@gmail.com>
392 * contrib/amixer.lisp: Add a volume mode inspired by the emms
393 volume package. Alsa mixer interface.
395 * contrib/volume-mode.lisp: Add a volume mode inspired by the emms
398 2011-02-22 Desmond O. Chang <dochang@gmail.com>
400 * src/clfswm.lisp (main): Use ASDF:SYSTEM-SOURCE-DIRECTORY instead
401 of *LOAD-TRUENAME*. *LOAD-TRUENAME* is only bound during a call to
402 LOAD. If one eval CLFSWM:MAIN in repl, BASE-DIR will be an empty
403 string. Use ASDF:SYSTEM-SOURCE-DIRECTORY to fix it.
405 2011-02-16 Philippe Brochard <pbrochard@common-lisp.net>
407 * src/clfswm.lisp (main-unprotected): Add a close hook. And close
408 the notify window, the virtual keyboard and the clfswm terminal by
411 2011-02-15 Philippe Brochard <pbrochard@common-lisp.net>
413 * src/clfswm.lisp (main-unprotected): Destroy the notify window
414 before closing the display. This fix a bug when resetting/reloading
417 2011-02-12 Philippe Brochard <pbrochard@common-lisp.net>
419 * src/xlib-util.lisp (equal-wm-class-fun, equal-wm-name-fun)
420 (raise-window-fun, raise-and-focus-window-fun): New functions.
422 * src/config.lisp (*clfswm-terminal-cmd*): Switch from xterm to
424 (*never-managed-window-list*): Structure change to be more
425 flexible. Let the choice to focus, raise and do nothing on never
428 2011-02-09 Philippe Brochard <pbrochard@common-lisp.net>
430 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Take
431 care of never managed windows to move or resize them if the raise
434 * src/clfswm-internal.lisp (in-frame, in-window, in-child): New
437 2011-02-08 Philippe Brochard <pbrochard@common-lisp.net>
439 * src/clfswm.lisp (main-mode): Raise or not unmanaged windows
440 following request in *never-managed-window-list*.
442 2011-02-05 Philippe Brochard <pbrochard@common-lisp.net>
444 * *: **** Release 1102 ****
446 2011-02-05 Desmond O. Chang <dochang@gmail.com>
448 * src/keysyms.lisp: Add extended keysyms from stumpwm.
450 2011-02-01 Desmond O. Chang <dochang@gmail.com>
452 * src/clfswm-util.lisp (run-or-raise): New function (thanks to
455 * src/clfswm-internal.lisp (with-all-*): add a nil block.
457 2011-01-28 Desmond O. Chang <dochang@gmail.com>
459 * src/clfswm-util.lisp (xdg-config-home): XDG_CONFIG_HOME should
460 be $HOME/.config by default.
462 2010-12-29 Philippe Brochard <pbrochard@common-lisp.net>
464 * contrib/osd.lisp (display-doc): Add another method where a
465 CLFSWM native window is used to display the key documentation.
467 2010-12-27 Philippe Brochard <pbrochard@common-lisp.net>
469 * src/xlib-util.lisp (with-xlib-protect): Force to revert to the
472 2010-12-25 Philippe Brochard <pbrochard@common-lisp.net>
474 * src/clfswm-second-mode.lisp (second-key-mode): Call the second
475 mode leave function only when the generic mode was ended.
477 2010-12-08 Philippe Brochard <pbrochard@common-lisp.net>
479 * src/clfswm-second-mode.lisp (sm-leave-function): Do not use
480 *second-mode-program* anymore.
482 2010-12-07 Philippe Brochard <pbrochard@common-lisp.net>
484 * src/clfswm-second-mode.lisp (*second-mode-leave-function*): New
485 variable bound to a function executed (when not null) on second
488 2010-11-14 Philippe Brochard <pbrochard@common-lisp.net>
490 * src/clfswm-util.lisp (find-child-under-mouse): Do not find
493 2010-11-13 Philippe Brochard <pbrochard@common-lisp.net>
495 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
496 Do not display the accel window for unmanaged windows.
498 2010-11-11 Philippe Brochard <pbrochard@common-lisp.net>
500 * src/clfswm-internal.lisp (set-current-root): Handle
501 window-parent in set-current-root.
503 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
504 focus the parent child when the current root is a window.
506 2010-11-09 Philippe Brochard <pbrochard@common-lisp.net>
508 * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
509 New function an bindings.
511 * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
514 2010-11-07 Philippe Brochard <pbrochard@common-lisp.net>
516 * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
517 function to let the user choose to keep child position with
520 * src/clfswm-internal.lisp (remove-frame-data-slot): New
523 2010-11-05 Philippe Brochard <pbrochard@common-lisp.net>
525 * src/clfswm-internal.lisp (frame-select-next-child)
526 (frame-select-previous-child): New functions and bindings. Select
527 the next/previous child in the current frame.
529 2010-10-31 Philippe Brochard <pbrochard@common-lisp.net>
531 * src/clfswm-query.lisp (query-mode-complet): New function: Handle
532 completion in query-mode.
534 2010-10-30 Philippe Brochard <pbrochard@common-lisp.net>
536 * src/clfswm-query.lisp (query-print-string): Handle long lines
539 2010-10-27 Philippe Brochard <pbrochard@common-lisp.net>
541 * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
542 all characters are printable.
544 2010-10-25 Philippe Brochard <pbrochard@common-lisp.net>
546 * contrib/server/server.lisp: Load clfswm client code in the main
547 program and let the user start it with a --client command line
550 * src/package.lisp (*main-entrance-hook*): New hook executed after
551 loading configuration file and before opening the display.
553 2010-10-23 Philippe Brochard <pbrochard@common-lisp.net>
555 * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
557 * src/clfswm-internal.lisp (show-child): Show window only if not
560 * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
561 change modifiers after binding definition.
563 2010-10-21 Philippe Brochard <pbrochard@common-lisp.net>
565 * contrib/osd.lisp: New file: OSD (On Screen Display) for
568 * src/clfswm-menu.lisp (open-menu): Modularise function.
570 2010-10-13 Philippe Brochard <pbrochard@common-lisp.net>
572 * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
573 key binding in main and second mode.
575 2010-10-10 Philippe Brochard <pbrochard@common-lisp.net>
577 * src/clfswm-util.lisp (open-notify-window): Convert hello-window
578 functions to a more generic Notify-window system.
580 * src/tools.lisp (add-timer): Add an id to identify the timer.
582 2010-10-09 Philippe Brochard <pbrochard@common-lisp.net>
584 * src/tools.lisp (erase-timer): New function.
586 * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
587 the hello window. Add Configuration variables.
589 2010-10-08 Philippe Brochard <pbrochard@common-lisp.net>
591 * src/clfswm-util.lisp (): Add an Hello window at startup.
593 * src/tools.lisp (process-timers): Add a timer system.
595 2010-10-07 Philippe Brochard <pbrochard@common-lisp.net>
597 * src/clfswm-query.lisp (add-in-query-string): Handle correctly
600 2010-10-06 Philippe Brochard <pbrochard@common-lisp.net>
602 * src/clfswm-query.lisp (query-print-string): Change cursor color
603 and show parenthesis matching with colors (on match and on
606 2010-10-05 Philippe Brochard <pbrochard@common-lisp.net>
608 * src/clfswm-internal.lisp (show-all-children): Do not raise a
609 child when its parent is hidden.
611 2010-10-02 Philippe Brochard <pbrochard@common-lisp.net>
613 * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
614 possibility to circulate over subchild of the current child.
616 * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
617 (expose-windows-generic): Add an escape-body function to return to
618 the original state on escape key.
620 * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
621 to bind the current child from the configuration file.
623 2010-10-01 Philippe Brochard <pbrochard@common-lisp.net>
625 * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
626 window hook: the frame absorb all new windows that match
627 nw-absorb-test frame data slot.
629 2010-09-30 Philippe Brochard <pbrochard@common-lisp.net>
631 * src/clfswm-expose-mode.lisp (expose-create-window): Show window
632 title in accel window.
634 2010-09-29 Philippe Brochard <pbrochard@common-lisp.net>
636 * configure: Use the Xavier Maillard clfswm script in contrib to
637 build an executable in the standard way.
639 2010-09-26 Philippe Brochard <pbrochard@common-lisp.net>
641 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
642 New functions. Add a window on each child in the expose mode to
645 * src/clfswm-internal.lisp (child-x, child-y, child-width)
646 (child-height): New methods to get real child coordinates.
648 2010-09-25 Philippe Brochard <pbrochard@common-lisp.net>
650 * src/clfswm-layout.lisp (*-layout): Use child-position.
652 * src/clfswm-internal.lisp (child-position): New function.
654 * src/clfswm-expose-mode.lisp (expose-windows-mode)
655 (expose-all-windows-mode): Use a generic mode.
657 * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
658 with handle-event-fun symbols instead of inspecting clfswm
659 internals symbols on each mode change.
661 * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
662 a separate clfswm-expose-mode.lisp file.
664 * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
665 screen size instead of hardcoded test coordinates.
667 2010-09-24 Philippe Brochard <pbrochard@common-lisp.net>
669 * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
670 (speed-mouse-right, speed-mouse-up, speed-mouse-down)
671 (speed-mouse-undo, speed-mouse-first-history): New functions to
672 quickly move the mouse. Implemented for the second mode.
674 2010-09-16 Philippe Brochard <pbrochard@common-lisp.net>
676 * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
677 write permission on $clfswm_asd_path. So anybody can start clfswm
678 even if there is no write permission on the source directory.
680 2010-09-12 Philippe Brochard <pbrochard@common-lisp.net>
682 * contrib/clfswm: Add support to cmucl, ccl and ecl.
684 2010-09-11 Philippe Brochard <pbrochard@common-lisp.net>
686 * src/clfswm-util.lisp (set-hide-unmanaged-window)
687 (set-show-unmanaged-window, set-default-hide-unmanaged-window):
688 New functions and menu entry.
689 (set-globally-hide-unmanaged-window)
690 (set-globally-show-unmanaged-window): New functions and menu
693 * src/clfswm-internal.lisp (hide-unmanager-window-p): New
695 (show-child): Add a data slot on frame to hide or not unmanaged
698 * src/clfswm-corner.lisp (present-clfswm-terminal)
699 (present-virtual-keyboard): Use a function (generic-present-body)
700 instead of a macro (generate-present-body).
702 * src/clfswm-util.lisp (update-menus): List all directories and
703 subdirectories in $XDG_DATA_DIRS/applications.
705 2010-09-10 Philippe Brochard <pbrochard@common-lisp.net>
707 * src/clfswm-corner.lisp (generate-present-body): New macro.
708 (present-clfswm-terminal, present-virtual-keyboard): Use
709 generate-present-body.
711 2010-09-09 Philippe Brochard <pbrochard@common-lisp.net>
713 * src/clfswm-util.lisp (update-menus): Follow XDG specifications
714 instead of the non-portable Debian update-menu.
716 2010-09-07 Philippe Brochard <pbrochard@common-lisp.net>
718 * src/clfswm.lisp (error-handler): New function do handle
719 asynchronous errors and ignore them.
720 (open-display): Install the new error-handler on display.
722 2010-09-05 Philippe Brochard <pbrochard@common-lisp.net>
724 * src/xlib-util.lisp (with-xlib-protect): Add a
725 with-simple-restart on top of body execution.
727 2010-09-04 Philippe Brochard <pbrochard@common-lisp.net>
729 * src/clfswm.lisp (main-loop): Protect all xlib functions with an
732 * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
733 handle-event. Add a with-simple-restart to prevent a
734 clisp/new-lisp infinite loop.
736 2010-08-30 Philippe Brochard <pbrochard@common-lisp.net>
738 * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
739 clfswm terminal working even on xterm title changes.
741 2010-08-29 Philippe Brochard <pbrochard@common-lisp.net>
743 * src/clfswm-util.lisp (run-other-window-manager): Update for
746 * src/tools.lisp (do-execute): New parameter io to change the
749 * src/clfswm-util.lisp (hide-current-child): Prevent from removing
752 * src/clfswm-internal.lisp (child-member): New predicate.
753 (child-remove): New function.
755 * src/*.lisp: Use child-member and child-remove everywhere it's
758 2010-08-28 Philippe Brochard <pbrochard@common-lisp.net>
760 * src/clfswm.lisp (main-loop): Ensure that all events have been
761 processed after a process-event.
763 * src/clfswm-internal.lisp (is-in-current-child-p): New function.
765 2010-08-27 Philippe Brochard <pbrochard@common-lisp.net>
767 * src/clfswm.lisp (main-mode:configure-request): Raise the window
768 only when present on the current child and focus it accordingly.
770 2010-08-26 Philippe Brochard <pbrochard@common-lisp.net>
772 * src/clfswm-circulate-mode.lisp (circulate-loop-function):
773 Use is-a-key-pressed-p.
775 * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
777 * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
778 returned by xlib:keysym->keycodes.
780 * src/*.lisp: Use the new child-equal-p to compare children. This
781 prevent a bug with sbcl/cmucl when the standard equal function
782 does not work with xlib:window.
784 * src/clfswm-internal.lisp (child-equal-p): New predicate.
786 2010-08-25 Philippe Brochard <pbrochard@common-lisp.net>
788 * src/clfswm-generic-mode.lisp (generic-mode): Use an
789 xlib:event-listen before processing event with
790 xlib:process-event. This prevent a bug with CLX threaded
791 implementation like sbcl.
793 * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
794 processing event with xlib:process-event. This prevent a bug with
795 CLX threaded implementation like sbcl.
797 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
799 * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
801 * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
804 * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
805 (find-parent-frame, find-frame-window, find-frame-by-name)
806 (find-frame-by-number): Use with-find-in-all-frames to search in
807 frames in the right order.
809 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
810 unwanted flickering with unmanaged windows.
812 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
814 * src/package.lisp: Remove event handler hooks as they're not
815 needed anymore (To replace them: use closure and define-handler).
817 * src/xlib-util.lisp (move-window, resize-window)
818 (wait-mouse-button-release): Use a generic mode.
820 * src/*.lisp: Replace the case to handle event with a more (tricky)
821 lispy method which bind a function to each keywords associated
824 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
826 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
827 menu entry between delete-current-child and remove-current-child.
828 ie: Delete a child and its children in all frames by default.
830 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
832 * src/package.lisp: Add a placement configuration group.
834 * src/binding*.lisp: Bind control+g to escape the current action
837 * src/clfswm-internal.lisp
838 (delete-child-and-children-in-all-frames): New function and
839 binding: Second mode - Control+Delete delete the current child and
840 its children in all frames (ie: close the current child and its
843 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
845 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
846 the frame window and the frame gc. Close a very annoying bug when
847 cuting/pasting a frame or moving a child over frames with the
850 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
851 all children in *current-root* after moving/resizing a frame.
853 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
855 * src/clfswm-util.lisp (delete-focus-window)
856 (destroy-focus-window): Remove child in parent frame before
859 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
861 * src/clfswm-util.lisp (identify-key): Add a timeout in
863 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
864 of the window passed by xlib:process-event.
866 * src/xlib-util.lisp (move-window, resize-window)
867 (wait-mouse-button-release): Add a timeout in xlib:process-event.
869 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
871 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
872 to launch an other window manager and to return to clfswm.
874 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
876 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
879 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
881 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
884 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
885 parameter and a loop timeout.
887 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
889 * src/clfswm.lisp (main): Add an alternate configuration filename
892 * load.lisp: Add a debuging code example.
894 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
896 * src/clfswm-configuration.lisp (create-configuration-menu): New
897 menu to configure all clfswm variables while clfswm is running.
899 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
901 * src/clfswm-util.lisp (save-configuration-variables): New
902 function to save all configuration variables in clfswmrc.
904 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
906 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
908 (set-default-info-keys): Add cursor key support in info mode.
910 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
912 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
915 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
916 prevent reading the configuration file (this may be useful to
917 produce the original documentation without user modifications
918 with the rc configuration file).
920 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
922 * src/bindings-second-mode.lisp (set-default-second-keys):
923 Simplification of Escape key to close/kill/remove the focus window
924 and unhide all windows.
926 * src/bindings.lisp (set-default-main-keys): Simplification of
927 Escape key to close/kill/remove the focus window and unhide all
930 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
931 focus and unhide all windows capabilities.
933 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
935 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
937 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
939 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
940 Keep child order and don't make unnecessary child movement.
941 (one-column-layout, one-line-layout): New layouts.
943 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
945 * *: **** Release 0906 ****
947 * contrib/cd-player.lisp: New file to handle the CD player.
949 * contrib/xmms.lisp: New file to handle the xmms player.
951 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
953 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
954 Maximize windows in their frame - Leave frames to their actual
957 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
958 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
960 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
962 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
964 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
966 * contrib/mpd.lisp: Use a standard menu.
968 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
970 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
972 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
974 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
976 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
979 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
981 * src/config.lisp (get-fullscreen-size): One pixel adjustment
984 * src/clfswm-placement.lisp (*-child-placement): One pixel
987 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
989 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
990 Ensure that all characters are printable.
992 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
995 * src/clfswm-placement.lisp (*-child-placement): Adjust
996 coordinates to one pixel in the current child.
998 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1000 * src/clfswm-query.lisp (query-enter-function): Assign font before
1001 width and height calculation.
1003 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1005 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
1006 bannish the pointer in an arbitrary place.
1008 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
1009 place the info window in an arbitrary place.
1011 * src/clfswm-query.lisp (query-enter-function): Use with-placement
1012 macro to place the query window in an arbitrary place.
1014 * src/clfswm-placement.lisp: New file. Allow to place info windows
1015 or query windows on an arbitrary place. Allow to bannish the
1016 pointer on an arbitrary place.
1018 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
1020 * src/clfswm-circulate-mode.lisp (reorder-child)
1021 (reorder-brother): Unfocus windows before reordering children or
1024 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1026 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
1027 the parent is a frame.
1029 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
1030 motion with a default modifier.
1032 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
1035 * src/clfswm-info.lisp (info-mode): Handle motion with a default
1037 (info-mode): Optimization in loop function.
1039 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1041 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
1042 root-frame correctly.
1044 * clfswm.asd: Dependency fix for clfswm-generic-mode.
1046 * src/clfswm-circulate-mode.lisp (reorder-child)
1047 (reorder-brother): Handle empty frames.
1048 (reorder-brother): Redisplay only the parent frame of the current
1051 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
1052 parent frame of the current frame.
1054 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
1056 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
1057 Maximize/Unmaximize the current frame in its parent frame.
1059 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
1060 windows and frames in their parent frame.
1062 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1064 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
1066 * src/clfswm-circulate-mode.lisp (reorder-child)
1067 (reorder-brother): Reinitialise on circulate type change
1068 child to brother or brother to child.
1070 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
1071 calls xlib:display-finish-output on each map-request. So speed up
1074 * src/xlib-util.lisp (map-window): New function. Call
1075 xlib:display-finish-output on each map request.
1077 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1079 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
1080 Optimisation when drawing second mode window.
1082 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1084 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
1087 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1089 * src/clfswm-util.lisp (run-program-from-query-string): Launch
1090 command only with a return validation.
1092 2009-04-22 Xavier Maillard <xma@gnu.org>
1094 * src/clfswm-query.lisp (query-string): Use a generic mode.
1096 2009-04-19 Xavier Maillard <xma@gnu.org>
1098 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
1100 2009-04-18 Xavier Maillard <xma@gnu.org>
1102 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
1103 to define all other modes.
1105 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1107 * src/package.lisp (): Use *default-font-string* for all
1110 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
1112 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
1114 * src/xlib-util.lisp (null-size-window-p): Better check of null
1117 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
1119 * src/clfswm.lisp (handle-map-request): Add a fix to manage
1120 correctly fullscreen windows (SDL particularly).
1122 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
1124 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
1125 a segfault with clisp/new-clx.
1127 * src/clfswm.lisp (handle-motion-notify): Add a needed window
1130 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
1131 needed window argument.
1133 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
1135 * src/xlib-util.lisp (wait-no-key-or-button-press)
1136 (wait-a-key-or-button-press): Check buttons press/release correctly"
1138 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
1140 * src/menu-def.lisp: Add children navigation menu in the movement
1141 menu (select next/previous child/brother/level).
1143 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
1145 * *: Rename 'sister' frame to 'brother' frame.
1147 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
1148 alias in a real modifier.
1150 * src/package.lisp (*modifier-alias*): New list of modifier alias
1151 For example: :alt is :mod-1, :numlock is :mod-2...
1153 * src/tools.lisp (remove-hook): New function.
1155 * src/clfswm-keys.lisp (with-capslock, without-capslock)
1156 (with-numlock, without-cnumlock): New functions.
1158 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
1160 * src/clfswm-info.lisp: Use the *binding-hook* to create info
1161 keys and mouse bindings.
1163 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
1164 second keys and mouse bindings.
1166 * src/bindings.lisp: Use the *binding-hook* to create main keys
1169 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1171 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
1174 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
1176 * src/menu-def.lisp: Use a menu instead of a function for the
1179 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
1181 * src/clfswm-util.lisp (show-standard-menu): Display the standard
1182 menu from the 'update-menus' command.
1184 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
1186 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
1187 it's already grabbed.
1189 * src/clfswm-internal.lisp (display-frame-info): Use configurable
1190 colors and fix a bug with background.
1191 (display-frame-info): Set window background when displaying info.
1193 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1195 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
1196 warning with clisp/new-clx.
1198 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
1200 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
1203 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1205 * *: **** Release 0809 ****
1207 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1209 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
1211 (ensure-unique-number): New function and menu entry.
1213 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
1215 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
1216 hook: open the next window in a named frame.
1217 (numbered-frame-nw-hook): New new window hook: open the next
1218 window in a numbered frame.
1220 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
1221 cases. So query-string can be called even in the main mode.
1223 * src/clfswm-internal.lisp (show-all-children): Do not raise a
1224 child by default => far less flickering.
1226 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
1228 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
1230 * src/menu-def.lisp: Change key binding for the CLFSWM menu
1233 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
1234 is nil. (workaround on some CLX implementation).
1236 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
1238 * src/menu-def.lisp: Add a menu to set a focus policy for all
1241 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
1242 (all-frames-set-*-focus-policy): Set a focus policy for all
1245 * src/clfswm.lisp (handle-enter-notify): sloppy-select
1246 mode. Select a child and its parents on mouse over.
1248 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
1250 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
1251 policy -> Sloppy focus only for windows in the current frame.
1252 (main-unprotected): Exit clfswm on init error (ie: when another
1253 window manager is running).
1255 * src/clfswm-util.lisp (reset-clfswm): New function.
1257 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
1259 * src/clfswm-menu.lisp (init-menu): New function.
1261 * src/clfswm-util.lisp (reload-clfswm): New function to reload
1263 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
1265 * src/clfswm.lisp (main, main-unprotected): Handle error in a
1266 superior main function. Now CLFSWM can't break the X session. It
1267 just reinitialize the display and run a new main loop.
1269 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
1270 *vt-keyboard-on* global to avoid warnings when loading clfswm.
1272 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
1273 (help-on-gimp-layout): Describe how to use the GIMP layout.
1275 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
1277 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
1278 main-window-right-layout. Change the keybinding for (shift)alt+tab
1279 to not select windows in the main window lisst.
1280 Bind F8 to add a window in the main window list.
1281 Bind F9 to remove a window in the main window list.
1282 Change the focus policy to :sloppy.
1283 (set-previous-layout): Restore the previous layout, keybinding and
1286 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
1288 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
1290 * src/clfswm-layout.lisp (main-window-left-layout)
1291 (main-window-bottom-layout, main-window-top-layout): New
1293 Factorize layouts in menu.
1295 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
1297 * src/clfswm-layout.lisp (main-window-right-layout): A possible
1298 GIMP layout: one or more main windows on one side of the
1299 frame. Others on the other size.
1301 * src/clfswm-util.lisp
1302 (current-frame-set-click/sloppy-focus-policy): Each frame can have
1303 a different focus policy (one of :click or :sloppy).
1304 The default focus policy is set with *default-focus-policy*.
1306 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
1308 * src/clfswm-info.lisp (show-config-variable): New function.
1310 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
1312 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
1314 * src/clfswm-info.lisp: Colored help for key binding and corners
1317 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
1319 * src/clfswm-util.lisp (delete-focus-window)
1320 (destroy-focus-window): Remove chid only in
1321 handle-unmap/destroy-notify. Focus *current-root* only when
1322 closing/killing the current child.
1324 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
1325 functions or corners.
1327 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1329 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
1330 action: Hide/Unhide a terminal on mouse corner action. (By default
1331 right mouse button on the top left corner).
1333 * src/config.lisp (*never-managed-window-list*): New config
1336 * src/clfswm-internal.lisp (never-managed-window-p): New function:
1337 Handle never managed window in a more simple way.
1339 * src/clfswm-corner.lisp: New file and new and more simple method
1340 to define corners actions.
1342 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
1344 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
1346 * src/clfswm-layout.lisp (fast-layout-switch)
1347 (define-fast-layout-switch): New functions: Switch between two
1350 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
1351 really in the second mode. So leave-second-mode can be used even
1354 * src/clfswm-util.lisp (switch-to-last-child): New function:
1355 Store the current child and switch to the previous one.
1357 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1359 * src/clfswm-util.lisp (display-current-window-info): Display the
1361 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
1362 (top right by default). By default 'xvkbd' is used.
1364 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1366 * src/xlib-util.lisp (move-window, resize-window): Compress motion
1369 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
1371 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
1374 * src/clfswm-info.lisp (info-mode): Compress motion events.
1376 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
1378 * src/clfswm-internal.lisp (show-all-children): Compute geometry
1379 and selection first and then show only necessary children.
1380 (show-child): remove unneeded display-p parameter.
1382 * src/config.lisp (get-fullscreen-size): Place the frame border
1383 outside the screen (this prevent the loose of 2 pixels per
1386 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
1388 * src/clfswm-internal.lisp (focus-child): Algorithm change to
1389 raise only the selected child.
1391 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
1393 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
1394 Raise only viewable children.
1396 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
1398 * src/clfswm-internal.lisp (show-all-children): Always raise all
1399 displayed children. Remove all references to raise-p.
1401 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1403 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
1406 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
1407 second mode binding on raise/lower child in its frame.
1409 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
1410 behaviour to the new raise/lower property.
1411 Call clear-nw-hook before the rest of the hook.
1413 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
1414 (mouse-click-to-focus-and-resize-window): Stop button event. This
1415 prevent a keyboard/pointer freeze.
1417 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1419 * src/clfswm-internal.lisp (frame-lower-child)
1420 (frame-raise-child): New functions to raise/lower a child in its
1423 * src/clfswm-util.lisp (have-to-present-windows)
1424 (have-to-present-all-windows): New functions to have an MaxOS
1425 expose like on mouse click in screen corner.
1427 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
1429 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
1431 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
1432 child from a choice in all frames with hidden children.
1434 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
1436 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
1438 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
1439 (unhide-all-children): New functions.
1441 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
1444 * src/clfswm-util.lisp (hide/show-frame-window): new function and
1447 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
1449 * src/clfswm-util.lisp (rename-current-child): Do not display the
1450 frame info for a window.
1452 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
1454 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
1455 frame window for the removed child and its children.
1457 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
1459 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
1462 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
1464 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
1465 the ROX pinboard (ie: leave it lowered in the root window as
1468 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
1469 (tile-left-layout, tile-right-layout, tile-top-layout)
1470 (tile-bottom-layout): Use all the frame space when there is only
1473 * src/clfswm-internal.lisp (place-window-from-hints): Center
1474 unmanaged windows in the root screen.
1476 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
1479 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1481 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
1482 typo in managed types.
1484 * src/clfswm-internal.lisp (show-child): Always display frame info
1485 even if the frame is hidden.
1487 * src/xlib-util.lisp (resize-window): Use a better algorithme to
1490 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1492 * src/clfswm-util.lisp (with-movement): Display frame info for all
1493 frames in current root.
1495 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1497 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
1499 * src/bindings-second-mode.lisp (define-second-key #\a): New
1500 binding on 'add-default-frame'.
1502 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1503 message to follow the autodocumentation process.
1505 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1507 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1508 "Space" to jump to a child. "B" to bind a slot on the current
1511 * src/bindings-second-mode.lisp: Use "Tab" instead of
1514 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
1516 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1517 unmanaged (hidden) windows.
1519 * src/clfswm-internal.lisp (place-window-from-hints): Give a
1520 minimal size for windows.
1521 (with-all-windows-frames-and-parent): New function.
1523 * src/config.lisp (*default-window-width/height*): New parameters.
1525 * src/clfswm-internal.lisp (place-window-from-hints): Center
1526 windows in the screen instead of in their frame.
1528 * src/bindings-second-mode.lisp (tile-space-current-frame): New
1531 * src/clfswm-layout.lisp (register-layout): Intern the once name
1532 in the right package.
1534 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1536 * doc/dot-clfswmrc: Update to follow the new clfswm way.
1538 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
1540 * src/clfswm-internal.lisp (set-current-child)
1541 (adapt-child-to-parent, show-child, hide-child): Handle the case
1542 where child is not a frame or a window.
1544 * src/clfswm-util.lisp
1545 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1546 Check if child is a frame.
1548 * src/clfswm-internal.lisp (managed-window-p): Handle the case
1549 where frame is null.
1550 (place-frame): Check if frame and parent are frames.
1552 * src/clfswm-info.lisp (info-mode): display all frame info before
1555 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1556 info before leaving.
1558 * src/clfswm-internal.lisp (display-all-frame-info): New function.
1560 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
1562 * src/tools.lisp (getenv): Implemented for ECL.
1563 (urun-prog): Implemented for ECL.
1565 * src/clfswm-util.lisp (identify-key): Use a double buffer to
1568 * src/clfswm-query.lisp (query-string): Use a double buffer to
1571 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1574 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1577 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
1579 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1581 * src/menu-def.lisp: New file: move all menu definition in
1584 * src/clfswm-layout.lisp (register-layout): Use a function instead
1587 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
1589 * src/clfswm-autodoc.lisp (produce-menu-doc,
1590 (produce-menu-doc-html): New functions.
1591 (produce-doc-*): Moved to clfswm-autodoc.lisp.
1593 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1594 paste a child on one of its own children. (this prevent a
1596 (move-child-to): Rename move/copy-current-child-by to
1598 (mouse-move-window-over-frame): New function to move the window
1599 under the mouse cursor to another frame.
1601 * src/clfswm-internal.lisp (find-child-in-parent): New function.
1603 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1605 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1606 windows only when its window parent is the current child.
1608 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1610 * src/clfswm-util.lisp (manage-current-window)
1611 (unmanage-current-window): New functions: Allow to force to manage
1612 or unmanage a window by its parent frame.
1614 * src/bindings-second-mode.lisp (#\o): binded to
1615 set-open-in-new-frame-in-parent-frame-nw-hook and
1616 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1618 * src/clfswm-util.lisp (with-current-window): New macro.
1620 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1621 exposure and enter-window handle event.
1623 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1624 children for the current child after the move/resize.
1626 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1628 * src/xlib-util.lisp (resize-window): Take care of window size
1631 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1632 move/resize unmanaged windows.
1634 * src/xlib-util.lisp (move-window, resize-window): New functions.
1636 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1638 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1639 user choose what window type the current frame must handle.
1640 (display-current-window-info): New function.
1641 (current-frame-manage-all-window-type)
1642 (current-frame-manage-only-normal-window-type)
1643 (current-frame-manage-no-window-type): New functions.
1645 * src/clfswm-internal.lisp (managed-window-p): New function.
1647 * src/package.lisp (frame): Managed type: new frame
1648 parameter. This allow to choose what window type a frame must
1651 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1653 * src/clfswm-nw-hooks.lisp
1654 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1656 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1659 * src/tools.lisp (ensure-printable): Return always a string even
1662 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
1664 * src/config.lisp (*default-nw-hook*): New variable to change the
1665 default new window hook.
1667 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1669 * clfswm.asd (clfswm): Add a dependency from
1670 clfswm-second-mode.lisp to clfswm.lisp.
1672 * src/clfswm-util.lisp (identify-key): Show the documentation for
1673 the function bound on a key.
1674 (with-movement): Move with-movement,
1675 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
1676 to clfswm-util.lisp.
1678 * src/clfswm-menu.lisp: New menu system that let user change keys
1679 or functions associated to keys.
1681 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
1683 * src/clfswm-internal.lisp (show-all-children): Display-child is
1684 the first child by default. Solve a bug with father-p.
1686 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
1688 * src/clfswm-internal.lisp (add-frame): Add frame return the
1690 (show-all-children): Move the size computation outside the
1693 * src/bindings-second-mode.lisp (with-movement): Redisplay only
1696 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1697 only the current child.
1699 * src/clfswm-internal.lisp (show-all-children): New display-child
1700 parameter to display only the desired child and its children.
1701 (select-next/previous-child): Only display the current child.
1703 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
1705 * src/clfswm.lisp (init-display): Move the default frame creation
1706 on the default init hook.
1708 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1709 the main mode (for example: "1" on an azerty keyboard).
1711 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
1713 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1714 keysyms. Revert to old grabbing method for the main mode.
1716 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
1718 * src/clfswm.lisp (init-display): Add key handling on no focus
1719 window and on frame windows.
1721 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1723 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1724 all keys by default and replay just what is needed. No change for
1727 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1728 (find-key-from-code): Test for shift and not shift presence.
1730 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
1732 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1733 new key parameter to have less flickering.
1735 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
1737 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1738 layout only one time and revert to no-layout to freely handle
1741 * src/clfswm-nw-hooks.lisp
1742 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1743 with new created window.
1745 * src/clfswm-layout.lisp (register-layout): Now register
1746 automatically a once layout to set the layout only one time and
1747 revert to no-layout to freely handle frames.
1749 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1751 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1752 nw-hook: Open the next window in the current frame and leave the
1753 focus to the current child.
1755 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
1757 * src/bindings-second-mode.lisp: Add keys definitions to
1758 bind-or-jump in the second mode.
1760 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
1761 macro for bind-or-jump-(1|2|3...).
1763 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
1764 arguments to function. This allow to do things like:
1765 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
1766 are passed to my-function on key press.
1768 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
1770 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
1772 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
1774 * src/clfswm-internal.lisp (child-fullname): New function
1776 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
1777 docstring in info-mode-menu. An item can be
1778 '((key function) (key function)) or with docstring
1779 '((key function "documentation 1") (key function "bla bla") (key function))
1781 * src/tools.lisp (ensure-n-elems): New function.
1783 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
1784 resize a frame or the window's father.
1786 * src/clfswm.lisp (init-display): Remove tile-space-layout by
1787 default on the root frame.
1789 * src/clfswm-util.lisp (move/resize-frame): Add standard event
1790 hooks handlers (map-request, configure-notify...)
1792 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
1795 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1797 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
1798 or the window's father.
1800 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
1801 event only if there is a geometry change.
1802 (mouse-focus-move/resize-generic): Generic function to move or
1803 resize a frame or a window father frame.
1805 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1807 * src/clfswm-internal.lisp (show-all-children): Return t if there
1808 is a geometry change.
1810 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
1812 * src/bindings.lisp (Up/Down): Swap select previous/next level.
1814 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
1816 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
1818 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
1819 (with-all-*): Reverse the child list to manage the first child last (like in
1822 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
1823 root window only if true.
1825 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
1826 root window only if *create-frame-on-root* is true.
1828 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
1831 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
1833 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
1834 the current child (even if it's a window).
1836 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
1838 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
1839 (mouse-click-to-focus-and-resize): New functions.
1841 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
1842 (*-px->fl): Convert pixel coordinates to float.
1844 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
1846 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
1848 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
1851 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
1852 and hide-all-children.
1853 (raise-if-needed): New function.
1854 (show-child): Use a first-p parameter to raise windows only when they are
1857 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
1859 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
1862 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
1864 * src/clfswm-info.lisp (keys-from-list): new function.
1866 * src/*: rename 'childs' in 'children'.
1868 * src/*: rename 'group' in 'frame'.
1870 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
1872 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
1874 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
1876 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
1878 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
1880 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
1881 Bind control+o to open the next window in a new group in the root group
1882 (as open in next window in a new workspace in 0801 version).
1884 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
1886 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
1889 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
1891 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
1892 instead of Tab for select-previous-child.
1894 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
1896 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
1899 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
1901 * clfswm-util.lisp (identify-key): Display the documentation
1902 associated to keys when identifying a key.
1904 2008-03-10 Xavier Maillard <xma@gnu.org>
1906 * contrib/clfswm: Complete rewrite of the script. Detect error and
1907 act accordingly. Add command line arguments to configure the
1908 script execution. User can now choose different common lisp
1909 implementation (clisp and sbcl only), choose where to store the
1910 dumped image, where to find clfswm source.
1912 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
1914 * clfswm-internal.lisp (process-new-window): Beginning of new
1915 window hook: each group have a hook to tell what he wants to do
1916 with the new created window.
1918 2008-03-08 Xavier Maillard <xma@gnu.org>
1920 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
1921 call the resulting executable.
1923 * clfswm.lisp (read-conf-file): Check for the user config file in
1924 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
1925 prefered whenever possible.
1927 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
1929 * clfswm-layout.lisp (*-layout): Add an optional raise-p
1930 parameter in each layout.
1932 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
1934 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
1936 (copy/move-current-child-by-name/number): new functions
1937 (focus-group-by-name/number): new functions
1938 (delete-group-by-name/number): new functions
1940 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
1942 * ************************************************************ *
1943 *: Major update - No more reference to workspaces. The main *
1944 structure is a tree of groups or application windows. *
1945 * ************************************************************ *
1947 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
1949 * clfswm.lisp (read-conf-file): Read configuration in
1950 $HOME/.clfswmrc or in /etc/clfswmrc or in
1951 $XDG_CONFIG_HOME/clfswm/clfswmrc.
1952 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
1955 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
1957 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
1960 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
1962 * clfswm-internal.lisp (find-window-group): New function.
1964 * clfswm*: Change to make clfswm run with clisp/new-clx.
1966 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
1968 * clfswm-util.lisp (query-show-paren): Add show parent matching in
1970 (query-string): Bind control+k to delete end of line.
1972 * clfswm-second-mode.lisp (draw-second-mode-window): Display
1973 the action on mouse motion in second mode.
1975 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
1976 event but do not clear the root window.
1977 (handle-configure-request): Adjust unmanaged window from their
1980 * clfswm-internal.lisp (process-new-window): Adjust new window
1981 with the specified hints (max/min/base width/height).
1983 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
1985 * clfswm.lisp (handle-configure-request): Send an Configuration
1986 Notify event. This solve a bug with xterm and rxvt who takes some
1987 times to be mapped. Now there is no delay.
1989 * bindings-second-mode.lisp (define-shell): Run programs after
1990 living the second mode.
1992 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
1994 * clfswm-internal.lisp (process-new-window): Do not crop transient
1995 window to group size.
1996 (adapt-window-to-group): Do not crop transient window to group
1999 * clfswm.lisp (handle-configure-request): Adapt just the window to
2000 its group and don't take care of the configure request. Remove the
2001 bug with the Gimp outside the group and speed up the window
2003 (handle-exposure): Remove show-all-group on exposure event
2006 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
2008 * clfswm-util.lisp (circulate-group-up-copy-window)
2009 (circulate-group-down-copy-window)
2010 (circulate-workspace-up-copy-group)
2011 (circulate-workspace-down-copy-group): Prevent the copy of the
2012 same window in the same workspace.
2014 * bindings-second-mode.lisp (release-copy-selected-window)
2015 (release-copy-selected-group): Prevent the copy of the same window
2016 in the same workspace.
2018 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
2019 (generic-pager-move-window-on-next-line): Remove the copy
2021 (generic-pager-move-group-on-next-workspace)
2022 (generic-pager-move-group-on-previous-workspace): Prevent the copy
2023 of the same window in the same workspace.
2025 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
2026 (mouse-pager-copy-selected-group-release): Prevent the copy of the
2027 same window in the same workspace.
2029 * tools.lisp (setf/=): new macro to set a variable only when
2032 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
2033 x, y... only when necessary.
2035 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
2037 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
2038 new function and hook: force windows to stay in its group (solve a
2041 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
2043 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
2044 less flickering when moving/resizing groups.
2046 * clfswm-internal.lisp (hide-group): new function.
2047 (show-all-group): clear-all: new parameter.
2049 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
2051 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
2053 * clfswm*: Color change for the pager. Typo or better description
2054 in bindings definitions. Define bindings for a qwerty keyboard by
2055 default. dot-clfswmrc show examples to switch to an azerty
2057 License change to GPL v3.
2058 * config.lisp: new file - group all globals variables in this
2061 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
2063 * xlib-util.lisp (hide-window): Remove structure-notivy events
2064 when hidding a window.
2066 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
2068 * package.lisp (*sm-property-notify-hook*): Readded
2069 property-notify-hook in second mode.
2071 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
2073 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
2075 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
2077 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
2078 Tile the current workspace with the current window on one side and
2079 others on the other (this emulate the larswm, dwm, wmii way). See
2080 the default configuration file to enable this mode by default.
2082 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
2085 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
2087 * clfswm-pager.lisp (pager-draw-window-in-group): Add
2088 ensure-printable to print windows name even with non-ascii
2091 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
2093 * clfswm-pager.lisp (pager-explode-current-group): Create a new
2094 group for each window in group.
2095 (pager-implode-current-group): Move all windows in workspace to
2096 one group and remove other groups.
2098 * clfswm-pack.lisp (explode-group): Create a new group for each
2100 (implode-group): Move all windows in workspace to one group and
2101 remove other groups.
2103 * clfswm-util.lisp (identify-key): Remove local configuration
2104 variables and made them available for configuration from
2106 (query-string): idem.
2108 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
2110 * netwm-util.lisp: Start of NetWM compliance.
2111 Add a Netwm client list gestion.
2113 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
2115 * clfswm-internal.lisp (create-group-on-request): open a new group
2116 only when the current group is not empty.
2118 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
2119 bug with null workspace.
2121 * clfswm-pager.lisp (pager-handle-event): Add a hook
2122 system. This hooks can be changed in the user configuration file.
2124 * package.lisp: All colors and font variables are set in
2125 package.lisp and can be configured in the user configuration
2127 Note: If you have configured some less ugly colors (esp. for the
2128 pager) don't hesitate to let me know :)
2130 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
2131 system. This hooks can be changed in the user configuration file.
2133 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
2134 changed in the user configuration file (~/.clfswmrc)
2136 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
2138 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
2139 arrow action, open next window in new workspace/group.
2141 * bindings.lisp (stop-all-pending-actions): new binding.
2142 (open-next-window-in-new-group-once): Open the next windows in a
2143 new group (only once) or open all new windows in a new group (like
2144 others windows managers).
2146 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
2148 * clfswm.lisp (read-conf-file): New function to read a lisp
2149 configuration file at startup.
2150 (focus-group-under-mouse): Check if group isn't the current group
2151 ( prevent a bug with unclutter ).
2153 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
2155 * bindings.lisp (run-program-from-query-string): A program can be
2156 launch from a input query window.
2158 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
2160 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
2162 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
2164 * clfswm.lisp (process-new-window): One can now open the next
2165 window in a workspace called by its number.
2167 * clfswm-util.lisp (query-font-string): Minimal editing
2169 (eval-from-string): And an REPL in the window manager... :)
2171 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2173 * clfswm.lisp (process-new-window): One can now open the next
2174 window in a new workspace or a new group.
2176 * clfswm-pager.lisp (pager-mode): Display the next arrow action
2177 with the hidden windows.
2179 * clfswm.lisp (second-key-mode): Display the current workspace
2180 number and the next arrow action in the state window.
2182 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
2183 the pager mode and then redisplay only the current workspace.
2185 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
2187 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
2188 they can be focused with a keypress, sorted or renumbered.
2190 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2192 * clfswm-pager.lisp (pager-mode): Remove multiple silly
2193 pager-draw-display. This prevent a lot of flickering in the
2196 * clfswm.lisp: Remove all display-force-output and replace them
2197 with only one display-finish-output in the event loop.
2199 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
2201 * clfswm-pager.lisp (pager-center-group): New function - center a
2202 group at the middle of the screen.
2204 * clfswm-pack.lisp (center-group): New function - center a group
2205 at the middle of the screen.
2207 * clfswm.lisp (show-group): Add a cross line under the group.
2208 (show-group): Group are showned even if fullscreened.
2209 (init-display): Add an exposure event on the root window.
2211 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
2213 * package.lisp (*default-group*): Default group is the same size
2214 of a fullscreened group.
2216 * bindings*: Use shift to move, control+shift to copy.
2218 * *.lisp: Add comments for configuration or alternatives. So grep
2219 for CONFIG to see where you can configure clfswm. And grep for
2220 Alternative to use some commented code.
2222 * clfswm.lisp (second-key-mode): Use a single window to show the
2223 second mode. See for alternatives at the end of this file.
2225 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
2227 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
2228 macro of key and mouse definitions.
2229 (define-define-key/mouse): Use state instead of modifiers list
2230 this fix a bug when the modifiers list is not in the rigth order.
2232 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
2234 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
2236 * clfswm-info.lisp (info-mode): Add an info mode.
2238 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
2240 * clfswm.lisp (process-new-window): Change border size for
2242 (show-all-windows-in-workspace): Unhide all windows even when the
2243 current group is in fullscreen mode.
2245 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
2247 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
2248 redisplay the identify window after a terminal switch.
2250 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
2251 redisplay the pager after a terminal switch.
2253 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
2255 * clfswm-util.lisp (identify-key): Add a window to display
2256 the keys to identify on screen.
2258 * bindings.lisp, bindings-pager.lisp: Define same keys to
2259 move/copy groups/windows in second mode and in pager.
2261 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
2263 (show-all-windows-in-workspace): unhide window before adapting it
2266 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
2268 * clfswm.lisp (handle-event): Revert to an older version.
2270 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
2272 * clfswm-util.lisp (force-window-in-group)
2273 (force-window-center-in-group): New functions for transient windows.
2275 * clfswm-pager.lisp (pager-remove-current-workspace/group):
2276 bugfix: hide all windows before removing group or workspace.
2278 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
2280 * bindings-pager.lisp (mouse-pager-move-selected-group)
2281 (mouse-pager-copy-selected-group)
2282 (mouse-pager-move-selected-window)
2283 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
2284 (mouse-pager-rotate-window-down): New functions to have mouse in
2287 * clfswm-pager.lisp (pager-swap-window)
2288 (pager-copy-group-on-next/previous-workspace)
2289 (pager-copy-window-on-next/previous-line): New functions
2291 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
2293 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
2294 (pager-move-group-on-next/previous-workspace): new functions.
2296 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
2297 to its half size (new functions).
2299 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
2301 * clfswm-pager.lisp: workspaces, groups and windows can now be
2302 selectionned with the keyboard or the mouse.
2304 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
2306 * clfswm-pager.lisp (pager-select-workspace-right/left):
2307 workspaces can now be selectionned with the keyboard.
2309 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
2311 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
2312 new function to remove a previous defined key or mouse combination.
2314 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
2316 * clfswm.lisp (main): Check for access error in init-display.
2318 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
2319 keycode before grabbing.
2321 * bindings.lisp: Remove nlambda and use defun to keep the function
2322 documentation with clisp.
2323 (define-shell): new macro to define shell command for the second
2326 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
2328 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
2331 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
2333 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
2334 workspace circulation.
2336 * clfswm-util.lisp (absorb-orphan-window): new function.
2338 * clfswm-keys.lisp: Keysyms support.
2340 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
2342 * clfswm.lisp (show-group): Use one gc for all groups and not one
2345 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
2347 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
2349 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
2350 width and height outside group.
2352 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
2354 * clfswm.lisp: First public release.