1 2012-09-23 Philippe Brochard <pbrochard@common-lisp.net>
3 * src/clfswm.lisp (configure-request handler): To be ICCCM
4 compliant, send a fake configuration notify event only when the
5 window has moved and not when it has been resized.
7 2012-09-21 Philippe Brochard <pbrochard@common-lisp.net>
11 2012-09-09 Philippe Brochard <pbrochard@common-lisp.net>
13 * src/clfswm-internal.lisp
14 (delete-child-and-children-in-all-frames): Remove all children in
15 frames and only close windows.
17 * src/*.lisp: Remove uneeded with-xlib-protect.
19 2012-09-06 Philippe Brochard <pbrochard@common-lisp.net>
21 * contrib/wallpaper.lisp (wallpaper): create/use-background
22 simplification function.
24 2012-09-05 Philippe Brochard <pbrochard@common-lisp.net>
26 * contrib/wallpaper.lisp: New functionality to handle backgrounds
27 on differents screen heads.
29 * contrib/toolbar.lisp (toolbar-adjust-root-size): Takes care of
30 multiple toolbar on the same root edge.
32 2012-09-04 Philippe Brochard <pbrochard@common-lisp.net>
34 * src/clfswm-internal.lisp (show-all-children): Hide only children
35 hidden by normal windows or frames (but not :dialog,
37 (process-new-window): Remove borders for maxsize windows.
38 (show-all-children): Let the choice to always display children or
39 to optimize by hidding children not seen . The first option is
40 better with transparency support (frames behind orther frames are
41 seen). The second one is faster with many children in the same
42 frame (not seen children are not displayed).
44 2012-08-31 Philippe Brochard <pbrochard@common-lisp.net>
46 * src/xlib-util.lisp (with-xlib-protect): Handle all Xlib errors
47 for better code protection.
49 2012-08-28 Philippe Brochard <pbrochard@common-lisp.net>
51 * src/clfswm-expose-mode.lisp (expose-query-key-press-hook): Add
52 an option to immediately select child if they can be directly
55 2012-08-25 Philippe Brochard <pbrochard@common-lisp.net>
57 * contrib/volume-mode.lisp: Add mouse buttons actions in volume
58 mode. Add a volume button toolbar module.
60 2012-08-24 Philippe Brochard <pbrochard@common-lisp.net>
62 * contrib/mpd.lisp: New toolbar modules (available only if
63 toolbar.lisp is loaded).
64 Add a small parameter for toolbar modules useful with vertical
67 2012-08-21 Philippe Brochard <pbrochard@common-lisp.net>
69 * contrib/reboot-halt.lisp: Add configuration command for system
72 * contrib/toolbar.lisp (toggle-toolbar-hide-state): New function.
74 2012-08-20 Philippe Brochard <pbrochard@common-lisp.net>
76 * src/clfswm-internal.lisp (add-in-never-managed-window-list): New
79 2012-08-20 Philipp Kroos <philipp.kroos@t-online.de>
81 * src/clfswm-placement.lisp (here-placement): Evaluates to current
84 2012-08-20 Philipp Kroos <philipp.kroos@t-online.de>
86 * contrib/toolbar.lisp: Add an expose-mode-button-module.
88 2012-08-19 Philippe Brochard <pbrochard@common-lisp.net>
90 * contrib/toolbar.lisp (remove-toolbar): New function.
92 2012-08-18 Philippe Brochard <pbrochard@common-lisp.net>
94 * contrib/toolbar.lisp: Add configurable colors in toolbar
97 2012-08-16 Philippe Brochard <pbrochard@common-lisp.net>
99 * src/tools.lisp: Factorize system usage information collection.
100 (start-system-poll): Use a lock file instead of a local variable.
102 * contrib/toolbar.lisp: Add memory, cpu and battery usage module
103 with a poll methode. More responsive but up to date every 10s by
106 2012-08-15 Philippe Brochard <pbrochard@common-lisp.net>
108 * contrib/toolbar.lisp: Add a clickable label module for toolbar.
109 Add a clickable entry to open the CLFSWM main menu.
110 Add memory, cpu and battery usage module.
112 * src/clfswm-menu.lisp (open-menu): Prevent to reopen an opened
113 menu. Fixe a but with negative selected-item.
115 2012-08-14 Philippe Brochard <pbrochard@common-lisp.net>
117 * src/clfswm-util.lisp (eval-from-query-string): Show a notify
118 window when updating symobls list for REPL completion.
119 (show-current-root): New function and configuration menu to
120 display a message on the current root.
122 * contrib/toolbar.lisp: Add arguments in toolbar modules.
124 * src/xlib-util.lisp (event-hook-name): Intern hook name symbol
127 2012-08-13 Philippe Brochard <pbrochard@common-lisp.net>
129 * contrib/toolbar.lisp (toolbar-module-text): Print a formatted
130 text at module position centered in toolbar.
132 * src/xlib-util.lisp (optimize-event-hook): Remove unused event
135 2012-08-12 Philippe Brochard <pbrochard@common-lisp.net>
137 * contrib/toolbar.lisp: End of toolbar framework.
138 (list-toolbar-modules): Add a list toolbar modules function.
140 2012-08-03 Philippe Brochard <pbrochard@common-lisp.net>
142 * src/clfswm-internal.lisp (show-child): Show unmanaged windows
143 on (maybe) current child in all roots.
145 * src/clfswm-util.lisp (find-child-under-mouse-in-child-tree):
146 Handle children from all roots instead of from *root-frame*.
148 2012-07-23 Philippe Brochard <pbrochard@common-lisp.net>
150 * src/clfswm-expose-mode.lisp: New expose mode based on standard
153 2012-06-27 Philippe Brochard <pbrochard@common-lisp.net>
155 * src/clfswm-util.lisp (eval-from-query-string): Add completion
156 for eval for query string.
158 2012-06-26 Philippe Brochard <pbrochard@common-lisp.net>
160 * src/clfswm-query.lisp: Add completion for shell commands.
162 2012-06-18 Philippe Brochard <pbrochard@common-lisp.net>
164 * src/clfswm-placement.lisp: Each child can have its own border
165 size. New binding to change the child border size on the fly.
167 2012-06-08 Philippe Brochard <pbrochard@common-lisp.net>
169 * src/tools.lisp (process-timers): Call get-internal-real-time
170 only once for all times.
172 2012-06-07 Philippe Brochard <pbrochard@common-lisp.net>
174 * contrib/toolbar.lisp (define-toolbar-hooks): Add auto-hide
176 (define-toolbar-hooks): Add auto-hide toolbar (show/hide on mouse
179 2012-06-06 Philippe Brochard <pbrochard@common-lisp.net>
181 * src/xlib-util.lisp (handle-event): Add an additional hook event
182 system to handle events in contrib code.
184 2012-06-03 Philippe Brochard <pbrochard@common-lisp.net>
186 * src/clfswm-placement.lisp: Add an optional border size in all
189 2012-05-30 Philippe Brochard <pbrochard@common-lisp.net>
191 * contrib/toolbar.lisp (clock): Add a clock module.
193 2012-05-28 Philippe Brochard <pbrochard@common-lisp.net>
195 * contrib/toolbar.lisp: begining of toolbar support.
197 2012-05-24 Philippe Brochard <pbrochard@common-lisp.net>
199 * src/clfswm-internal.lisp (rotate-root-geometry): Do not use
200 rotatef but a simpler algorithm.
202 2012-05-19 Philippe Brochard <pbrochard@common-lisp.net>
204 * src/clfswm-placement.lisp: Adjust width and height in child and
205 root placement to prevent too big child size.
207 2012-05-18 Philippe Brochard <pbrochard@common-lisp.net>
209 * src/clfswm-placement.lisp: New root placement possibility.
211 * src/clfswm-util.lisp (change-current-root-geometry): New
214 2012-05-17 Philippe Brochard <pbrochard@common-lisp.net>
216 * src/clfswm-util.lisp (exchange-root-geometry-with-mouse): New
219 2012-05-16 Philippe Brochard <pbrochard@common-lisp.net>
221 * src/menu-def.lisp: New root menu.
223 2012-05-15 Philippe Brochard <pbrochard@common-lisp.net>
225 * src/clfswm-circulate-mode.lisp (rotate-root-geometry-next)
226 (rotate-root-geometry-previous): New second mode binding to change
229 2012-05-13 Philippe Brochard <pbrochard@common-lisp.net>
231 * src/clfswm-internal.lisp: Remove the *current-child* variable
232 and use a setfable function (current-child) instead.
233 (current-child-setter): Store root current child before apllying
234 current child change.
236 2012-05-09 Philippe Brochard <pbrochard@common-lisp.net>
238 * src/clfswm-internal.lisp: Use xdpyinfo/xinerama informations
239 instead of xrandr informations.
241 2012-05-06 Philippe Brochard <pbrochard@common-lisp.net>
243 * src/clfswm-internal.lisp : Use only one list for root
245 (*root*): Root management API simplification.
247 2012-04-30 Philippe Brochard <pbrochard@common-lisp.net>
249 * src/clfswm-internal.lisp: Big change to replace *current-root*
250 variable to support multiple root.
252 2012-04-18 Philippe Brochard <pbrochard@common-lisp.net>
254 * src/tools.lisp (add-new-hook, add-hook): New macro. Do not
255 duplicate hooks by default. Use add-new-hook if you want to
258 2012-04-16 Philippe Brochard <pbrochard@common-lisp.net>
260 * src/clfswm-corner.lisp (wait-window-in-query-tree): Add a limit
261 of try to wait the command window.
263 2012-02-25 Philippe Brochard <pbrochard@common-lisp.net>
265 * src/clfswm-util.lisp (place-frames-from-xrandr)
266 (swap-frame-geometry, rotate-frame-geometry): New helper functions
267 for multiple physical screen.
268 (jump-to-slot, add-frame-in-parent-frame): Change *current-root*
271 2012-01-18 Philippe Brochard <pbrochard@common-lisp.net>
273 * src/*.lisp: Use create-symbol and create-symbol-in-package
274 instead of the shorter symb. (Thanks Aad Versteden).
276 * src/bindings-second-mode.lisp (set-default-second-keys): New
277 key binding to set window and frame transparency.
279 * src/bindings.lisp (set-default-main-mouse): New mouse binding to
280 set window and frame transparency.
282 * src/clfswm-keys.lisp (define-keys): New macro to ease multiple
283 keys definitions. (Thanks Valentin Plechinger for the request).
285 * src/*.lisp: Add full transparency support with xcompmgr.
287 2012-01-14 Philippe Brochard <pbrochard@common-lisp.net>
289 * src/*.lisp: Add transparency support.
291 2012-01-09 Ales Guzik <ales.guzik@gmail.com>
293 * src/clfswm-layout.lisp (tile-layout-mix): New layout to
294 automatically choose between vertival and horizontal tile layout.
295 (tile-space-layout): Fix to have space between screen border and
296 frame the same as between frames.
298 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
300 * load.lisp: Support clisp 2.49+ module system to load CLX.
302 2012-01-04 Ales Guzik <ales.guzik@gmail.com>
304 * src/clfswm-layout.lisp (update-layout-managed-children-keep-position):
305 Fix an inattention error.
307 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
309 * src/xlib-util.lisp (with-xlib-protect): Protect from
310 xlib:lookup-error. This prevent an error in clisp/new-clx when
311 sometimes an xlib:colormap is expected instead of an xlib:window.
313 2012-01-03 Philippe Brochard <pbrochard@common-lisp.net>
315 * src/xlib-util.lisp (handle-event): Fix a clisp/new-clx error
316 when sometimes window slot of event-slots is a pixmap instead of a
319 2011-12-26 Philippe Brochard <pbrochard@common-lisp.net>
321 * src/clfswm-query.lisp: Fill the history list with a non-nil
324 2011-12-25 Philippe Brochard <pbrochard@common-lisp.net>
326 * src/package.lisp (make-x-drawable): Drawable wrapper to prevent
327 type error in some CLX versions.
328 Replace xlib:drawable-* functions with x-drawable-* equivalents
330 2011-12-14 Philippe Brochard <pbrochard@common-lisp.net>
332 * src/clfswm-util.lisp (um-create-xdg-section-list): Add at least
333 the 'Utility menu entry.
335 * src/config.lisp (*xdg-section-list*): moved to config.lisp.
337 * src/clfswm-util.lisp (update-menus): Set a default value for
338 searching .desktop files when XDG_DATA_DIRS is not set.
340 2011-10-15 Philippe Brochard <pbrochard@common-lisp.net>
342 * src/clfswm-internal.lisp (place-window-from-hints): Use
343 with-placement macro to place unmanaged windows in an arbitrary
346 2011-06-16 Philippe Brochard <pbrochard@common-lisp.net>
348 * src/clfswm-internal.lisp (clean-windows-in-all-frames): Prevent
349 current root and current child being equal to child.
351 2011-06-13 Philippe Brochard <pbrochard@common-lisp.net>
353 * src/keysyms.lisp: Repeat Page_Down/Up keysym definitions at the
354 end of the file to change keysyms priority.
356 2011-06-13 Sylvain HENRY <hsyl20@gmail.com>
358 * *.*: Minor spelling fix.
360 2011-06-12 Philippe Brochard <pbrochard@common-lisp.net>
362 * src/clfswm.lisp (:unmap-notify, :destroy-notify): Show all
363 children just after the xlib tree cleanup -> reduce the
364 flickering when a window is deleted or destroyed.
366 * src/clfswm-internal.lisp (process-existing-windows): Do not
367 process the notify window.
369 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
371 * *: **** Release 1106 ****
373 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
375 * src/clfswm-internal.lisp (clean-windows-in-all-frames): New
376 function to prevent xlib error when a window is deleted.
378 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
380 * src/clfswm-internal.lisp
381 (delete-child-and-children-in-all-frames): Delete or destroy
382 children before displaying all children.
384 2011-06-05 Philippe Brochard <pbrochard@common-lisp.net>
386 * src/clfswm-util.lisp (add-frame-in-parent-frame): New function
389 2011-06-04 Philippe Brochard <pbrochard@common-lisp.net>
391 * src/clfswm.lisp (main-unprotected): Destroy all frames windows
392 before closing the display (not really needed).
394 2011-06-02 Philippe Brochard <pbrochard@common-lisp.net>
396 * src/clfswm-layout.lisp (inc-tile-layout-size)
397 (dec-tile-layout-size, inc-slow-tile-layout-size)
398 (dec-slow-tile-layout-size): New functions and bindings.
400 2011-06-01 Philippe Brochard <pbrochard@common-lisp.net>
402 * src/clfswm-expose-mode.lisp (define-expose-letter-keys): Add
403 0..1 and A..Z keys to select a child in exposé mode.
405 * src/clfswm-internal.lisp (display-frame-info): Remove hidden
406 infos in frames windows.
408 * src/clfswm-util.lisp (ask-close/kill-current-window): Menu
411 2011-05-30 Philippe Brochard <pbrochard@common-lisp.net>
413 * src/clfswm-internal.lisp (get-parent-layout): Minor fullscreen
416 2011-05-29 Philippe Brochard <pbrochard@common-lisp.net>
418 * src/clfswm-internal.lisp
419 (delete-child-and-children-in-all-frames): Show all children
420 before deleting/destroying a windows, so prevent a flickering.
421 (get-parent-layout): Return the fullscreen size when the current
424 2011-05-28 Philippe Brochard <pbrochard@common-lisp.net>
426 * src/clfswm-internal.lisp (get-parent-layout): Handle correctly
429 * src/clfswm-util.lisp (delete-focus-window-generic): Do not hide
430 child before removing, so prevent a flickering.
432 * src/clfswm-internal.lisp (show-all-children): Rectangular
433 optimization to display only needed children.
434 (show-all-children): Remove flickering on
435 select-next/previous-brother.
437 2011-05-17 Philippe Brochard <pbrochard@common-lisp.net>
439 * src/clfswm-util.lisp (copy-focus-window, cut-focus-window): New
440 functions and ask-close/kill-current-window menu and bindings
443 2011-05-16 Philippe Brochard <pbrochard@common-lisp.net>
445 * src/clfswm-util.lisp (ask-close/kill-current-window): Add an
446 *ask-close/kill-placement* placement window variable.
448 2011-05-09 Philippe Brochard <pbrochard@common-lisp.net>
450 * contrib/osd.lisp (funcall-button-from-code): Display osd
451 documention for buttons and fix some redefining warnings.
453 2011-05-07 Philippe Brochard <pbrochard@common-lisp.net>
455 * src/clfswm-nw-hooks.lisp (make-permanent-nw-hook-frame): New
456 function. Prevent to add or delete a new window hook for this
459 * src/clfswm-layout.lisp (update-layout-managed-children-position):
462 2011-05-06 Philippe Brochard <pbrochard@common-lisp.net>
464 * src/bindings-second-mode.lisp (set-default-second-keys):
465 select-brother-spatial-move-* binding update.
467 * src/clfswm-layout.lisp (tile-left|right|top|bottom-layout): Ask
468 to keep children positions or not.
470 * src/clfswm-internal.lisp (fixe-real-size): Takes care of border
473 * src/clfswm-layout.lisp (update-layout-managed-children): Fix a
474 bug by using the parent frame instead of the current child.
476 * src/clfswm-circulate-mode.lisp
477 (select-brother-generic-spatial-move+right/left/up/down): New
478 function to select a brother from another in a spatial move.
480 2011-04-19 Philippe Brochard <pbrochard@common-lisp.net>
482 * src/clfswm-pack.lisp (move-frame-constrained)
483 (resize-frame-constrained): Use pixels instead of floating
486 2011-04-18 Philippe Brochard <pbrochard@common-lisp.net>
488 * src/clfswm-pack.lisp (resize-frame-constrained): Takes care of
490 (implode-frame, implode-current-frame): New functions. Absorb all
491 frames subchildren in frame. Explode frame opposite.
493 2011-04-17 Philippe Brochard <pbrochard@common-lisp.net>
495 * src/clfswm-pack.lisp (move-frame-constrained)
496 (resize-frame-constrained): New function. Move and resize frame
497 with the mouse constrained by other frame brothers.
499 2011-04-14 Philippe Brochard <pbrochard@common-lisp.net>
501 * src/clfswm-util.lisp (with-movement-select-next-brother)
502 (with-movement-select-previous-brother)
503 (with-movement-select-next-child): Use a simple method (do not
504 enter in the circulate mode) to allow to circulate in all children
507 * src/clfswm-menu.lisp (open-menu): Save info hash table keys
508 instead of deleting newly created keys.
510 2011-03-21 Philippe Brochard <pbrochard@common-lisp.net>
512 * src/clfswm-internal.lisp (x-px->fl, y-px->fl): Takes care of
515 2011-03-20 Philippe Brochard <pbrochard@common-lisp.net>
517 * src/clfswm-info.lisp (show-config-variable): call
518 produce-conf-var-doc.
520 2011-03-18 Philippe Brochard <pbrochard@common-lisp.net>
522 * src/clfswm-autodoc.lisp (produce-conf-var-doc-html): Produce a
523 documentation for all configurable variables in CLFSWM -
526 * src/clfswm-internal.lisp (leave-frame): Hide all children except
529 2011-03-16 Philippe Brochard <pbrochard@common-lisp.net>
531 * src/clfswm-autodoc.lisp (produce-all-docs): Produce a
532 documentation for all configurable variables in CLFSWM.
534 * src/clfswm-layout.lisp (set-gimp-layout): Display a notify
535 window with the help on the GIMP layout.
537 2011-03-12 Philippe Brochard <pbrochard@common-lisp.net>
539 * src/menu-def.lisp: Menu update to prevent cursor keys clash.
541 * clfswm.asd: Change compilation order to prevent undefined
544 * src/clfswm-internal.lisp (show-child(frame)): Handle properly
545 the show-root-frame-p parameter.
547 2011-03-11 Philippe Brochard <pbrochard@common-lisp.net>
549 * src/clfswm-util.lisp (move-frame, resize-frame): Do not move or
550 resize a frame when it's the current root.
552 2011-03-10 Philippe Brochard <pbrochard@common-lisp.net>
554 * src/clfswm-internal.lisp (show-all-children): Handle properly
555 duplicated child in multipe frames.
557 2011-03-09 Philippe Brochard <pbrochard@common-lisp.net>
559 * contrib/volume-mode.lisp (set-default-volume-keys): Add more
560 keybindings (up/down, right/left) to raise/lower the volume.
562 * src/clfswm-layout.lisp: Add a variable border size for frames
565 2011-03-08 Philippe Brochard <pbrochard@common-lisp.net>
567 * src/clfswm-util.lisp (cut-current-child, remove-current-child)
568 (delete-current-child): Hide the current child before doing the
571 * src/clfswm-internal.lisp (show-all-children): Hide windows not
572 in the current root before displaying those in current root.
573 Remove all hide-all unnecessary calls.
575 * src/clfswm-configuration.lisp (save-variables-in-conf-file):
576 Save only variables with a different value than their original
579 2011-03-07 Philippe Brochard <pbrochard@common-lisp.net>
581 * src/clfswm-info.lisp (show-config-variable): Use the new
584 * src/clfswm-autodoc.lisp (produce-configuration-variables): Use
585 the new defconfig method.
587 * src/clfswm-configuration.lisp (create-configuration-menu):
588 Change the config system with a more lispy one and a less string
589 based one: (defconfig name value group doc).
592 2011-03-06 Philippe Brochard <pbrochard@common-lisp.net>
594 * src/clfswm-internal.lisp (show-all-children): Simplify the
596 (show-child): Display an unmanaged window whe it's the current
598 (show-all-children): add the ability to display all child from
599 *root-frame* and hide all those who are not in *current-root*.
600 -> remove hide-all-children when needed.
602 * src/xlib-util.lisp (move-window,resize-window): Add a
603 *color-move-window* border when moving or resizing a window.
605 2011-03-04 Philippe Brochard <pbrochard@common-lisp.net>
607 * src/clfswm-internal.lisp (show-all-children): Perform only one
608 recusion on the clfswm tree: calculate geometry and place child in
611 2011-03-03 Philippe Brochard <pbrochard@common-lisp.net>
613 * src/clfswm-internal.lisp (show-all-children): Rethink of display
614 child order to prevent very annoying flickering.
616 2011-02-27 Philippe Brochard <pbrochard@common-lisp.net>
618 * src/clfswm-util.lisp (query-yes-or-no): New function.
620 * src/clfswm-configuration.lisp (reset-all-config-variables): New
621 function and menu entry.
622 (query-conf-value): Add the ability to leave the field blank to
623 reset the variable to its default value.
625 2011-02-26 Philippe Brochard <pbrochard@common-lisp.net>
627 * src/clfswm-configuration.lisp
628 (add-all-configuration-default-value): Add a default value to
629 configurable variables.
631 2011-02-23 Philippe Brochard <pbrochard@common-lisp.net>
633 * src/clfswm.lisp (main-unprotected): Create the configuration
634 menu only once at startup.
636 2011-02-22 Desmond O. Chang <dochang@gmail.com>
638 * contrib/amixer.lisp: Add a volume mode inspired by the emms
639 volume package. Alsa mixer interface.
641 * contrib/volume-mode.lisp: Add a volume mode inspired by the emms
644 2011-02-22 Desmond O. Chang <dochang@gmail.com>
646 * src/clfswm.lisp (main): Use ASDF:SYSTEM-SOURCE-DIRECTORY instead
647 of *LOAD-TRUENAME*. *LOAD-TRUENAME* is only bound during a call to
648 LOAD. If one eval CLFSWM:MAIN in repl, BASE-DIR will be an empty
649 string. Use ASDF:SYSTEM-SOURCE-DIRECTORY to fix it.
651 2011-02-16 Philippe Brochard <pbrochard@common-lisp.net>
653 * src/clfswm.lisp (main-unprotected): Add a close hook. And close
654 the notify window, the virtual keyboard and the clfswm terminal by
657 2011-02-15 Philippe Brochard <pbrochard@common-lisp.net>
659 * src/clfswm.lisp (main-unprotected): Destroy the notify window
660 before closing the display. This fix a bug when resetting/reloading
663 2011-02-12 Philippe Brochard <pbrochard@common-lisp.net>
665 * src/xlib-util.lisp (equal-wm-class-fun, equal-wm-name-fun)
666 (raise-window-fun, raise-and-focus-window-fun): New functions.
668 * src/config.lisp (*clfswm-terminal-cmd*): Switch from xterm to
670 (*never-managed-window-list*): Structure change to be more
671 flexible. Let the choice to focus, raise and do nothing on never
674 2011-02-09 Philippe Brochard <pbrochard@common-lisp.net>
676 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Take
677 care of never managed windows to move or resize them if the raise
680 * src/clfswm-internal.lisp (in-frame, in-window, in-child): New
683 2011-02-08 Philippe Brochard <pbrochard@common-lisp.net>
685 * src/clfswm.lisp (main-mode): Raise or not unmanaged windows
686 following request in *never-managed-window-list*.
688 2011-02-05 Philippe Brochard <pbrochard@common-lisp.net>
690 * *: **** Release 1102 ****
692 2011-02-05 Desmond O. Chang <dochang@gmail.com>
694 * src/keysyms.lisp: Add extended keysyms from stumpwm.
696 2011-02-01 Desmond O. Chang <dochang@gmail.com>
698 * src/clfswm-util.lisp (run-or-raise): New function (thanks to
701 * src/clfswm-internal.lisp (with-all-*): add a nil block.
703 2011-01-28 Desmond O. Chang <dochang@gmail.com>
705 * src/clfswm-util.lisp (xdg-config-home): XDG_CONFIG_HOME should
706 be $HOME/.config by default.
708 2010-12-29 Philippe Brochard <pbrochard@common-lisp.net>
710 * contrib/osd.lisp (display-doc): Add another method where a
711 CLFSWM native window is used to display the key documentation.
713 2010-12-27 Philippe Brochard <pbrochard@common-lisp.net>
715 * src/xlib-util.lisp (with-xlib-protect): Force to revert to the
718 2010-12-25 Philippe Brochard <pbrochard@common-lisp.net>
720 * src/clfswm-second-mode.lisp (second-key-mode): Call the second
721 mode leave function only when the generic mode was ended.
723 2010-12-08 Philippe Brochard <pbrochard@common-lisp.net>
725 * src/clfswm-second-mode.lisp (sm-leave-function): Do not use
726 *second-mode-program* anymore.
728 2010-12-07 Philippe Brochard <pbrochard@common-lisp.net>
730 * src/clfswm-second-mode.lisp (*second-mode-leave-function*): New
731 variable bound to a function executed (when not null) on second
734 2010-11-14 Philippe Brochard <pbrochard@common-lisp.net>
736 * src/clfswm-util.lisp (find-child-under-mouse): Do not find
739 2010-11-13 Philippe Brochard <pbrochard@common-lisp.net>
741 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
742 Do not display the accel window for unmanaged windows.
744 2010-11-11 Philippe Brochard <pbrochard@common-lisp.net>
746 * src/clfswm-internal.lisp (set-current-root): Handle
747 window-parent in set-current-root.
749 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
750 focus the parent child when the current root is a window.
752 2010-11-09 Philippe Brochard <pbrochard@common-lisp.net>
754 * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
755 New function an bindings.
757 * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
760 2010-11-07 Philippe Brochard <pbrochard@common-lisp.net>
762 * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
763 function to let the user choose to keep child position with
766 * src/clfswm-internal.lisp (remove-frame-data-slot): New
769 2010-11-05 Philippe Brochard <pbrochard@common-lisp.net>
771 * src/clfswm-internal.lisp (frame-select-next-child)
772 (frame-select-previous-child): New functions and bindings. Select
773 the next/previous child in the current frame.
775 2010-10-31 Philippe Brochard <pbrochard@common-lisp.net>
777 * src/clfswm-query.lisp (query-mode-complet): New function: Handle
778 completion in query-mode.
780 2010-10-30 Philippe Brochard <pbrochard@common-lisp.net>
782 * src/clfswm-query.lisp (query-print-string): Handle long lines
785 2010-10-27 Philippe Brochard <pbrochard@common-lisp.net>
787 * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
788 all characters are printable.
790 2010-10-25 Philippe Brochard <pbrochard@common-lisp.net>
792 * contrib/server/server.lisp: Load clfswm client code in the main
793 program and let the user start it with a --client command line
796 * src/package.lisp (*main-entrance-hook*): New hook executed after
797 loading configuration file and before opening the display.
799 2010-10-23 Philippe Brochard <pbrochard@common-lisp.net>
801 * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
803 * src/clfswm-internal.lisp (show-child): Show window only if not
806 * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
807 change modifiers after binding definition.
809 2010-10-21 Philippe Brochard <pbrochard@common-lisp.net>
811 * contrib/osd.lisp: New file: OSD (On Screen Display) for
814 * src/clfswm-menu.lisp (open-menu): Modularise function.
816 2010-10-13 Philippe Brochard <pbrochard@common-lisp.net>
818 * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
819 key binding in main and second mode.
821 2010-10-10 Philippe Brochard <pbrochard@common-lisp.net>
823 * src/clfswm-util.lisp (open-notify-window): Convert hello-window
824 functions to a more generic Notify-window system.
826 * src/tools.lisp (add-timer): Add an id to identify the timer.
828 2010-10-09 Philippe Brochard <pbrochard@common-lisp.net>
830 * src/tools.lisp (erase-timer): New function.
832 * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
833 the hello window. Add Configuration variables.
835 2010-10-08 Philippe Brochard <pbrochard@common-lisp.net>
837 * src/clfswm-util.lisp (): Add an Hello window at startup.
839 * src/tools.lisp (process-timers): Add a timer system.
841 2010-10-07 Philippe Brochard <pbrochard@common-lisp.net>
843 * src/clfswm-query.lisp (add-in-query-string): Handle correctly
846 2010-10-06 Philippe Brochard <pbrochard@common-lisp.net>
848 * src/clfswm-query.lisp (query-print-string): Change cursor color
849 and show parenthesis matching with colors (on match and on
852 2010-10-05 Philippe Brochard <pbrochard@common-lisp.net>
854 * src/clfswm-internal.lisp (show-all-children): Do not raise a
855 child when its parent is hidden.
857 2010-10-02 Philippe Brochard <pbrochard@common-lisp.net>
859 * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
860 possibility to circulate over subchild of the current child.
862 * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
863 (expose-windows-generic): Add an escape-body function to return to
864 the original state on escape key.
866 * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
867 to bind the current child from the configuration file.
869 2010-10-01 Philippe Brochard <pbrochard@common-lisp.net>
871 * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
872 window hook: the frame absorb all new windows that match
873 nw-absorb-test frame data slot.
875 2010-09-30 Philippe Brochard <pbrochard@common-lisp.net>
877 * src/clfswm-expose-mode.lisp (expose-create-window): Show window
878 title in accel window.
880 2010-09-29 Philippe Brochard <pbrochard@common-lisp.net>
882 * configure: Use the Xavier Maillard clfswm script in contrib to
883 build an executable in the standard way.
885 2010-09-26 Philippe Brochard <pbrochard@common-lisp.net>
887 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
888 New functions. Add a window on each child in the expose mode to
891 * src/clfswm-internal.lisp (child-x, child-y, child-width)
892 (child-height): New methods to get real child coordinates.
894 2010-09-25 Philippe Brochard <pbrochard@common-lisp.net>
896 * src/clfswm-layout.lisp (*-layout): Use child-position.
898 * src/clfswm-internal.lisp (child-position): New function.
900 * src/clfswm-expose-mode.lisp (expose-windows-mode)
901 (expose-all-windows-mode): Use a generic mode.
903 * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
904 with handle-event-fun symbols instead of inspecting clfswm
905 internals symbols on each mode change.
907 * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
908 a separate clfswm-expose-mode.lisp file.
910 * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
911 screen size instead of hardcoded test coordinates.
913 2010-09-24 Philippe Brochard <pbrochard@common-lisp.net>
915 * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
916 (speed-mouse-right, speed-mouse-up, speed-mouse-down)
917 (speed-mouse-undo, speed-mouse-first-history): New functions to
918 quickly move the mouse. Implemented for the second mode.
920 2010-09-16 Philippe Brochard <pbrochard@common-lisp.net>
922 * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
923 write permission on $clfswm_asd_path. So anybody can start clfswm
924 even if there is no write permission on the source directory.
926 2010-09-12 Philippe Brochard <pbrochard@common-lisp.net>
928 * contrib/clfswm: Add support to cmucl, ccl and ecl.
930 2010-09-11 Philippe Brochard <pbrochard@common-lisp.net>
932 * src/clfswm-util.lisp (set-hide-unmanaged-window)
933 (set-show-unmanaged-window, set-default-hide-unmanaged-window):
934 New functions and menu entry.
935 (set-globally-hide-unmanaged-window)
936 (set-globally-show-unmanaged-window): New functions and menu
939 * src/clfswm-internal.lisp (hide-unmanager-window-p): New
941 (show-child): Add a data slot on frame to hide or not unmanaged
944 * src/clfswm-corner.lisp (present-clfswm-terminal)
945 (present-virtual-keyboard): Use a function (generic-present-body)
946 instead of a macro (generate-present-body).
948 * src/clfswm-util.lisp (update-menus): List all directories and
949 subdirectories in $XDG_DATA_DIRS/applications.
951 2010-09-10 Philippe Brochard <pbrochard@common-lisp.net>
953 * src/clfswm-corner.lisp (generate-present-body): New macro.
954 (present-clfswm-terminal, present-virtual-keyboard): Use
955 generate-present-body.
957 2010-09-09 Philippe Brochard <pbrochard@common-lisp.net>
959 * src/clfswm-util.lisp (update-menus): Follow XDG specifications
960 instead of the non-portable Debian update-menu.
962 2010-09-07 Philippe Brochard <pbrochard@common-lisp.net>
964 * src/clfswm.lisp (error-handler): New function do handle
965 asynchronous errors and ignore them.
966 (open-display): Install the new error-handler on display.
968 2010-09-05 Philippe Brochard <pbrochard@common-lisp.net>
970 * src/xlib-util.lisp (with-xlib-protect): Add a
971 with-simple-restart on top of body execution.
973 2010-09-04 Philippe Brochard <pbrochard@common-lisp.net>
975 * src/clfswm.lisp (main-loop): Protect all xlib functions with an
978 * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
979 handle-event. Add a with-simple-restart to prevent a
980 clisp/new-lisp infinite loop.
982 2010-08-30 Philippe Brochard <pbrochard@common-lisp.net>
984 * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
985 clfswm terminal working even on xterm title changes.
987 2010-08-29 Philippe Brochard <pbrochard@common-lisp.net>
989 * src/clfswm-util.lisp (run-other-window-manager): Update for
992 * src/tools.lisp (do-execute): New parameter io to change the
995 * src/clfswm-util.lisp (hide-current-child): Prevent from removing
998 * src/clfswm-internal.lisp (child-member): New predicate.
999 (child-remove): New function.
1001 * src/*.lisp: Use child-member and child-remove everywhere it's
1004 2010-08-28 Philippe Brochard <pbrochard@common-lisp.net>
1006 * src/clfswm.lisp (main-loop): Ensure that all events have been
1007 processed after a process-event.
1009 * src/clfswm-internal.lisp (is-in-current-child-p): New function.
1011 2010-08-27 Philippe Brochard <pbrochard@common-lisp.net>
1013 * src/clfswm.lisp (main-mode:configure-request): Raise the window
1014 only when present on the current child and focus it accordingly.
1016 2010-08-26 Philippe Brochard <pbrochard@common-lisp.net>
1018 * src/clfswm-circulate-mode.lisp (circulate-loop-function):
1019 Use is-a-key-pressed-p.
1021 * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
1023 * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
1024 returned by xlib:keysym->keycodes.
1026 * src/*.lisp: Use the new child-equal-p to compare children. This
1027 prevent a bug with sbcl/cmucl when the standard equal function
1028 does not work with xlib:window.
1030 * src/clfswm-internal.lisp (child-equal-p): New predicate.
1032 2010-08-25 Philippe Brochard <pbrochard@common-lisp.net>
1034 * src/clfswm-generic-mode.lisp (generic-mode): Use an
1035 xlib:event-listen before processing event with
1036 xlib:process-event. This prevent a bug with CLX threaded
1037 implementation like sbcl.
1039 * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
1040 processing event with xlib:process-event. This prevent a bug with
1041 CLX threaded implementation like sbcl.
1043 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1045 * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
1047 * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
1050 * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
1051 (find-parent-frame, find-frame-window, find-frame-by-name)
1052 (find-frame-by-number): Use with-find-in-all-frames to search in
1053 frames in the right order.
1055 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
1056 unwanted flickering with unmanaged windows.
1058 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
1060 * src/package.lisp: Remove event handler hooks as they're not
1061 needed anymore (To replace them: use closure and define-handler).
1063 * src/xlib-util.lisp (move-window, resize-window)
1064 (wait-mouse-button-release): Use a generic mode.
1066 * src/*.lisp: Replace the case to handle event with a more (tricky)
1067 lispy method which bind a function to each keywords associated
1070 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
1072 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
1073 menu entry between delete-current-child and remove-current-child.
1074 ie: Delete a child and its children in all frames by default.
1076 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
1078 * src/package.lisp: Add a placement configuration group.
1080 * src/binding*.lisp: Bind control+g to escape the current action
1083 * src/clfswm-internal.lisp
1084 (delete-child-and-children-in-all-frames): New function and
1085 binding: Second mode - Control+Delete delete the current child and
1086 its children in all frames (ie: close the current child and its
1089 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
1091 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
1092 the frame window and the frame gc. Close a very annoying bug when
1093 cuting/pasting a frame or moving a child over frames with the
1096 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1097 all children in *current-root* after moving/resizing a frame.
1099 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
1101 * src/clfswm-util.lisp (delete-focus-window)
1102 (destroy-focus-window): Remove child in parent frame before
1105 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1107 * src/clfswm-util.lisp (identify-key): Add a timeout in
1109 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
1110 of the window passed by xlib:process-event.
1112 * src/xlib-util.lisp (move-window, resize-window)
1113 (wait-mouse-button-release): Add a timeout in xlib:process-event.
1115 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1117 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
1118 to launch an other window manager and to return to clfswm.
1120 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
1122 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
1125 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
1127 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
1130 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
1131 parameter and a loop timeout.
1133 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
1135 * src/clfswm.lisp (main): Add an alternate configuration filename
1138 * load.lisp: Add a debuging code example.
1140 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
1142 * src/clfswm-configuration.lisp (create-configuration-menu): New
1143 menu to configure all clfswm variables while clfswm is running.
1145 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
1147 * src/clfswm-util.lisp (save-configuration-variables): New
1148 function to save all configuration variables in clfswmrc.
1150 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
1152 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
1154 (set-default-info-keys): Add cursor key support in info mode.
1156 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
1158 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
1161 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
1162 prevent reading the configuration file (this may be useful to
1163 produce the original documentation without user modifications
1164 with the rc configuration file).
1166 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
1168 * src/bindings-second-mode.lisp (set-default-second-keys):
1169 Simplification of Escape key to close/kill/remove the focus window
1170 and unhide all windows.
1172 * src/bindings.lisp (set-default-main-keys): Simplification of
1173 Escape key to close/kill/remove the focus window and unhide all
1176 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
1177 focus and unhide all windows capabilities.
1179 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1181 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
1183 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
1185 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
1186 Keep child order and don't make unnecessary child movement.
1187 (one-column-layout, one-line-layout): New layouts.
1189 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
1191 * *: **** Release 0906 ****
1193 * contrib/cd-player.lisp: New file to handle the CD player.
1195 * contrib/xmms.lisp: New file to handle the xmms player.
1197 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1199 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
1200 Maximize windows in their frame - Leave frames to their actual
1203 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
1204 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
1206 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
1208 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
1210 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
1212 * contrib/mpd.lisp: Use a standard menu.
1214 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
1216 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
1218 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
1220 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
1222 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
1225 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
1227 * src/config.lisp (get-fullscreen-size): One pixel adjustment
1230 * src/clfswm-placement.lisp (*-child-placement): One pixel
1233 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
1235 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
1236 Ensure that all characters are printable.
1238 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
1241 * src/clfswm-placement.lisp (*-child-placement): Adjust
1242 coordinates to one pixel in the current child.
1244 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1246 * src/clfswm-query.lisp (query-enter-function): Assign font before
1247 width and height calculation.
1249 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1251 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
1252 bannish the pointer in an arbitrary place.
1254 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
1255 place the info window in an arbitrary place.
1257 * src/clfswm-query.lisp (query-enter-function): Use with-placement
1258 macro to place the query window in an arbitrary place.
1260 * src/clfswm-placement.lisp: New file. Allow to place info windows
1261 or query windows on an arbitrary place. Allow to bannish the
1262 pointer on an arbitrary place.
1264 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
1266 * src/clfswm-circulate-mode.lisp (reorder-child)
1267 (reorder-brother): Unfocus windows before reordering children or
1270 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1272 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
1273 the parent is a frame.
1275 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
1276 motion with a default modifier.
1278 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
1281 * src/clfswm-info.lisp (info-mode): Handle motion with a default
1283 (info-mode): Optimization in loop function.
1285 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1287 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
1288 root-frame correctly.
1290 * clfswm.asd: Dependency fix for clfswm-generic-mode.
1292 * src/clfswm-circulate-mode.lisp (reorder-child)
1293 (reorder-brother): Handle empty frames.
1294 (reorder-brother): Redisplay only the parent frame of the current
1297 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
1298 parent frame of the current frame.
1300 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
1302 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
1303 Maximize/Unmaximize the current frame in its parent frame.
1305 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
1306 windows and frames in their parent frame.
1308 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1310 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
1312 * src/clfswm-circulate-mode.lisp (reorder-child)
1313 (reorder-brother): Reinitialise on circulate type change
1314 child to brother or brother to child.
1316 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
1317 calls xlib:display-finish-output on each map-request. So speed up
1320 * src/xlib-util.lisp (map-window): New function. Call
1321 xlib:display-finish-output on each map request.
1323 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1325 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
1326 Optimisation when drawing second mode window.
1328 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1330 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
1333 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1335 * src/clfswm-util.lisp (run-program-from-query-string): Launch
1336 command only with a return validation.
1338 2009-04-22 Xavier Maillard <xma@gnu.org>
1340 * src/clfswm-query.lisp (query-string): Use a generic mode.
1342 2009-04-19 Xavier Maillard <xma@gnu.org>
1344 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
1346 2009-04-18 Xavier Maillard <xma@gnu.org>
1348 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
1349 to define all other modes.
1351 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1353 * src/package.lisp (): Use *default-font-string* for all
1356 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
1358 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
1360 * src/xlib-util.lisp (null-size-window-p): Better check of null
1363 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
1365 * src/clfswm.lisp (handle-map-request): Add a fix to manage
1366 correctly fullscreen windows (SDL particularly).
1368 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
1370 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
1371 a segfault with clisp/new-clx.
1373 * src/clfswm.lisp (handle-motion-notify): Add a needed window
1376 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
1377 needed window argument.
1379 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
1381 * src/xlib-util.lisp (wait-no-key-or-button-press)
1382 (wait-a-key-or-button-press): Check buttons press/release correctly"
1384 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
1386 * src/menu-def.lisp: Add children navigation menu in the movement
1387 menu (select next/previous child/brother/level).
1389 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
1391 * *: Rename 'sister' frame to 'brother' frame.
1393 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
1394 alias in a real modifier.
1396 * src/package.lisp (*modifier-alias*): New list of modifier alias
1397 For example: :alt is :mod-1, :numlock is :mod-2...
1399 * src/tools.lisp (remove-hook): New function.
1401 * src/clfswm-keys.lisp (with-capslock, without-capslock)
1402 (with-numlock, without-cnumlock): New functions.
1404 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
1406 * src/clfswm-info.lisp: Use the *binding-hook* to create info
1407 keys and mouse bindings.
1409 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
1410 second keys and mouse bindings.
1412 * src/bindings.lisp: Use the *binding-hook* to create main keys
1415 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1417 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
1420 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
1422 * src/menu-def.lisp: Use a menu instead of a function for the
1425 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
1427 * src/clfswm-util.lisp (show-standard-menu): Display the standard
1428 menu from the 'update-menus' command.
1430 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
1432 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
1433 it's already grabbed.
1435 * src/clfswm-internal.lisp (display-frame-info): Use configurable
1436 colors and fix a bug with background.
1437 (display-frame-info): Set window background when displaying info.
1439 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1441 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
1442 warning with clisp/new-clx.
1444 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
1446 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
1449 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1451 * *: **** Release 0809 ****
1453 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1455 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
1457 (ensure-unique-number): New function and menu entry.
1459 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
1461 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
1462 hook: open the next window in a named frame.
1463 (numbered-frame-nw-hook): New new window hook: open the next
1464 window in a numbered frame.
1466 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
1467 cases. So query-string can be called even in the main mode.
1469 * src/clfswm-internal.lisp (show-all-children): Do not raise a
1470 child by default => far less flickering.
1472 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
1474 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
1476 * src/menu-def.lisp: Change key binding for the CLFSWM menu
1479 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
1480 is nil. (workaround on some CLX implementation).
1482 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
1484 * src/menu-def.lisp: Add a menu to set a focus policy for all
1487 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
1488 (all-frames-set-*-focus-policy): Set a focus policy for all
1491 * src/clfswm.lisp (handle-enter-notify): sloppy-select
1492 mode. Select a child and its parents on mouse over.
1494 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
1496 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
1497 policy -> Sloppy focus only for windows in the current frame.
1498 (main-unprotected): Exit clfswm on init error (ie: when another
1499 window manager is running).
1501 * src/clfswm-util.lisp (reset-clfswm): New function.
1503 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
1505 * src/clfswm-menu.lisp (init-menu): New function.
1507 * src/clfswm-util.lisp (reload-clfswm): New function to reload
1509 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
1511 * src/clfswm.lisp (main, main-unprotected): Handle error in a
1512 superior main function. Now CLFSWM can't break the X session. It
1513 just reinitialize the display and run a new main loop.
1515 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
1516 *vt-keyboard-on* global to avoid warnings when loading clfswm.
1518 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
1519 (help-on-gimp-layout): Describe how to use the GIMP layout.
1521 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
1523 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
1524 main-window-right-layout. Change the keybinding for (shift)alt+tab
1525 to not select windows in the main window lisst.
1526 Bind F8 to add a window in the main window list.
1527 Bind F9 to remove a window in the main window list.
1528 Change the focus policy to :sloppy.
1529 (set-previous-layout): Restore the previous layout, keybinding and
1532 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
1534 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
1536 * src/clfswm-layout.lisp (main-window-left-layout)
1537 (main-window-bottom-layout, main-window-top-layout): New
1539 Factorize layouts in menu.
1541 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
1543 * src/clfswm-layout.lisp (main-window-right-layout): A possible
1544 GIMP layout: one or more main windows on one side of the
1545 frame. Others on the other size.
1547 * src/clfswm-util.lisp
1548 (current-frame-set-click/sloppy-focus-policy): Each frame can have
1549 a different focus policy (one of :click or :sloppy).
1550 The default focus policy is set with *default-focus-policy*.
1552 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
1554 * src/clfswm-info.lisp (show-config-variable): New function.
1556 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
1558 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
1560 * src/clfswm-info.lisp: Colored help for key binding and corners
1563 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
1565 * src/clfswm-util.lisp (delete-focus-window)
1566 (destroy-focus-window): Remove chid only in
1567 handle-unmap/destroy-notify. Focus *current-root* only when
1568 closing/killing the current child.
1570 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
1571 functions or corners.
1573 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1575 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
1576 action: Hide/Unhide a terminal on mouse corner action. (By default
1577 right mouse button on the top left corner).
1579 * src/config.lisp (*never-managed-window-list*): New config
1582 * src/clfswm-internal.lisp (never-managed-window-p): New function:
1583 Handle never managed window in a more simple way.
1585 * src/clfswm-corner.lisp: New file and new and more simple method
1586 to define corners actions.
1588 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
1590 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
1592 * src/clfswm-layout.lisp (fast-layout-switch)
1593 (define-fast-layout-switch): New functions: Switch between two
1596 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
1597 really in the second mode. So leave-second-mode can be used even
1600 * src/clfswm-util.lisp (switch-to-last-child): New function:
1601 Store the current child and switch to the previous one.
1603 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1605 * src/clfswm-util.lisp (display-current-window-info): Display the
1607 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
1608 (top right by default). By default 'xvkbd' is used.
1610 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1612 * src/xlib-util.lisp (move-window, resize-window): Compress motion
1615 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
1617 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
1620 * src/clfswm-info.lisp (info-mode): Compress motion events.
1622 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
1624 * src/clfswm-internal.lisp (show-all-children): Compute geometry
1625 and selection first and then show only necessary children.
1626 (show-child): remove unneeded display-p parameter.
1628 * src/config.lisp (get-fullscreen-size): Place the frame border
1629 outside the screen (this prevent the loose of 2 pixels per
1632 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
1634 * src/clfswm-internal.lisp (focus-child): Algorithm change to
1635 raise only the selected child.
1637 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
1639 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
1640 Raise only viewable children.
1642 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
1644 * src/clfswm-internal.lisp (show-all-children): Always raise all
1645 displayed children. Remove all references to raise-p.
1647 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1649 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
1652 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
1653 second mode binding on raise/lower child in its frame.
1655 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
1656 behaviour to the new raise/lower property.
1657 Call clear-nw-hook before the rest of the hook.
1659 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
1660 (mouse-click-to-focus-and-resize-window): Stop button event. This
1661 prevent a keyboard/pointer freeze.
1663 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1665 * src/clfswm-internal.lisp (frame-lower-child)
1666 (frame-raise-child): New functions to raise/lower a child in its
1669 * src/clfswm-util.lisp (have-to-present-windows)
1670 (have-to-present-all-windows): New functions to have an MaxOS
1671 expose like on mouse click in screen corner.
1673 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
1675 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
1677 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
1678 child from a choice in all frames with hidden children.
1680 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
1682 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
1684 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
1685 (unhide-all-children): New functions.
1687 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
1690 * src/clfswm-util.lisp (hide/show-frame-window): new function and
1693 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
1695 * src/clfswm-util.lisp (rename-current-child): Do not display the
1696 frame info for a window.
1698 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
1700 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
1701 frame window for the removed child and its children.
1703 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
1705 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
1708 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
1710 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
1711 the ROX pinboard (ie: leave it lowered in the root window as
1714 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
1715 (tile-left-layout, tile-right-layout, tile-top-layout)
1716 (tile-bottom-layout): Use all the frame space when there is only
1719 * src/clfswm-internal.lisp (place-window-from-hints): Center
1720 unmanaged windows in the root screen.
1722 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
1725 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1727 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
1728 typo in managed types.
1730 * src/clfswm-internal.lisp (show-child): Always display frame info
1731 even if the frame is hidden.
1733 * src/xlib-util.lisp (resize-window): Use a better algorithme to
1736 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1738 * src/clfswm-util.lisp (with-movement): Display frame info for all
1739 frames in current root.
1741 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1743 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
1745 * src/bindings-second-mode.lisp (define-second-key #\a): New
1746 binding on 'add-default-frame'.
1748 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1749 message to follow the autodocumentation process.
1751 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1753 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1754 "Space" to jump to a child. "B" to bind a slot on the current
1757 * src/bindings-second-mode.lisp: Use "Tab" instead of
1760 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
1762 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1763 unmanaged (hidden) windows.
1765 * src/clfswm-internal.lisp (place-window-from-hints): Give a
1766 minimal size for windows.
1767 (with-all-windows-frames-and-parent): New function.
1769 * src/config.lisp (*default-window-width/height*): New parameters.
1771 * src/clfswm-internal.lisp (place-window-from-hints): Center
1772 windows in the screen instead of in their frame.
1774 * src/bindings-second-mode.lisp (tile-space-current-frame): New
1777 * src/clfswm-layout.lisp (register-layout): Intern the once name
1778 in the right package.
1780 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1782 * doc/dot-clfswmrc: Update to follow the new clfswm way.
1784 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
1786 * src/clfswm-internal.lisp (set-current-child)
1787 (adapt-child-to-parent, show-child, hide-child): Handle the case
1788 where child is not a frame or a window.
1790 * src/clfswm-util.lisp
1791 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1792 Check if child is a frame.
1794 * src/clfswm-internal.lisp (managed-window-p): Handle the case
1795 where frame is null.
1796 (place-frame): Check if frame and parent are frames.
1798 * src/clfswm-info.lisp (info-mode): display all frame info before
1801 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1802 info before leaving.
1804 * src/clfswm-internal.lisp (display-all-frame-info): New function.
1806 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
1808 * src/tools.lisp (getenv): Implemented for ECL.
1809 (urun-prog): Implemented for ECL.
1811 * src/clfswm-util.lisp (identify-key): Use a double buffer to
1814 * src/clfswm-query.lisp (query-string): Use a double buffer to
1817 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1820 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1823 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
1825 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1827 * src/menu-def.lisp: New file: move all menu definition in
1830 * src/clfswm-layout.lisp (register-layout): Use a function instead
1833 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
1835 * src/clfswm-autodoc.lisp (produce-menu-doc,
1836 (produce-menu-doc-html): New functions.
1837 (produce-doc-*): Moved to clfswm-autodoc.lisp.
1839 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1840 paste a child on one of its own children. (this prevent a
1842 (move-child-to): Rename move/copy-current-child-by to
1844 (mouse-move-window-over-frame): New function to move the window
1845 under the mouse cursor to another frame.
1847 * src/clfswm-internal.lisp (find-child-in-parent): New function.
1849 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1851 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1852 windows only when its window parent is the current child.
1854 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1856 * src/clfswm-util.lisp (manage-current-window)
1857 (unmanage-current-window): New functions: Allow to force to manage
1858 or unmanage a window by its parent frame.
1860 * src/bindings-second-mode.lisp (#\o): binded to
1861 set-open-in-new-frame-in-parent-frame-nw-hook and
1862 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1864 * src/clfswm-util.lisp (with-current-window): New macro.
1866 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1867 exposure and enter-window handle event.
1869 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1870 children for the current child after the move/resize.
1872 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1874 * src/xlib-util.lisp (resize-window): Take care of window size
1877 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1878 move/resize unmanaged windows.
1880 * src/xlib-util.lisp (move-window, resize-window): New functions.
1882 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1884 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1885 user choose what window type the current frame must handle.
1886 (display-current-window-info): New function.
1887 (current-frame-manage-all-window-type)
1888 (current-frame-manage-only-normal-window-type)
1889 (current-frame-manage-no-window-type): New functions.
1891 * src/clfswm-internal.lisp (managed-window-p): New function.
1893 * src/package.lisp (frame): Managed type: new frame
1894 parameter. This allow to choose what window type a frame must
1897 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1899 * src/clfswm-nw-hooks.lisp
1900 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1902 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1905 * src/tools.lisp (ensure-printable): Return always a string even
1908 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
1910 * src/config.lisp (*default-nw-hook*): New variable to change the
1911 default new window hook.
1913 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1915 * clfswm.asd (clfswm): Add a dependency from
1916 clfswm-second-mode.lisp to clfswm.lisp.
1918 * src/clfswm-util.lisp (identify-key): Show the documentation for
1919 the function bound on a key.
1920 (with-movement): Move with-movement,
1921 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
1922 to clfswm-util.lisp.
1924 * src/clfswm-menu.lisp: New menu system that let user change keys
1925 or functions associated to keys.
1927 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
1929 * src/clfswm-internal.lisp (show-all-children): Display-child is
1930 the first child by default. Solve a bug with father-p.
1932 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
1934 * src/clfswm-internal.lisp (add-frame): Add frame return the
1936 (show-all-children): Move the size computation outside the
1939 * src/bindings-second-mode.lisp (with-movement): Redisplay only
1942 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1943 only the current child.
1945 * src/clfswm-internal.lisp (show-all-children): New display-child
1946 parameter to display only the desired child and its children.
1947 (select-next/previous-child): Only display the current child.
1949 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
1951 * src/clfswm.lisp (init-display): Move the default frame creation
1952 on the default init hook.
1954 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1955 the main mode (for example: "1" on an azerty keyboard).
1957 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
1959 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1960 keysyms. Revert to old grabbing method for the main mode.
1962 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
1964 * src/clfswm.lisp (init-display): Add key handling on no focus
1965 window and on frame windows.
1967 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1969 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1970 all keys by default and replay just what is needed. No change for
1973 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1974 (find-key-from-code): Test for shift and not shift presence.
1976 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
1978 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1979 new key parameter to have less flickering.
1981 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
1983 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1984 layout only one time and revert to no-layout to freely handle
1987 * src/clfswm-nw-hooks.lisp
1988 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1989 with new created window.
1991 * src/clfswm-layout.lisp (register-layout): Now register
1992 automatically a once layout to set the layout only one time and
1993 revert to no-layout to freely handle frames.
1995 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1997 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1998 nw-hook: Open the next window in the current frame and leave the
1999 focus to the current child.
2001 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
2003 * src/bindings-second-mode.lisp: Add keys definitions to
2004 bind-or-jump in the second mode.
2006 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
2007 macro for bind-or-jump-(1|2|3...).
2009 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
2010 arguments to function. This allow to do things like:
2011 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
2012 are passed to my-function on key press.
2014 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
2016 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
2018 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
2020 * src/clfswm-internal.lisp (child-fullname): New function
2022 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
2023 docstring in info-mode-menu. An item can be
2024 '((key function) (key function)) or with docstring
2025 '((key function "documentation 1") (key function "bla bla") (key function))
2027 * src/tools.lisp (ensure-n-elems): New function.
2029 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
2030 resize a frame or the window's father.
2032 * src/clfswm.lisp (init-display): Remove tile-space-layout by
2033 default on the root frame.
2035 * src/clfswm-util.lisp (move/resize-frame): Add standard event
2036 hooks handlers (map-request, configure-notify...)
2038 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
2041 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
2043 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
2044 or the window's father.
2046 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
2047 event only if there is a geometry change.
2048 (mouse-focus-move/resize-generic): Generic function to move or
2049 resize a frame or a window father frame.
2051 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
2053 * src/clfswm-internal.lisp (show-all-children): Return t if there
2054 is a geometry change.
2056 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
2058 * src/bindings.lisp (Up/Down): Swap select previous/next level.
2060 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
2062 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
2064 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
2065 (with-all-*): Reverse the child list to manage the first child last (like in
2068 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
2069 root window only if true.
2071 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
2072 root window only if *create-frame-on-root* is true.
2074 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
2077 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
2079 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
2080 the current child (even if it's a window).
2082 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
2084 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
2085 (mouse-click-to-focus-and-resize): New functions.
2087 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
2088 (*-px->fl): Convert pixel coordinates to float.
2090 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
2092 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
2094 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
2097 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
2098 and hide-all-children.
2099 (raise-if-needed): New function.
2100 (show-child): Use a first-p parameter to raise windows only when they are
2103 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
2105 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
2108 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
2110 * src/clfswm-info.lisp (keys-from-list): new function.
2112 * src/*: rename 'childs' in 'children'.
2114 * src/*: rename 'group' in 'frame'.
2116 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
2118 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
2120 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
2122 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
2124 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
2126 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
2127 Bind control+o to open the next window in a new group in the root group
2128 (as open in next window in a new workspace in 0801 version).
2130 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
2132 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
2135 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
2137 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
2138 instead of Tab for select-previous-child.
2140 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
2142 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
2145 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
2147 * clfswm-util.lisp (identify-key): Display the documentation
2148 associated to keys when identifying a key.
2150 2008-03-10 Xavier Maillard <xma@gnu.org>
2152 * contrib/clfswm: Complete rewrite of the script. Detect error and
2153 act accordingly. Add command line arguments to configure the
2154 script execution. User can now choose different common lisp
2155 implementation (clisp and sbcl only), choose where to store the
2156 dumped image, where to find clfswm source.
2158 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
2160 * clfswm-internal.lisp (process-new-window): Beginning of new
2161 window hook: each group have a hook to tell what he wants to do
2162 with the new created window.
2164 2008-03-08 Xavier Maillard <xma@gnu.org>
2166 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
2167 call the resulting executable.
2169 * clfswm.lisp (read-conf-file): Check for the user config file in
2170 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
2171 prefered whenever possible.
2173 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
2175 * clfswm-layout.lisp (*-layout): Add an optional raise-p
2176 parameter in each layout.
2178 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2180 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
2182 (copy/move-current-child-by-name/number): new functions
2183 (focus-group-by-name/number): new functions
2184 (delete-group-by-name/number): new functions
2186 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2188 * ************************************************************ *
2189 *: Major update - No more reference to workspaces. The main *
2190 structure is a tree of groups or application windows. *
2191 * ************************************************************ *
2193 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
2195 * clfswm.lisp (read-conf-file): Read configuration in
2196 $HOME/.clfswmrc or in /etc/clfswmrc or in
2197 $XDG_CONFIG_HOME/clfswm/clfswmrc.
2198 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
2201 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
2203 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
2206 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
2208 * clfswm-internal.lisp (find-window-group): New function.
2210 * clfswm*: Change to make clfswm run with clisp/new-clx.
2212 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
2214 * clfswm-util.lisp (query-show-paren): Add show parent matching in
2216 (query-string): Bind control+k to delete end of line.
2218 * clfswm-second-mode.lisp (draw-second-mode-window): Display
2219 the action on mouse motion in second mode.
2221 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
2222 event but do not clear the root window.
2223 (handle-configure-request): Adjust unmanaged window from their
2226 * clfswm-internal.lisp (process-new-window): Adjust new window
2227 with the specified hints (max/min/base width/height).
2229 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
2231 * clfswm.lisp (handle-configure-request): Send an Configuration
2232 Notify event. This solve a bug with xterm and rxvt who takes some
2233 times to be mapped. Now there is no delay.
2235 * bindings-second-mode.lisp (define-shell): Run programs after
2236 living the second mode.
2238 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
2240 * clfswm-internal.lisp (process-new-window): Do not crop transient
2241 window to group size.
2242 (adapt-window-to-group): Do not crop transient window to group
2245 * clfswm.lisp (handle-configure-request): Adapt just the window to
2246 its group and don't take care of the configure request. Remove the
2247 bug with the Gimp outside the group and speed up the window
2249 (handle-exposure): Remove show-all-group on exposure event
2252 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
2254 * clfswm-util.lisp (circulate-group-up-copy-window)
2255 (circulate-group-down-copy-window)
2256 (circulate-workspace-up-copy-group)
2257 (circulate-workspace-down-copy-group): Prevent the copy of the
2258 same window in the same workspace.
2260 * bindings-second-mode.lisp (release-copy-selected-window)
2261 (release-copy-selected-group): Prevent the copy of the same window
2262 in the same workspace.
2264 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
2265 (generic-pager-move-window-on-next-line): Remove the copy
2267 (generic-pager-move-group-on-next-workspace)
2268 (generic-pager-move-group-on-previous-workspace): Prevent the copy
2269 of the same window in the same workspace.
2271 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
2272 (mouse-pager-copy-selected-group-release): Prevent the copy of the
2273 same window in the same workspace.
2275 * tools.lisp (setf/=): new macro to set a variable only when
2278 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
2279 x, y... only when necessary.
2281 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
2283 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
2284 new function and hook: force windows to stay in its group (solve a
2287 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
2289 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
2290 less flickering when moving/resizing groups.
2292 * clfswm-internal.lisp (hide-group): new function.
2293 (show-all-group): clear-all: new parameter.
2295 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
2297 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
2299 * clfswm*: Color change for the pager. Typo or better description
2300 in bindings definitions. Define bindings for a qwerty keyboard by
2301 default. dot-clfswmrc show examples to switch to an azerty
2303 License change to GPL v3.
2304 * config.lisp: new file - group all globals variables in this
2307 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
2309 * xlib-util.lisp (hide-window): Remove structure-notivy events
2310 when hidding a window.
2312 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
2314 * package.lisp (*sm-property-notify-hook*): Readded
2315 property-notify-hook in second mode.
2317 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
2319 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
2321 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
2323 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
2324 Tile the current workspace with the current window on one side and
2325 others on the other (this emulate the larswm, dwm, wmii way). See
2326 the default configuration file to enable this mode by default.
2328 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
2331 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
2333 * clfswm-pager.lisp (pager-draw-window-in-group): Add
2334 ensure-printable to print windows name even with non-ascii
2337 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
2339 * clfswm-pager.lisp (pager-explode-current-group): Create a new
2340 group for each window in group.
2341 (pager-implode-current-group): Move all windows in workspace to
2342 one group and remove other groups.
2344 * clfswm-pack.lisp (explode-group): Create a new group for each
2346 (implode-group): Move all windows in workspace to one group and
2347 remove other groups.
2349 * clfswm-util.lisp (identify-key): Remove local configuration
2350 variables and made them available for configuration from
2352 (query-string): idem.
2354 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
2356 * netwm-util.lisp: Start of NetWM compliance.
2357 Add a Netwm client list gestion.
2359 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
2361 * clfswm-internal.lisp (create-group-on-request): open a new group
2362 only when the current group is not empty.
2364 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
2365 bug with null workspace.
2367 * clfswm-pager.lisp (pager-handle-event): Add a hook
2368 system. This hooks can be changed in the user configuration file.
2370 * package.lisp: All colors and font variables are set in
2371 package.lisp and can be configured in the user configuration
2373 Note: If you have configured some less ugly colors (esp. for the
2374 pager) don't hesitate to let me know :)
2376 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
2377 system. This hooks can be changed in the user configuration file.
2379 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
2380 changed in the user configuration file (~/.clfswmrc)
2382 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
2384 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
2385 arrow action, open next window in new workspace/group.
2387 * bindings.lisp (stop-all-pending-actions): new binding.
2388 (open-next-window-in-new-group-once): Open the next windows in a
2389 new group (only once) or open all new windows in a new group (like
2390 others windows managers).
2392 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
2394 * clfswm.lisp (read-conf-file): New function to read a lisp
2395 configuration file at startup.
2396 (focus-group-under-mouse): Check if group isn't the current group
2397 ( prevent a bug with unclutter ).
2399 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
2401 * bindings.lisp (run-program-from-query-string): A program can be
2402 launch from a input query window.
2404 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
2406 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
2408 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
2410 * clfswm.lisp (process-new-window): One can now open the next
2411 window in a workspace called by its number.
2413 * clfswm-util.lisp (query-font-string): Minimal editing
2415 (eval-from-string): And an REPL in the window manager... :)
2417 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2419 * clfswm.lisp (process-new-window): One can now open the next
2420 window in a new workspace or a new group.
2422 * clfswm-pager.lisp (pager-mode): Display the next arrow action
2423 with the hidden windows.
2425 * clfswm.lisp (second-key-mode): Display the current workspace
2426 number and the next arrow action in the state window.
2428 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
2429 the pager mode and then redisplay only the current workspace.
2431 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
2433 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
2434 they can be focused with a keypress, sorted or renumbered.
2436 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2438 * clfswm-pager.lisp (pager-mode): Remove multiple silly
2439 pager-draw-display. This prevent a lot of flickering in the
2442 * clfswm.lisp: Remove all display-force-output and replace them
2443 with only one display-finish-output in the event loop.
2445 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
2447 * clfswm-pager.lisp (pager-center-group): New function - center a
2448 group at the middle of the screen.
2450 * clfswm-pack.lisp (center-group): New function - center a group
2451 at the middle of the screen.
2453 * clfswm.lisp (show-group): Add a cross line under the group.
2454 (show-group): Group are showned even if fullscreened.
2455 (init-display): Add an exposure event on the root window.
2457 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
2459 * package.lisp (*default-group*): Default group is the same size
2460 of a fullscreened group.
2462 * bindings*: Use shift to move, control+shift to copy.
2464 * *.lisp: Add comments for configuration or alternatives. So grep
2465 for CONFIG to see where you can configure clfswm. And grep for
2466 Alternative to use some commented code.
2468 * clfswm.lisp (second-key-mode): Use a single window to show the
2469 second mode. See for alternatives at the end of this file.
2471 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
2473 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
2474 macro of key and mouse definitions.
2475 (define-define-key/mouse): Use state instead of modifiers list
2476 this fix a bug when the modifiers list is not in the rigth order.
2478 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
2480 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
2482 * clfswm-info.lisp (info-mode): Add an info mode.
2484 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
2486 * clfswm.lisp (process-new-window): Change border size for
2488 (show-all-windows-in-workspace): Unhide all windows even when the
2489 current group is in fullscreen mode.
2491 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
2493 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
2494 redisplay the identify window after a terminal switch.
2496 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
2497 redisplay the pager after a terminal switch.
2499 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
2501 * clfswm-util.lisp (identify-key): Add a window to display
2502 the keys to identify on screen.
2504 * bindings.lisp, bindings-pager.lisp: Define same keys to
2505 move/copy groups/windows in second mode and in pager.
2507 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
2509 (show-all-windows-in-workspace): unhide window before adapting it
2512 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
2514 * clfswm.lisp (handle-event): Revert to an older version.
2516 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
2518 * clfswm-util.lisp (force-window-in-group)
2519 (force-window-center-in-group): New functions for transient windows.
2521 * clfswm-pager.lisp (pager-remove-current-workspace/group):
2522 bugfix: hide all windows before removing group or workspace.
2524 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
2526 * bindings-pager.lisp (mouse-pager-move-selected-group)
2527 (mouse-pager-copy-selected-group)
2528 (mouse-pager-move-selected-window)
2529 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
2530 (mouse-pager-rotate-window-down): New functions to have mouse in
2533 * clfswm-pager.lisp (pager-swap-window)
2534 (pager-copy-group-on-next/previous-workspace)
2535 (pager-copy-window-on-next/previous-line): New functions
2537 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
2539 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
2540 (pager-move-group-on-next/previous-workspace): new functions.
2542 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
2543 to its half size (new functions).
2545 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
2547 * clfswm-pager.lisp: workspaces, groups and windows can now be
2548 selectionned with the keyboard or the mouse.
2550 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
2552 * clfswm-pager.lisp (pager-select-workspace-right/left):
2553 workspaces can now be selectionned with the keyboard.
2555 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
2557 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
2558 new function to remove a previous defined key or mouse combination.
2560 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
2562 * clfswm.lisp (main): Check for access error in init-display.
2564 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
2565 keycode before grabbing.
2567 * bindings.lisp: Remove nlambda and use defun to keep the function
2568 documentation with clisp.
2569 (define-shell): new macro to define shell command for the second
2572 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
2574 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
2577 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
2579 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
2580 workspace circulation.
2582 * clfswm-util.lisp (absorb-orphan-window): new function.
2584 * clfswm-keys.lisp: Keysyms support.
2586 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
2588 * clfswm.lisp (show-group): Use one gc for all groups and not one
2591 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
2593 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
2595 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
2596 width and height outside group.
2598 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
2600 * clfswm.lisp: First public release.