1 2012-06-18 Philippe Brochard <pbrochard@common-lisp.net>
3 * src/clfswm-placement.lisp: Each child can have its own border
4 size. New binding to change the child border size on the fly.
6 2012-06-08 Philippe Brochard <pbrochard@common-lisp.net>
8 * src/tools.lisp (process-timers): Call get-internal-real-time
9 only once for all times.
11 2012-06-07 Philippe Brochard <pbrochard@common-lisp.net>
13 * contrib/toolbar.lisp (define-toolbar-hooks): Add auto-hide
15 (define-toolbar-hooks): Add auto-hide toolbar (show/hide on mouse
18 2012-06-06 Philippe Brochard <pbrochard@common-lisp.net>
20 * src/xlib-util.lisp (handle-event): Add an additional hook event
21 system to handle events in contrib code.
23 2012-06-03 Philippe Brochard <pbrochard@common-lisp.net>
25 * src/clfswm-placement.lisp: Add an optional border size in all
28 2012-05-30 Philippe Brochard <pbrochard@common-lisp.net>
30 * contrib/toolbar.lisp (clock): Add a clock module.
32 2012-05-28 Philippe Brochard <pbrochard@common-lisp.net>
34 * contrib/toolbar.lisp: begining of toolbar support.
36 2012-05-24 Philippe Brochard <pbrochard@common-lisp.net>
38 * src/clfswm-internal.lisp (rotate-root-geometry): Do not use
39 rotatef but a simpler algorithm.
41 2012-05-19 Philippe Brochard <pbrochard@common-lisp.net>
43 * src/clfswm-placement.lisp: Adjust width and height in child and
44 root placement to prevent too big child size.
46 2012-05-18 Philippe Brochard <pbrochard@common-lisp.net>
48 * src/clfswm-placement.lisp: New root placement possibility.
50 * src/clfswm-util.lisp (change-current-root-geometry): New
53 2012-05-17 Philippe Brochard <pbrochard@common-lisp.net>
55 * src/clfswm-util.lisp (exchange-root-geometry-with-mouse): New
58 2012-05-16 Philippe Brochard <pbrochard@common-lisp.net>
60 * src/menu-def.lisp: New root menu.
62 2012-05-15 Philippe Brochard <pbrochard@common-lisp.net>
64 * src/clfswm-circulate-mode.lisp (rotate-root-geometry-next)
65 (rotate-root-geometry-previous): New second mode binding to change
68 2012-05-13 Philippe Brochard <pbrochard@common-lisp.net>
70 * src/clfswm-internal.lisp: Remove the *current-child* variable
71 and use a setfable function (current-child) instead.
72 (current-child-setter): Store root current child before apllying
75 2012-05-09 Philippe Brochard <pbrochard@common-lisp.net>
77 * src/clfswm-internal.lisp: Use xdpyinfo/xinerama informations
78 instead of xrandr informations.
80 2012-05-06 Philippe Brochard <pbrochard@common-lisp.net>
82 * src/clfswm-internal.lisp : Use only one list for root
84 (*root*): Root management API simplification.
86 2012-04-30 Philippe Brochard <pbrochard@common-lisp.net>
88 * src/clfswm-internal.lisp: Big change to replace *current-root*
89 variable to support multiple root.
91 2012-04-18 Philippe Brochard <pbrochard@common-lisp.net>
93 * src/tools.lisp (add-new-hook, add-hook): New macro. Do not
94 duplicate hooks by default. Use add-new-hook if you want to
97 2012-04-16 Philippe Brochard <pbrochard@common-lisp.net>
99 * src/clfswm-corner.lisp (wait-window-in-query-tree): Add a limit
100 of try to wait the command window.
102 2012-02-25 Philippe Brochard <pbrochard@common-lisp.net>
104 * src/clfswm-util.lisp (place-frames-from-xrandr)
105 (swap-frame-geometry, rotate-frame-geometry): New helper functions
106 for multiple physical screen.
107 (jump-to-slot, add-frame-in-parent-frame): Change *current-root*
110 2012-01-18 Philippe Brochard <pbrochard@common-lisp.net>
112 * src/*.lisp: Use create-symbol and create-symbol-in-package
113 instead of the shorter symb. (Thanks Aad Versteden).
115 * src/bindings-second-mode.lisp (set-default-second-keys): New
116 key binding to set window and frame transparency.
118 * src/bindings.lisp (set-default-main-mouse): New mouse binding to
119 set window and frame transparency.
121 * src/clfswm-keys.lisp (define-keys): New macro to ease multiple
122 keys definitions. (Thanks Valentin Plechinger for the request).
124 * src/*.lisp: Add full transparency support with xcompmgr.
126 2012-01-14 Philippe Brochard <pbrochard@common-lisp.net>
128 * src/*.lisp: Add transparency support.
130 2012-01-09 Ales Guzik <ales.guzik@gmail.com>
132 * src/clfswm-layout.lisp (tile-layout-mix): New layout to
133 automatically choose between vertival and horizontal tile layout.
134 (tile-space-layout): Fix to have space between screen border and
135 frame the same as between frames.
137 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
139 * load.lisp: Support clisp 2.49+ module system to load CLX.
141 2012-01-04 Ales Guzik <ales.guzik@gmail.com>
143 * src/clfswm-layout.lisp (update-layout-managed-children-keep-position):
144 Fix an inattention error.
146 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
148 * src/xlib-util.lisp (with-xlib-protect): Protect from
149 xlib:lookup-error. This prevent an error in clisp/new-clx when
150 sometimes an xlib:colormap is expected instead of an xlib:window.
152 2012-01-03 Philippe Brochard <pbrochard@common-lisp.net>
154 * src/xlib-util.lisp (handle-event): Fix a clisp/new-clx error
155 when sometimes window slot of event-slots is a pixmap instead of a
158 2011-12-26 Philippe Brochard <pbrochard@common-lisp.net>
160 * src/clfswm-query.lisp: Fill the history list with a non-nil
163 2011-12-25 Philippe Brochard <pbrochard@common-lisp.net>
165 * src/package.lisp (make-x-drawable): Drawable wrapper to prevent
166 type error in some CLX versions.
167 Replace xlib:drawable-* functions with x-drawable-* equivalents
169 2011-12-14 Philippe Brochard <pbrochard@common-lisp.net>
171 * src/clfswm-util.lisp (um-create-xdg-section-list): Add at least
172 the 'Utility menu entry.
174 * src/config.lisp (*xdg-section-list*): moved to config.lisp.
176 * src/clfswm-util.lisp (update-menus): Set a default value for
177 searching .desktop files when XDG_DATA_DIRS is not set.
179 2011-10-15 Philippe Brochard <pbrochard@common-lisp.net>
181 * src/clfswm-internal.lisp (place-window-from-hints): Use
182 with-placement macro to place unmanaged windows in an arbitrary
185 2011-06-16 Philippe Brochard <pbrochard@common-lisp.net>
187 * src/clfswm-internal.lisp (clean-windows-in-all-frames): Prevent
188 current root and current child being equal to child.
190 2011-06-13 Philippe Brochard <pbrochard@common-lisp.net>
192 * src/keysyms.lisp: Repeat Page_Down/Up keysym definitions at the
193 end of the file to change keysyms priority.
195 2011-06-13 Sylvain HENRY <hsyl20@gmail.com>
197 * *.*: Minor spelling fix.
199 2011-06-12 Philippe Brochard <pbrochard@common-lisp.net>
201 * src/clfswm.lisp (:unmap-notify, :destroy-notify): Show all
202 children just after the xlib tree cleanup -> reduce the
203 flickering when a window is deleted or destroyed.
205 * src/clfswm-internal.lisp (process-existing-windows): Do not
206 process the notify window.
208 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
210 * *: **** Release 1106 ****
212 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
214 * src/clfswm-internal.lisp (clean-windows-in-all-frames): New
215 function to prevent xlib error when a window is deleted.
217 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
219 * src/clfswm-internal.lisp
220 (delete-child-and-children-in-all-frames): Delete or destroy
221 children before displaying all children.
223 2011-06-05 Philippe Brochard <pbrochard@common-lisp.net>
225 * src/clfswm-util.lisp (add-frame-in-parent-frame): New function
228 2011-06-04 Philippe Brochard <pbrochard@common-lisp.net>
230 * src/clfswm.lisp (main-unprotected): Destroy all frames windows
231 before closing the display (not really needed).
233 2011-06-02 Philippe Brochard <pbrochard@common-lisp.net>
235 * src/clfswm-layout.lisp (inc-tile-layout-size)
236 (dec-tile-layout-size, inc-slow-tile-layout-size)
237 (dec-slow-tile-layout-size): New functions and bindings.
239 2011-06-01 Philippe Brochard <pbrochard@common-lisp.net>
241 * src/clfswm-expose-mode.lisp (define-expose-letter-keys): Add
242 0..1 and A..Z keys to select a child in exposé mode.
244 * src/clfswm-internal.lisp (display-frame-info): Remove hidden
245 infos in frames windows.
247 * src/clfswm-util.lisp (ask-close/kill-current-window): Menu
250 2011-05-30 Philippe Brochard <pbrochard@common-lisp.net>
252 * src/clfswm-internal.lisp (get-parent-layout): Minor fullscreen
255 2011-05-29 Philippe Brochard <pbrochard@common-lisp.net>
257 * src/clfswm-internal.lisp
258 (delete-child-and-children-in-all-frames): Show all children
259 before deleting/destroying a windows, so prevent a flickering.
260 (get-parent-layout): Return the fullscreen size when the current
263 2011-05-28 Philippe Brochard <pbrochard@common-lisp.net>
265 * src/clfswm-internal.lisp (get-parent-layout): Handle correctly
268 * src/clfswm-util.lisp (delete-focus-window-generic): Do not hide
269 child before removing, so prevent a flickering.
271 * src/clfswm-internal.lisp (show-all-children): Rectangular
272 optimization to display only needed children.
273 (show-all-children): Remove flickering on
274 select-next/previous-brother.
276 2011-05-17 Philippe Brochard <pbrochard@common-lisp.net>
278 * src/clfswm-util.lisp (copy-focus-window, cut-focus-window): New
279 functions and ask-close/kill-current-window menu and bindings
282 2011-05-16 Philippe Brochard <pbrochard@common-lisp.net>
284 * src/clfswm-util.lisp (ask-close/kill-current-window): Add an
285 *ask-close/kill-placement* placement window variable.
287 2011-05-09 Philippe Brochard <pbrochard@common-lisp.net>
289 * contrib/osd.lisp (funcall-button-from-code): Display osd
290 documention for buttons and fix some redefining warnings.
292 2011-05-07 Philippe Brochard <pbrochard@common-lisp.net>
294 * src/clfswm-nw-hooks.lisp (make-permanent-nw-hook-frame): New
295 function. Prevent to add or delete a new window hook for this
298 * src/clfswm-layout.lisp (update-layout-managed-children-position):
301 2011-05-06 Philippe Brochard <pbrochard@common-lisp.net>
303 * src/bindings-second-mode.lisp (set-default-second-keys):
304 select-brother-spatial-move-* binding update.
306 * src/clfswm-layout.lisp (tile-left|right|top|bottom-layout): Ask
307 to keep children positions or not.
309 * src/clfswm-internal.lisp (fixe-real-size): Takes care of border
312 * src/clfswm-layout.lisp (update-layout-managed-children): Fix a
313 bug by using the parent frame instead of the current child.
315 * src/clfswm-circulate-mode.lisp
316 (select-brother-generic-spatial-move+right/left/up/down): New
317 function to select a brother from another in a spatial move.
319 2011-04-19 Philippe Brochard <pbrochard@common-lisp.net>
321 * src/clfswm-pack.lisp (move-frame-constrained)
322 (resize-frame-constrained): Use pixels instead of floating
325 2011-04-18 Philippe Brochard <pbrochard@common-lisp.net>
327 * src/clfswm-pack.lisp (resize-frame-constrained): Takes care of
329 (implode-frame, implode-current-frame): New functions. Absorb all
330 frames subchildren in frame. Explode frame opposite.
332 2011-04-17 Philippe Brochard <pbrochard@common-lisp.net>
334 * src/clfswm-pack.lisp (move-frame-constrained)
335 (resize-frame-constrained): New function. Move and resize frame
336 with the mouse constrained by other frame brothers.
338 2011-04-14 Philippe Brochard <pbrochard@common-lisp.net>
340 * src/clfswm-util.lisp (with-movement-select-next-brother)
341 (with-movement-select-previous-brother)
342 (with-movement-select-next-child): Use a simple method (do not
343 enter in the circulate mode) to allow to circulate in all children
346 * src/clfswm-menu.lisp (open-menu): Save info hash table keys
347 instead of deleting newly created keys.
349 2011-03-21 Philippe Brochard <pbrochard@common-lisp.net>
351 * src/clfswm-internal.lisp (x-px->fl, y-px->fl): Takes care of
354 2011-03-20 Philippe Brochard <pbrochard@common-lisp.net>
356 * src/clfswm-info.lisp (show-config-variable): call
357 produce-conf-var-doc.
359 2011-03-18 Philippe Brochard <pbrochard@common-lisp.net>
361 * src/clfswm-autodoc.lisp (produce-conf-var-doc-html): Produce a
362 documentation for all configurable variables in CLFSWM -
365 * src/clfswm-internal.lisp (leave-frame): Hide all children except
368 2011-03-16 Philippe Brochard <pbrochard@common-lisp.net>
370 * src/clfswm-autodoc.lisp (produce-all-docs): Produce a
371 documentation for all configurable variables in CLFSWM.
373 * src/clfswm-layout.lisp (set-gimp-layout): Display a notify
374 window with the help on the GIMP layout.
376 2011-03-12 Philippe Brochard <pbrochard@common-lisp.net>
378 * src/menu-def.lisp: Menu update to prevent cursor keys clash.
380 * clfswm.asd: Change compilation order to prevent undefined
383 * src/clfswm-internal.lisp (show-child(frame)): Handle properly
384 the show-root-frame-p parameter.
386 2011-03-11 Philippe Brochard <pbrochard@common-lisp.net>
388 * src/clfswm-util.lisp (move-frame, resize-frame): Do not move or
389 resize a frame when it's the current root.
391 2011-03-10 Philippe Brochard <pbrochard@common-lisp.net>
393 * src/clfswm-internal.lisp (show-all-children): Handle properly
394 duplicated child in multipe frames.
396 2011-03-09 Philippe Brochard <pbrochard@common-lisp.net>
398 * contrib/volume-mode.lisp (set-default-volume-keys): Add more
399 keybindings (up/down, right/left) to raise/lower the volume.
401 * src/clfswm-layout.lisp: Add a variable border size for frames
404 2011-03-08 Philippe Brochard <pbrochard@common-lisp.net>
406 * src/clfswm-util.lisp (cut-current-child, remove-current-child)
407 (delete-current-child): Hide the current child before doing the
410 * src/clfswm-internal.lisp (show-all-children): Hide windows not
411 in the current root before displaying those in current root.
412 Remove all hide-all unnecessary calls.
414 * src/clfswm-configuration.lisp (save-variables-in-conf-file):
415 Save only variables with a different value than their original
418 2011-03-07 Philippe Brochard <pbrochard@common-lisp.net>
420 * src/clfswm-info.lisp (show-config-variable): Use the new
423 * src/clfswm-autodoc.lisp (produce-configuration-variables): Use
424 the new defconfig method.
426 * src/clfswm-configuration.lisp (create-configuration-menu):
427 Change the config system with a more lispy one and a less string
428 based one: (defconfig name value group doc).
431 2011-03-06 Philippe Brochard <pbrochard@common-lisp.net>
433 * src/clfswm-internal.lisp (show-all-children): Simplify the
435 (show-child): Display an unmanaged window whe it's the current
437 (show-all-children): add the ability to display all child from
438 *root-frame* and hide all those who are not in *current-root*.
439 -> remove hide-all-children when needed.
441 * src/xlib-util.lisp (move-window,resize-window): Add a
442 *color-move-window* border when moving or resizing a window.
444 2011-03-04 Philippe Brochard <pbrochard@common-lisp.net>
446 * src/clfswm-internal.lisp (show-all-children): Perform only one
447 recusion on the clfswm tree: calculate geometry and place child in
450 2011-03-03 Philippe Brochard <pbrochard@common-lisp.net>
452 * src/clfswm-internal.lisp (show-all-children): Rethink of display
453 child order to prevent very annoying flickering.
455 2011-02-27 Philippe Brochard <pbrochard@common-lisp.net>
457 * src/clfswm-util.lisp (query-yes-or-no): New function.
459 * src/clfswm-configuration.lisp (reset-all-config-variables): New
460 function and menu entry.
461 (query-conf-value): Add the ability to leave the field blank to
462 reset the variable to its default value.
464 2011-02-26 Philippe Brochard <pbrochard@common-lisp.net>
466 * src/clfswm-configuration.lisp
467 (add-all-configuration-default-value): Add a default value to
468 configurable variables.
470 2011-02-23 Philippe Brochard <pbrochard@common-lisp.net>
472 * src/clfswm.lisp (main-unprotected): Create the configuration
473 menu only once at startup.
475 2011-02-22 Desmond O. Chang <dochang@gmail.com>
477 * contrib/amixer.lisp: Add a volume mode inspired by the emms
478 volume package. Alsa mixer interface.
480 * contrib/volume-mode.lisp: Add a volume mode inspired by the emms
483 2011-02-22 Desmond O. Chang <dochang@gmail.com>
485 * src/clfswm.lisp (main): Use ASDF:SYSTEM-SOURCE-DIRECTORY instead
486 of *LOAD-TRUENAME*. *LOAD-TRUENAME* is only bound during a call to
487 LOAD. If one eval CLFSWM:MAIN in repl, BASE-DIR will be an empty
488 string. Use ASDF:SYSTEM-SOURCE-DIRECTORY to fix it.
490 2011-02-16 Philippe Brochard <pbrochard@common-lisp.net>
492 * src/clfswm.lisp (main-unprotected): Add a close hook. And close
493 the notify window, the virtual keyboard and the clfswm terminal by
496 2011-02-15 Philippe Brochard <pbrochard@common-lisp.net>
498 * src/clfswm.lisp (main-unprotected): Destroy the notify window
499 before closing the display. This fix a bug when resetting/reloading
502 2011-02-12 Philippe Brochard <pbrochard@common-lisp.net>
504 * src/xlib-util.lisp (equal-wm-class-fun, equal-wm-name-fun)
505 (raise-window-fun, raise-and-focus-window-fun): New functions.
507 * src/config.lisp (*clfswm-terminal-cmd*): Switch from xterm to
509 (*never-managed-window-list*): Structure change to be more
510 flexible. Let the choice to focus, raise and do nothing on never
513 2011-02-09 Philippe Brochard <pbrochard@common-lisp.net>
515 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Take
516 care of never managed windows to move or resize them if the raise
519 * src/clfswm-internal.lisp (in-frame, in-window, in-child): New
522 2011-02-08 Philippe Brochard <pbrochard@common-lisp.net>
524 * src/clfswm.lisp (main-mode): Raise or not unmanaged windows
525 following request in *never-managed-window-list*.
527 2011-02-05 Philippe Brochard <pbrochard@common-lisp.net>
529 * *: **** Release 1102 ****
531 2011-02-05 Desmond O. Chang <dochang@gmail.com>
533 * src/keysyms.lisp: Add extended keysyms from stumpwm.
535 2011-02-01 Desmond O. Chang <dochang@gmail.com>
537 * src/clfswm-util.lisp (run-or-raise): New function (thanks to
540 * src/clfswm-internal.lisp (with-all-*): add a nil block.
542 2011-01-28 Desmond O. Chang <dochang@gmail.com>
544 * src/clfswm-util.lisp (xdg-config-home): XDG_CONFIG_HOME should
545 be $HOME/.config by default.
547 2010-12-29 Philippe Brochard <pbrochard@common-lisp.net>
549 * contrib/osd.lisp (display-doc): Add another method where a
550 CLFSWM native window is used to display the key documentation.
552 2010-12-27 Philippe Brochard <pbrochard@common-lisp.net>
554 * src/xlib-util.lisp (with-xlib-protect): Force to revert to the
557 2010-12-25 Philippe Brochard <pbrochard@common-lisp.net>
559 * src/clfswm-second-mode.lisp (second-key-mode): Call the second
560 mode leave function only when the generic mode was ended.
562 2010-12-08 Philippe Brochard <pbrochard@common-lisp.net>
564 * src/clfswm-second-mode.lisp (sm-leave-function): Do not use
565 *second-mode-program* anymore.
567 2010-12-07 Philippe Brochard <pbrochard@common-lisp.net>
569 * src/clfswm-second-mode.lisp (*second-mode-leave-function*): New
570 variable bound to a function executed (when not null) on second
573 2010-11-14 Philippe Brochard <pbrochard@common-lisp.net>
575 * src/clfswm-util.lisp (find-child-under-mouse): Do not find
578 2010-11-13 Philippe Brochard <pbrochard@common-lisp.net>
580 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
581 Do not display the accel window for unmanaged windows.
583 2010-11-11 Philippe Brochard <pbrochard@common-lisp.net>
585 * src/clfswm-internal.lisp (set-current-root): Handle
586 window-parent in set-current-root.
588 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
589 focus the parent child when the current root is a window.
591 2010-11-09 Philippe Brochard <pbrochard@common-lisp.net>
593 * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
594 New function an bindings.
596 * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
599 2010-11-07 Philippe Brochard <pbrochard@common-lisp.net>
601 * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
602 function to let the user choose to keep child position with
605 * src/clfswm-internal.lisp (remove-frame-data-slot): New
608 2010-11-05 Philippe Brochard <pbrochard@common-lisp.net>
610 * src/clfswm-internal.lisp (frame-select-next-child)
611 (frame-select-previous-child): New functions and bindings. Select
612 the next/previous child in the current frame.
614 2010-10-31 Philippe Brochard <pbrochard@common-lisp.net>
616 * src/clfswm-query.lisp (query-mode-complet): New function: Handle
617 completion in query-mode.
619 2010-10-30 Philippe Brochard <pbrochard@common-lisp.net>
621 * src/clfswm-query.lisp (query-print-string): Handle long lines
624 2010-10-27 Philippe Brochard <pbrochard@common-lisp.net>
626 * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
627 all characters are printable.
629 2010-10-25 Philippe Brochard <pbrochard@common-lisp.net>
631 * contrib/server/server.lisp: Load clfswm client code in the main
632 program and let the user start it with a --client command line
635 * src/package.lisp (*main-entrance-hook*): New hook executed after
636 loading configuration file and before opening the display.
638 2010-10-23 Philippe Brochard <pbrochard@common-lisp.net>
640 * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
642 * src/clfswm-internal.lisp (show-child): Show window only if not
645 * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
646 change modifiers after binding definition.
648 2010-10-21 Philippe Brochard <pbrochard@common-lisp.net>
650 * contrib/osd.lisp: New file: OSD (On Screen Display) for
653 * src/clfswm-menu.lisp (open-menu): Modularise function.
655 2010-10-13 Philippe Brochard <pbrochard@common-lisp.net>
657 * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
658 key binding in main and second mode.
660 2010-10-10 Philippe Brochard <pbrochard@common-lisp.net>
662 * src/clfswm-util.lisp (open-notify-window): Convert hello-window
663 functions to a more generic Notify-window system.
665 * src/tools.lisp (add-timer): Add an id to identify the timer.
667 2010-10-09 Philippe Brochard <pbrochard@common-lisp.net>
669 * src/tools.lisp (erase-timer): New function.
671 * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
672 the hello window. Add Configuration variables.
674 2010-10-08 Philippe Brochard <pbrochard@common-lisp.net>
676 * src/clfswm-util.lisp (): Add an Hello window at startup.
678 * src/tools.lisp (process-timers): Add a timer system.
680 2010-10-07 Philippe Brochard <pbrochard@common-lisp.net>
682 * src/clfswm-query.lisp (add-in-query-string): Handle correctly
685 2010-10-06 Philippe Brochard <pbrochard@common-lisp.net>
687 * src/clfswm-query.lisp (query-print-string): Change cursor color
688 and show parenthesis matching with colors (on match and on
691 2010-10-05 Philippe Brochard <pbrochard@common-lisp.net>
693 * src/clfswm-internal.lisp (show-all-children): Do not raise a
694 child when its parent is hidden.
696 2010-10-02 Philippe Brochard <pbrochard@common-lisp.net>
698 * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
699 possibility to circulate over subchild of the current child.
701 * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
702 (expose-windows-generic): Add an escape-body function to return to
703 the original state on escape key.
705 * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
706 to bind the current child from the configuration file.
708 2010-10-01 Philippe Brochard <pbrochard@common-lisp.net>
710 * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
711 window hook: the frame absorb all new windows that match
712 nw-absorb-test frame data slot.
714 2010-09-30 Philippe Brochard <pbrochard@common-lisp.net>
716 * src/clfswm-expose-mode.lisp (expose-create-window): Show window
717 title in accel window.
719 2010-09-29 Philippe Brochard <pbrochard@common-lisp.net>
721 * configure: Use the Xavier Maillard clfswm script in contrib to
722 build an executable in the standard way.
724 2010-09-26 Philippe Brochard <pbrochard@common-lisp.net>
726 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
727 New functions. Add a window on each child in the expose mode to
730 * src/clfswm-internal.lisp (child-x, child-y, child-width)
731 (child-height): New methods to get real child coordinates.
733 2010-09-25 Philippe Brochard <pbrochard@common-lisp.net>
735 * src/clfswm-layout.lisp (*-layout): Use child-position.
737 * src/clfswm-internal.lisp (child-position): New function.
739 * src/clfswm-expose-mode.lisp (expose-windows-mode)
740 (expose-all-windows-mode): Use a generic mode.
742 * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
743 with handle-event-fun symbols instead of inspecting clfswm
744 internals symbols on each mode change.
746 * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
747 a separate clfswm-expose-mode.lisp file.
749 * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
750 screen size instead of hardcoded test coordinates.
752 2010-09-24 Philippe Brochard <pbrochard@common-lisp.net>
754 * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
755 (speed-mouse-right, speed-mouse-up, speed-mouse-down)
756 (speed-mouse-undo, speed-mouse-first-history): New functions to
757 quickly move the mouse. Implemented for the second mode.
759 2010-09-16 Philippe Brochard <pbrochard@common-lisp.net>
761 * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
762 write permission on $clfswm_asd_path. So anybody can start clfswm
763 even if there is no write permission on the source directory.
765 2010-09-12 Philippe Brochard <pbrochard@common-lisp.net>
767 * contrib/clfswm: Add support to cmucl, ccl and ecl.
769 2010-09-11 Philippe Brochard <pbrochard@common-lisp.net>
771 * src/clfswm-util.lisp (set-hide-unmanaged-window)
772 (set-show-unmanaged-window, set-default-hide-unmanaged-window):
773 New functions and menu entry.
774 (set-globally-hide-unmanaged-window)
775 (set-globally-show-unmanaged-window): New functions and menu
778 * src/clfswm-internal.lisp (hide-unmanager-window-p): New
780 (show-child): Add a data slot on frame to hide or not unmanaged
783 * src/clfswm-corner.lisp (present-clfswm-terminal)
784 (present-virtual-keyboard): Use a function (generic-present-body)
785 instead of a macro (generate-present-body).
787 * src/clfswm-util.lisp (update-menus): List all directories and
788 subdirectories in $XDG_DATA_DIRS/applications.
790 2010-09-10 Philippe Brochard <pbrochard@common-lisp.net>
792 * src/clfswm-corner.lisp (generate-present-body): New macro.
793 (present-clfswm-terminal, present-virtual-keyboard): Use
794 generate-present-body.
796 2010-09-09 Philippe Brochard <pbrochard@common-lisp.net>
798 * src/clfswm-util.lisp (update-menus): Follow XDG specifications
799 instead of the non-portable Debian update-menu.
801 2010-09-07 Philippe Brochard <pbrochard@common-lisp.net>
803 * src/clfswm.lisp (error-handler): New function do handle
804 asynchronous errors and ignore them.
805 (open-display): Install the new error-handler on display.
807 2010-09-05 Philippe Brochard <pbrochard@common-lisp.net>
809 * src/xlib-util.lisp (with-xlib-protect): Add a
810 with-simple-restart on top of body execution.
812 2010-09-04 Philippe Brochard <pbrochard@common-lisp.net>
814 * src/clfswm.lisp (main-loop): Protect all xlib functions with an
817 * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
818 handle-event. Add a with-simple-restart to prevent a
819 clisp/new-lisp infinite loop.
821 2010-08-30 Philippe Brochard <pbrochard@common-lisp.net>
823 * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
824 clfswm terminal working even on xterm title changes.
826 2010-08-29 Philippe Brochard <pbrochard@common-lisp.net>
828 * src/clfswm-util.lisp (run-other-window-manager): Update for
831 * src/tools.lisp (do-execute): New parameter io to change the
834 * src/clfswm-util.lisp (hide-current-child): Prevent from removing
837 * src/clfswm-internal.lisp (child-member): New predicate.
838 (child-remove): New function.
840 * src/*.lisp: Use child-member and child-remove everywhere it's
843 2010-08-28 Philippe Brochard <pbrochard@common-lisp.net>
845 * src/clfswm.lisp (main-loop): Ensure that all events have been
846 processed after a process-event.
848 * src/clfswm-internal.lisp (is-in-current-child-p): New function.
850 2010-08-27 Philippe Brochard <pbrochard@common-lisp.net>
852 * src/clfswm.lisp (main-mode:configure-request): Raise the window
853 only when present on the current child and focus it accordingly.
855 2010-08-26 Philippe Brochard <pbrochard@common-lisp.net>
857 * src/clfswm-circulate-mode.lisp (circulate-loop-function):
858 Use is-a-key-pressed-p.
860 * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
862 * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
863 returned by xlib:keysym->keycodes.
865 * src/*.lisp: Use the new child-equal-p to compare children. This
866 prevent a bug with sbcl/cmucl when the standard equal function
867 does not work with xlib:window.
869 * src/clfswm-internal.lisp (child-equal-p): New predicate.
871 2010-08-25 Philippe Brochard <pbrochard@common-lisp.net>
873 * src/clfswm-generic-mode.lisp (generic-mode): Use an
874 xlib:event-listen before processing event with
875 xlib:process-event. This prevent a bug with CLX threaded
876 implementation like sbcl.
878 * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
879 processing event with xlib:process-event. This prevent a bug with
880 CLX threaded implementation like sbcl.
882 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
884 * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
886 * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
889 * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
890 (find-parent-frame, find-frame-window, find-frame-by-name)
891 (find-frame-by-number): Use with-find-in-all-frames to search in
892 frames in the right order.
894 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
895 unwanted flickering with unmanaged windows.
897 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
899 * src/package.lisp: Remove event handler hooks as they're not
900 needed anymore (To replace them: use closure and define-handler).
902 * src/xlib-util.lisp (move-window, resize-window)
903 (wait-mouse-button-release): Use a generic mode.
905 * src/*.lisp: Replace the case to handle event with a more (tricky)
906 lispy method which bind a function to each keywords associated
909 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
911 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
912 menu entry between delete-current-child and remove-current-child.
913 ie: Delete a child and its children in all frames by default.
915 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
917 * src/package.lisp: Add a placement configuration group.
919 * src/binding*.lisp: Bind control+g to escape the current action
922 * src/clfswm-internal.lisp
923 (delete-child-and-children-in-all-frames): New function and
924 binding: Second mode - Control+Delete delete the current child and
925 its children in all frames (ie: close the current child and its
928 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
930 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
931 the frame window and the frame gc. Close a very annoying bug when
932 cuting/pasting a frame or moving a child over frames with the
935 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
936 all children in *current-root* after moving/resizing a frame.
938 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
940 * src/clfswm-util.lisp (delete-focus-window)
941 (destroy-focus-window): Remove child in parent frame before
944 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
946 * src/clfswm-util.lisp (identify-key): Add a timeout in
948 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
949 of the window passed by xlib:process-event.
951 * src/xlib-util.lisp (move-window, resize-window)
952 (wait-mouse-button-release): Add a timeout in xlib:process-event.
954 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
956 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
957 to launch an other window manager and to return to clfswm.
959 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
961 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
964 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
966 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
969 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
970 parameter and a loop timeout.
972 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
974 * src/clfswm.lisp (main): Add an alternate configuration filename
977 * load.lisp: Add a debuging code example.
979 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
981 * src/clfswm-configuration.lisp (create-configuration-menu): New
982 menu to configure all clfswm variables while clfswm is running.
984 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
986 * src/clfswm-util.lisp (save-configuration-variables): New
987 function to save all configuration variables in clfswmrc.
989 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
991 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
993 (set-default-info-keys): Add cursor key support in info mode.
995 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
997 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
1000 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
1001 prevent reading the configuration file (this may be useful to
1002 produce the original documentation without user modifications
1003 with the rc configuration file).
1005 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
1007 * src/bindings-second-mode.lisp (set-default-second-keys):
1008 Simplification of Escape key to close/kill/remove the focus window
1009 and unhide all windows.
1011 * src/bindings.lisp (set-default-main-keys): Simplification of
1012 Escape key to close/kill/remove the focus window and unhide all
1015 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
1016 focus and unhide all windows capabilities.
1018 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1020 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
1022 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
1024 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
1025 Keep child order and don't make unnecessary child movement.
1026 (one-column-layout, one-line-layout): New layouts.
1028 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
1030 * *: **** Release 0906 ****
1032 * contrib/cd-player.lisp: New file to handle the CD player.
1034 * contrib/xmms.lisp: New file to handle the xmms player.
1036 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1038 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
1039 Maximize windows in their frame - Leave frames to their actual
1042 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
1043 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
1045 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
1047 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
1049 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
1051 * contrib/mpd.lisp: Use a standard menu.
1053 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
1055 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
1057 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
1059 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
1061 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
1064 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
1066 * src/config.lisp (get-fullscreen-size): One pixel adjustment
1069 * src/clfswm-placement.lisp (*-child-placement): One pixel
1072 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
1074 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
1075 Ensure that all characters are printable.
1077 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
1080 * src/clfswm-placement.lisp (*-child-placement): Adjust
1081 coordinates to one pixel in the current child.
1083 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1085 * src/clfswm-query.lisp (query-enter-function): Assign font before
1086 width and height calculation.
1088 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1090 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
1091 bannish the pointer in an arbitrary place.
1093 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
1094 place the info window in an arbitrary place.
1096 * src/clfswm-query.lisp (query-enter-function): Use with-placement
1097 macro to place the query window in an arbitrary place.
1099 * src/clfswm-placement.lisp: New file. Allow to place info windows
1100 or query windows on an arbitrary place. Allow to bannish the
1101 pointer on an arbitrary place.
1103 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
1105 * src/clfswm-circulate-mode.lisp (reorder-child)
1106 (reorder-brother): Unfocus windows before reordering children or
1109 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1111 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
1112 the parent is a frame.
1114 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
1115 motion with a default modifier.
1117 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
1120 * src/clfswm-info.lisp (info-mode): Handle motion with a default
1122 (info-mode): Optimization in loop function.
1124 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1126 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
1127 root-frame correctly.
1129 * clfswm.asd: Dependency fix for clfswm-generic-mode.
1131 * src/clfswm-circulate-mode.lisp (reorder-child)
1132 (reorder-brother): Handle empty frames.
1133 (reorder-brother): Redisplay only the parent frame of the current
1136 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
1137 parent frame of the current frame.
1139 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
1141 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
1142 Maximize/Unmaximize the current frame in its parent frame.
1144 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
1145 windows and frames in their parent frame.
1147 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1149 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
1151 * src/clfswm-circulate-mode.lisp (reorder-child)
1152 (reorder-brother): Reinitialise on circulate type change
1153 child to brother or brother to child.
1155 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
1156 calls xlib:display-finish-output on each map-request. So speed up
1159 * src/xlib-util.lisp (map-window): New function. Call
1160 xlib:display-finish-output on each map request.
1162 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1164 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
1165 Optimisation when drawing second mode window.
1167 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1169 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
1172 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1174 * src/clfswm-util.lisp (run-program-from-query-string): Launch
1175 command only with a return validation.
1177 2009-04-22 Xavier Maillard <xma@gnu.org>
1179 * src/clfswm-query.lisp (query-string): Use a generic mode.
1181 2009-04-19 Xavier Maillard <xma@gnu.org>
1183 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
1185 2009-04-18 Xavier Maillard <xma@gnu.org>
1187 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
1188 to define all other modes.
1190 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1192 * src/package.lisp (): Use *default-font-string* for all
1195 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
1197 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
1199 * src/xlib-util.lisp (null-size-window-p): Better check of null
1202 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
1204 * src/clfswm.lisp (handle-map-request): Add a fix to manage
1205 correctly fullscreen windows (SDL particularly).
1207 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
1209 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
1210 a segfault with clisp/new-clx.
1212 * src/clfswm.lisp (handle-motion-notify): Add a needed window
1215 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
1216 needed window argument.
1218 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
1220 * src/xlib-util.lisp (wait-no-key-or-button-press)
1221 (wait-a-key-or-button-press): Check buttons press/release correctly"
1223 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
1225 * src/menu-def.lisp: Add children navigation menu in the movement
1226 menu (select next/previous child/brother/level).
1228 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
1230 * *: Rename 'sister' frame to 'brother' frame.
1232 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
1233 alias in a real modifier.
1235 * src/package.lisp (*modifier-alias*): New list of modifier alias
1236 For example: :alt is :mod-1, :numlock is :mod-2...
1238 * src/tools.lisp (remove-hook): New function.
1240 * src/clfswm-keys.lisp (with-capslock, without-capslock)
1241 (with-numlock, without-cnumlock): New functions.
1243 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
1245 * src/clfswm-info.lisp: Use the *binding-hook* to create info
1246 keys and mouse bindings.
1248 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
1249 second keys and mouse bindings.
1251 * src/bindings.lisp: Use the *binding-hook* to create main keys
1254 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1256 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
1259 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
1261 * src/menu-def.lisp: Use a menu instead of a function for the
1264 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
1266 * src/clfswm-util.lisp (show-standard-menu): Display the standard
1267 menu from the 'update-menus' command.
1269 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
1271 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
1272 it's already grabbed.
1274 * src/clfswm-internal.lisp (display-frame-info): Use configurable
1275 colors and fix a bug with background.
1276 (display-frame-info): Set window background when displaying info.
1278 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1280 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
1281 warning with clisp/new-clx.
1283 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
1285 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
1288 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1290 * *: **** Release 0809 ****
1292 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1294 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
1296 (ensure-unique-number): New function and menu entry.
1298 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
1300 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
1301 hook: open the next window in a named frame.
1302 (numbered-frame-nw-hook): New new window hook: open the next
1303 window in a numbered frame.
1305 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
1306 cases. So query-string can be called even in the main mode.
1308 * src/clfswm-internal.lisp (show-all-children): Do not raise a
1309 child by default => far less flickering.
1311 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
1313 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
1315 * src/menu-def.lisp: Change key binding for the CLFSWM menu
1318 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
1319 is nil. (workaround on some CLX implementation).
1321 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
1323 * src/menu-def.lisp: Add a menu to set a focus policy for all
1326 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
1327 (all-frames-set-*-focus-policy): Set a focus policy for all
1330 * src/clfswm.lisp (handle-enter-notify): sloppy-select
1331 mode. Select a child and its parents on mouse over.
1333 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
1335 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
1336 policy -> Sloppy focus only for windows in the current frame.
1337 (main-unprotected): Exit clfswm on init error (ie: when another
1338 window manager is running).
1340 * src/clfswm-util.lisp (reset-clfswm): New function.
1342 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
1344 * src/clfswm-menu.lisp (init-menu): New function.
1346 * src/clfswm-util.lisp (reload-clfswm): New function to reload
1348 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
1350 * src/clfswm.lisp (main, main-unprotected): Handle error in a
1351 superior main function. Now CLFSWM can't break the X session. It
1352 just reinitialize the display and run a new main loop.
1354 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
1355 *vt-keyboard-on* global to avoid warnings when loading clfswm.
1357 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
1358 (help-on-gimp-layout): Describe how to use the GIMP layout.
1360 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
1362 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
1363 main-window-right-layout. Change the keybinding for (shift)alt+tab
1364 to not select windows in the main window lisst.
1365 Bind F8 to add a window in the main window list.
1366 Bind F9 to remove a window in the main window list.
1367 Change the focus policy to :sloppy.
1368 (set-previous-layout): Restore the previous layout, keybinding and
1371 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
1373 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
1375 * src/clfswm-layout.lisp (main-window-left-layout)
1376 (main-window-bottom-layout, main-window-top-layout): New
1378 Factorize layouts in menu.
1380 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
1382 * src/clfswm-layout.lisp (main-window-right-layout): A possible
1383 GIMP layout: one or more main windows on one side of the
1384 frame. Others on the other size.
1386 * src/clfswm-util.lisp
1387 (current-frame-set-click/sloppy-focus-policy): Each frame can have
1388 a different focus policy (one of :click or :sloppy).
1389 The default focus policy is set with *default-focus-policy*.
1391 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
1393 * src/clfswm-info.lisp (show-config-variable): New function.
1395 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
1397 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
1399 * src/clfswm-info.lisp: Colored help for key binding and corners
1402 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
1404 * src/clfswm-util.lisp (delete-focus-window)
1405 (destroy-focus-window): Remove chid only in
1406 handle-unmap/destroy-notify. Focus *current-root* only when
1407 closing/killing the current child.
1409 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
1410 functions or corners.
1412 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1414 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
1415 action: Hide/Unhide a terminal on mouse corner action. (By default
1416 right mouse button on the top left corner).
1418 * src/config.lisp (*never-managed-window-list*): New config
1421 * src/clfswm-internal.lisp (never-managed-window-p): New function:
1422 Handle never managed window in a more simple way.
1424 * src/clfswm-corner.lisp: New file and new and more simple method
1425 to define corners actions.
1427 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
1429 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
1431 * src/clfswm-layout.lisp (fast-layout-switch)
1432 (define-fast-layout-switch): New functions: Switch between two
1435 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
1436 really in the second mode. So leave-second-mode can be used even
1439 * src/clfswm-util.lisp (switch-to-last-child): New function:
1440 Store the current child and switch to the previous one.
1442 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1444 * src/clfswm-util.lisp (display-current-window-info): Display the
1446 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
1447 (top right by default). By default 'xvkbd' is used.
1449 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1451 * src/xlib-util.lisp (move-window, resize-window): Compress motion
1454 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
1456 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
1459 * src/clfswm-info.lisp (info-mode): Compress motion events.
1461 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
1463 * src/clfswm-internal.lisp (show-all-children): Compute geometry
1464 and selection first and then show only necessary children.
1465 (show-child): remove unneeded display-p parameter.
1467 * src/config.lisp (get-fullscreen-size): Place the frame border
1468 outside the screen (this prevent the loose of 2 pixels per
1471 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
1473 * src/clfswm-internal.lisp (focus-child): Algorithm change to
1474 raise only the selected child.
1476 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
1478 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
1479 Raise only viewable children.
1481 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
1483 * src/clfswm-internal.lisp (show-all-children): Always raise all
1484 displayed children. Remove all references to raise-p.
1486 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1488 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
1491 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
1492 second mode binding on raise/lower child in its frame.
1494 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
1495 behaviour to the new raise/lower property.
1496 Call clear-nw-hook before the rest of the hook.
1498 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
1499 (mouse-click-to-focus-and-resize-window): Stop button event. This
1500 prevent a keyboard/pointer freeze.
1502 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1504 * src/clfswm-internal.lisp (frame-lower-child)
1505 (frame-raise-child): New functions to raise/lower a child in its
1508 * src/clfswm-util.lisp (have-to-present-windows)
1509 (have-to-present-all-windows): New functions to have an MaxOS
1510 expose like on mouse click in screen corner.
1512 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
1514 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
1516 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
1517 child from a choice in all frames with hidden children.
1519 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
1521 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
1523 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
1524 (unhide-all-children): New functions.
1526 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
1529 * src/clfswm-util.lisp (hide/show-frame-window): new function and
1532 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
1534 * src/clfswm-util.lisp (rename-current-child): Do not display the
1535 frame info for a window.
1537 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
1539 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
1540 frame window for the removed child and its children.
1542 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
1544 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
1547 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
1549 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
1550 the ROX pinboard (ie: leave it lowered in the root window as
1553 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
1554 (tile-left-layout, tile-right-layout, tile-top-layout)
1555 (tile-bottom-layout): Use all the frame space when there is only
1558 * src/clfswm-internal.lisp (place-window-from-hints): Center
1559 unmanaged windows in the root screen.
1561 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
1564 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1566 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
1567 typo in managed types.
1569 * src/clfswm-internal.lisp (show-child): Always display frame info
1570 even if the frame is hidden.
1572 * src/xlib-util.lisp (resize-window): Use a better algorithme to
1575 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1577 * src/clfswm-util.lisp (with-movement): Display frame info for all
1578 frames in current root.
1580 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1582 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
1584 * src/bindings-second-mode.lisp (define-second-key #\a): New
1585 binding on 'add-default-frame'.
1587 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1588 message to follow the autodocumentation process.
1590 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1592 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1593 "Space" to jump to a child. "B" to bind a slot on the current
1596 * src/bindings-second-mode.lisp: Use "Tab" instead of
1599 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
1601 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1602 unmanaged (hidden) windows.
1604 * src/clfswm-internal.lisp (place-window-from-hints): Give a
1605 minimal size for windows.
1606 (with-all-windows-frames-and-parent): New function.
1608 * src/config.lisp (*default-window-width/height*): New parameters.
1610 * src/clfswm-internal.lisp (place-window-from-hints): Center
1611 windows in the screen instead of in their frame.
1613 * src/bindings-second-mode.lisp (tile-space-current-frame): New
1616 * src/clfswm-layout.lisp (register-layout): Intern the once name
1617 in the right package.
1619 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1621 * doc/dot-clfswmrc: Update to follow the new clfswm way.
1623 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
1625 * src/clfswm-internal.lisp (set-current-child)
1626 (adapt-child-to-parent, show-child, hide-child): Handle the case
1627 where child is not a frame or a window.
1629 * src/clfswm-util.lisp
1630 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1631 Check if child is a frame.
1633 * src/clfswm-internal.lisp (managed-window-p): Handle the case
1634 where frame is null.
1635 (place-frame): Check if frame and parent are frames.
1637 * src/clfswm-info.lisp (info-mode): display all frame info before
1640 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1641 info before leaving.
1643 * src/clfswm-internal.lisp (display-all-frame-info): New function.
1645 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
1647 * src/tools.lisp (getenv): Implemented for ECL.
1648 (urun-prog): Implemented for ECL.
1650 * src/clfswm-util.lisp (identify-key): Use a double buffer to
1653 * src/clfswm-query.lisp (query-string): Use a double buffer to
1656 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1659 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1662 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
1664 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1666 * src/menu-def.lisp: New file: move all menu definition in
1669 * src/clfswm-layout.lisp (register-layout): Use a function instead
1672 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
1674 * src/clfswm-autodoc.lisp (produce-menu-doc,
1675 (produce-menu-doc-html): New functions.
1676 (produce-doc-*): Moved to clfswm-autodoc.lisp.
1678 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1679 paste a child on one of its own children. (this prevent a
1681 (move-child-to): Rename move/copy-current-child-by to
1683 (mouse-move-window-over-frame): New function to move the window
1684 under the mouse cursor to another frame.
1686 * src/clfswm-internal.lisp (find-child-in-parent): New function.
1688 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1690 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1691 windows only when its window parent is the current child.
1693 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1695 * src/clfswm-util.lisp (manage-current-window)
1696 (unmanage-current-window): New functions: Allow to force to manage
1697 or unmanage a window by its parent frame.
1699 * src/bindings-second-mode.lisp (#\o): binded to
1700 set-open-in-new-frame-in-parent-frame-nw-hook and
1701 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1703 * src/clfswm-util.lisp (with-current-window): New macro.
1705 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1706 exposure and enter-window handle event.
1708 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1709 children for the current child after the move/resize.
1711 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1713 * src/xlib-util.lisp (resize-window): Take care of window size
1716 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1717 move/resize unmanaged windows.
1719 * src/xlib-util.lisp (move-window, resize-window): New functions.
1721 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1723 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1724 user choose what window type the current frame must handle.
1725 (display-current-window-info): New function.
1726 (current-frame-manage-all-window-type)
1727 (current-frame-manage-only-normal-window-type)
1728 (current-frame-manage-no-window-type): New functions.
1730 * src/clfswm-internal.lisp (managed-window-p): New function.
1732 * src/package.lisp (frame): Managed type: new frame
1733 parameter. This allow to choose what window type a frame must
1736 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1738 * src/clfswm-nw-hooks.lisp
1739 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1741 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1744 * src/tools.lisp (ensure-printable): Return always a string even
1747 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
1749 * src/config.lisp (*default-nw-hook*): New variable to change the
1750 default new window hook.
1752 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1754 * clfswm.asd (clfswm): Add a dependency from
1755 clfswm-second-mode.lisp to clfswm.lisp.
1757 * src/clfswm-util.lisp (identify-key): Show the documentation for
1758 the function bound on a key.
1759 (with-movement): Move with-movement,
1760 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
1761 to clfswm-util.lisp.
1763 * src/clfswm-menu.lisp: New menu system that let user change keys
1764 or functions associated to keys.
1766 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
1768 * src/clfswm-internal.lisp (show-all-children): Display-child is
1769 the first child by default. Solve a bug with father-p.
1771 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
1773 * src/clfswm-internal.lisp (add-frame): Add frame return the
1775 (show-all-children): Move the size computation outside the
1778 * src/bindings-second-mode.lisp (with-movement): Redisplay only
1781 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1782 only the current child.
1784 * src/clfswm-internal.lisp (show-all-children): New display-child
1785 parameter to display only the desired child and its children.
1786 (select-next/previous-child): Only display the current child.
1788 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
1790 * src/clfswm.lisp (init-display): Move the default frame creation
1791 on the default init hook.
1793 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1794 the main mode (for example: "1" on an azerty keyboard).
1796 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
1798 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1799 keysyms. Revert to old grabbing method for the main mode.
1801 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
1803 * src/clfswm.lisp (init-display): Add key handling on no focus
1804 window and on frame windows.
1806 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1808 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1809 all keys by default and replay just what is needed. No change for
1812 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1813 (find-key-from-code): Test for shift and not shift presence.
1815 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
1817 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1818 new key parameter to have less flickering.
1820 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
1822 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1823 layout only one time and revert to no-layout to freely handle
1826 * src/clfswm-nw-hooks.lisp
1827 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1828 with new created window.
1830 * src/clfswm-layout.lisp (register-layout): Now register
1831 automatically a once layout to set the layout only one time and
1832 revert to no-layout to freely handle frames.
1834 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1836 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1837 nw-hook: Open the next window in the current frame and leave the
1838 focus to the current child.
1840 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
1842 * src/bindings-second-mode.lisp: Add keys definitions to
1843 bind-or-jump in the second mode.
1845 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
1846 macro for bind-or-jump-(1|2|3...).
1848 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
1849 arguments to function. This allow to do things like:
1850 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
1851 are passed to my-function on key press.
1853 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
1855 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
1857 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
1859 * src/clfswm-internal.lisp (child-fullname): New function
1861 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
1862 docstring in info-mode-menu. An item can be
1863 '((key function) (key function)) or with docstring
1864 '((key function "documentation 1") (key function "bla bla") (key function))
1866 * src/tools.lisp (ensure-n-elems): New function.
1868 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
1869 resize a frame or the window's father.
1871 * src/clfswm.lisp (init-display): Remove tile-space-layout by
1872 default on the root frame.
1874 * src/clfswm-util.lisp (move/resize-frame): Add standard event
1875 hooks handlers (map-request, configure-notify...)
1877 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
1880 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1882 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
1883 or the window's father.
1885 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
1886 event only if there is a geometry change.
1887 (mouse-focus-move/resize-generic): Generic function to move or
1888 resize a frame or a window father frame.
1890 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1892 * src/clfswm-internal.lisp (show-all-children): Return t if there
1893 is a geometry change.
1895 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
1897 * src/bindings.lisp (Up/Down): Swap select previous/next level.
1899 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
1901 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
1903 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
1904 (with-all-*): Reverse the child list to manage the first child last (like in
1907 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
1908 root window only if true.
1910 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
1911 root window only if *create-frame-on-root* is true.
1913 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
1916 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
1918 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
1919 the current child (even if it's a window).
1921 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
1923 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
1924 (mouse-click-to-focus-and-resize): New functions.
1926 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
1927 (*-px->fl): Convert pixel coordinates to float.
1929 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
1931 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
1933 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
1936 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
1937 and hide-all-children.
1938 (raise-if-needed): New function.
1939 (show-child): Use a first-p parameter to raise windows only when they are
1942 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
1944 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
1947 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
1949 * src/clfswm-info.lisp (keys-from-list): new function.
1951 * src/*: rename 'childs' in 'children'.
1953 * src/*: rename 'group' in 'frame'.
1955 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
1957 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
1959 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
1961 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
1963 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
1965 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
1966 Bind control+o to open the next window in a new group in the root group
1967 (as open in next window in a new workspace in 0801 version).
1969 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
1971 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
1974 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
1976 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
1977 instead of Tab for select-previous-child.
1979 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
1981 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
1984 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
1986 * clfswm-util.lisp (identify-key): Display the documentation
1987 associated to keys when identifying a key.
1989 2008-03-10 Xavier Maillard <xma@gnu.org>
1991 * contrib/clfswm: Complete rewrite of the script. Detect error and
1992 act accordingly. Add command line arguments to configure the
1993 script execution. User can now choose different common lisp
1994 implementation (clisp and sbcl only), choose where to store the
1995 dumped image, where to find clfswm source.
1997 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
1999 * clfswm-internal.lisp (process-new-window): Beginning of new
2000 window hook: each group have a hook to tell what he wants to do
2001 with the new created window.
2003 2008-03-08 Xavier Maillard <xma@gnu.org>
2005 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
2006 call the resulting executable.
2008 * clfswm.lisp (read-conf-file): Check for the user config file in
2009 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
2010 prefered whenever possible.
2012 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
2014 * clfswm-layout.lisp (*-layout): Add an optional raise-p
2015 parameter in each layout.
2017 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2019 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
2021 (copy/move-current-child-by-name/number): new functions
2022 (focus-group-by-name/number): new functions
2023 (delete-group-by-name/number): new functions
2025 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2027 * ************************************************************ *
2028 *: Major update - No more reference to workspaces. The main *
2029 structure is a tree of groups or application windows. *
2030 * ************************************************************ *
2032 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
2034 * clfswm.lisp (read-conf-file): Read configuration in
2035 $HOME/.clfswmrc or in /etc/clfswmrc or in
2036 $XDG_CONFIG_HOME/clfswm/clfswmrc.
2037 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
2040 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
2042 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
2045 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
2047 * clfswm-internal.lisp (find-window-group): New function.
2049 * clfswm*: Change to make clfswm run with clisp/new-clx.
2051 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
2053 * clfswm-util.lisp (query-show-paren): Add show parent matching in
2055 (query-string): Bind control+k to delete end of line.
2057 * clfswm-second-mode.lisp (draw-second-mode-window): Display
2058 the action on mouse motion in second mode.
2060 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
2061 event but do not clear the root window.
2062 (handle-configure-request): Adjust unmanaged window from their
2065 * clfswm-internal.lisp (process-new-window): Adjust new window
2066 with the specified hints (max/min/base width/height).
2068 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
2070 * clfswm.lisp (handle-configure-request): Send an Configuration
2071 Notify event. This solve a bug with xterm and rxvt who takes some
2072 times to be mapped. Now there is no delay.
2074 * bindings-second-mode.lisp (define-shell): Run programs after
2075 living the second mode.
2077 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
2079 * clfswm-internal.lisp (process-new-window): Do not crop transient
2080 window to group size.
2081 (adapt-window-to-group): Do not crop transient window to group
2084 * clfswm.lisp (handle-configure-request): Adapt just the window to
2085 its group and don't take care of the configure request. Remove the
2086 bug with the Gimp outside the group and speed up the window
2088 (handle-exposure): Remove show-all-group on exposure event
2091 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
2093 * clfswm-util.lisp (circulate-group-up-copy-window)
2094 (circulate-group-down-copy-window)
2095 (circulate-workspace-up-copy-group)
2096 (circulate-workspace-down-copy-group): Prevent the copy of the
2097 same window in the same workspace.
2099 * bindings-second-mode.lisp (release-copy-selected-window)
2100 (release-copy-selected-group): Prevent the copy of the same window
2101 in the same workspace.
2103 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
2104 (generic-pager-move-window-on-next-line): Remove the copy
2106 (generic-pager-move-group-on-next-workspace)
2107 (generic-pager-move-group-on-previous-workspace): Prevent the copy
2108 of the same window in the same workspace.
2110 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
2111 (mouse-pager-copy-selected-group-release): Prevent the copy of the
2112 same window in the same workspace.
2114 * tools.lisp (setf/=): new macro to set a variable only when
2117 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
2118 x, y... only when necessary.
2120 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
2122 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
2123 new function and hook: force windows to stay in its group (solve a
2126 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
2128 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
2129 less flickering when moving/resizing groups.
2131 * clfswm-internal.lisp (hide-group): new function.
2132 (show-all-group): clear-all: new parameter.
2134 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
2136 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
2138 * clfswm*: Color change for the pager. Typo or better description
2139 in bindings definitions. Define bindings for a qwerty keyboard by
2140 default. dot-clfswmrc show examples to switch to an azerty
2142 License change to GPL v3.
2143 * config.lisp: new file - group all globals variables in this
2146 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
2148 * xlib-util.lisp (hide-window): Remove structure-notivy events
2149 when hidding a window.
2151 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
2153 * package.lisp (*sm-property-notify-hook*): Readded
2154 property-notify-hook in second mode.
2156 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
2158 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
2160 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
2162 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
2163 Tile the current workspace with the current window on one side and
2164 others on the other (this emulate the larswm, dwm, wmii way). See
2165 the default configuration file to enable this mode by default.
2167 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
2170 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
2172 * clfswm-pager.lisp (pager-draw-window-in-group): Add
2173 ensure-printable to print windows name even with non-ascii
2176 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
2178 * clfswm-pager.lisp (pager-explode-current-group): Create a new
2179 group for each window in group.
2180 (pager-implode-current-group): Move all windows in workspace to
2181 one group and remove other groups.
2183 * clfswm-pack.lisp (explode-group): Create a new group for each
2185 (implode-group): Move all windows in workspace to one group and
2186 remove other groups.
2188 * clfswm-util.lisp (identify-key): Remove local configuration
2189 variables and made them available for configuration from
2191 (query-string): idem.
2193 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
2195 * netwm-util.lisp: Start of NetWM compliance.
2196 Add a Netwm client list gestion.
2198 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
2200 * clfswm-internal.lisp (create-group-on-request): open a new group
2201 only when the current group is not empty.
2203 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
2204 bug with null workspace.
2206 * clfswm-pager.lisp (pager-handle-event): Add a hook
2207 system. This hooks can be changed in the user configuration file.
2209 * package.lisp: All colors and font variables are set in
2210 package.lisp and can be configured in the user configuration
2212 Note: If you have configured some less ugly colors (esp. for the
2213 pager) don't hesitate to let me know :)
2215 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
2216 system. This hooks can be changed in the user configuration file.
2218 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
2219 changed in the user configuration file (~/.clfswmrc)
2221 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
2223 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
2224 arrow action, open next window in new workspace/group.
2226 * bindings.lisp (stop-all-pending-actions): new binding.
2227 (open-next-window-in-new-group-once): Open the next windows in a
2228 new group (only once) or open all new windows in a new group (like
2229 others windows managers).
2231 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
2233 * clfswm.lisp (read-conf-file): New function to read a lisp
2234 configuration file at startup.
2235 (focus-group-under-mouse): Check if group isn't the current group
2236 ( prevent a bug with unclutter ).
2238 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
2240 * bindings.lisp (run-program-from-query-string): A program can be
2241 launch from a input query window.
2243 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
2245 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
2247 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
2249 * clfswm.lisp (process-new-window): One can now open the next
2250 window in a workspace called by its number.
2252 * clfswm-util.lisp (query-font-string): Minimal editing
2254 (eval-from-string): And an REPL in the window manager... :)
2256 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2258 * clfswm.lisp (process-new-window): One can now open the next
2259 window in a new workspace or a new group.
2261 * clfswm-pager.lisp (pager-mode): Display the next arrow action
2262 with the hidden windows.
2264 * clfswm.lisp (second-key-mode): Display the current workspace
2265 number and the next arrow action in the state window.
2267 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
2268 the pager mode and then redisplay only the current workspace.
2270 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
2272 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
2273 they can be focused with a keypress, sorted or renumbered.
2275 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2277 * clfswm-pager.lisp (pager-mode): Remove multiple silly
2278 pager-draw-display. This prevent a lot of flickering in the
2281 * clfswm.lisp: Remove all display-force-output and replace them
2282 with only one display-finish-output in the event loop.
2284 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
2286 * clfswm-pager.lisp (pager-center-group): New function - center a
2287 group at the middle of the screen.
2289 * clfswm-pack.lisp (center-group): New function - center a group
2290 at the middle of the screen.
2292 * clfswm.lisp (show-group): Add a cross line under the group.
2293 (show-group): Group are showned even if fullscreened.
2294 (init-display): Add an exposure event on the root window.
2296 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
2298 * package.lisp (*default-group*): Default group is the same size
2299 of a fullscreened group.
2301 * bindings*: Use shift to move, control+shift to copy.
2303 * *.lisp: Add comments for configuration or alternatives. So grep
2304 for CONFIG to see where you can configure clfswm. And grep for
2305 Alternative to use some commented code.
2307 * clfswm.lisp (second-key-mode): Use a single window to show the
2308 second mode. See for alternatives at the end of this file.
2310 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
2312 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
2313 macro of key and mouse definitions.
2314 (define-define-key/mouse): Use state instead of modifiers list
2315 this fix a bug when the modifiers list is not in the rigth order.
2317 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
2319 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
2321 * clfswm-info.lisp (info-mode): Add an info mode.
2323 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
2325 * clfswm.lisp (process-new-window): Change border size for
2327 (show-all-windows-in-workspace): Unhide all windows even when the
2328 current group is in fullscreen mode.
2330 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
2332 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
2333 redisplay the identify window after a terminal switch.
2335 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
2336 redisplay the pager after a terminal switch.
2338 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
2340 * clfswm-util.lisp (identify-key): Add a window to display
2341 the keys to identify on screen.
2343 * bindings.lisp, bindings-pager.lisp: Define same keys to
2344 move/copy groups/windows in second mode and in pager.
2346 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
2348 (show-all-windows-in-workspace): unhide window before adapting it
2351 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
2353 * clfswm.lisp (handle-event): Revert to an older version.
2355 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
2357 * clfswm-util.lisp (force-window-in-group)
2358 (force-window-center-in-group): New functions for transient windows.
2360 * clfswm-pager.lisp (pager-remove-current-workspace/group):
2361 bugfix: hide all windows before removing group or workspace.
2363 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
2365 * bindings-pager.lisp (mouse-pager-move-selected-group)
2366 (mouse-pager-copy-selected-group)
2367 (mouse-pager-move-selected-window)
2368 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
2369 (mouse-pager-rotate-window-down): New functions to have mouse in
2372 * clfswm-pager.lisp (pager-swap-window)
2373 (pager-copy-group-on-next/previous-workspace)
2374 (pager-copy-window-on-next/previous-line): New functions
2376 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
2378 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
2379 (pager-move-group-on-next/previous-workspace): new functions.
2381 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
2382 to its half size (new functions).
2384 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
2386 * clfswm-pager.lisp: workspaces, groups and windows can now be
2387 selectionned with the keyboard or the mouse.
2389 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
2391 * clfswm-pager.lisp (pager-select-workspace-right/left):
2392 workspaces can now be selectionned with the keyboard.
2394 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
2396 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
2397 new function to remove a previous defined key or mouse combination.
2399 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
2401 * clfswm.lisp (main): Check for access error in init-display.
2403 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
2404 keycode before grabbing.
2406 * bindings.lisp: Remove nlambda and use defun to keep the function
2407 documentation with clisp.
2408 (define-shell): new macro to define shell command for the second
2411 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
2413 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
2416 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
2418 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
2419 workspace circulation.
2421 * clfswm-util.lisp (absorb-orphan-window): new function.
2423 * clfswm-keys.lisp: Keysyms support.
2425 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
2427 * clfswm.lisp (show-group): Use one gc for all groups and not one
2430 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
2432 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
2434 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
2435 width and height outside group.
2437 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
2439 * clfswm.lisp: First public release.