1 2012-08-18 Philippe Brochard <pbrochard@common-lisp.net>
3 * contrib/toolbar.lisp: Add configurable colors in toolbar
6 2012-08-16 Philippe Brochard <pbrochard@common-lisp.net>
8 * src/tools.lisp: Factorize system usage information collection.
9 (start-system-poll): Use a lock file instead of a local variable.
11 * contrib/toolbar.lisp: Add memory, cpu and battery usage module
12 with a poll methode. More responsive but up to date every 10s by
15 2012-08-15 Philippe Brochard <pbrochard@common-lisp.net>
17 * contrib/toolbar.lisp: Add a clickable label module for toolbar.
18 Add a clickable entry to open the CLFSWM main menu.
19 Add memory, cpu and battery usage module.
21 * src/clfswm-menu.lisp (open-menu): Prevent to reopen an opened
22 menu. Fixe a but with negative selected-item.
24 2012-08-14 Philippe Brochard <pbrochard@common-lisp.net>
26 * src/clfswm-util.lisp (eval-from-query-string): Show a notify
27 window when updating symobls list for REPL completion.
28 (show-current-root): New function and configuration menu to
29 display a message on the current root.
31 * contrib/toolbar.lisp: Add arguments in toolbar modules.
33 * src/xlib-util.lisp (event-hook-name): Intern hook name symbol
36 2012-08-13 Philippe Brochard <pbrochard@common-lisp.net>
38 * contrib/toolbar.lisp (toolbar-module-text): Print a formatted
39 text at module position centered in toolbar.
41 * src/xlib-util.lisp (optimize-event-hook): Remove unused event
44 2012-08-12 Philippe Brochard <pbrochard@common-lisp.net>
46 * contrib/toolbar.lisp: End of toolbar framework.
47 (list-toolbar-modules): Add a list toolbar modules function.
49 2012-08-03 Philippe Brochard <pbrochard@common-lisp.net>
51 * src/clfswm-internal.lisp (show-child): Show unmanaged windows
52 on (maybe) current child in all roots.
54 * src/clfswm-util.lisp (find-child-under-mouse-in-child-tree):
55 Handle children from all roots instead of from *root-frame*.
57 2012-07-23 Philippe Brochard <pbrochard@common-lisp.net>
59 * src/clfswm-expose-mode.lisp: New expose mode based on standard
62 2012-06-27 Philippe Brochard <pbrochard@common-lisp.net>
64 * src/clfswm-util.lisp (eval-from-query-string): Add completion
65 for eval for query string.
67 2012-06-26 Philippe Brochard <pbrochard@common-lisp.net>
69 * src/clfswm-query.lisp: Add completion for shell commands.
71 2012-06-18 Philippe Brochard <pbrochard@common-lisp.net>
73 * src/clfswm-placement.lisp: Each child can have its own border
74 size. New binding to change the child border size on the fly.
76 2012-06-08 Philippe Brochard <pbrochard@common-lisp.net>
78 * src/tools.lisp (process-timers): Call get-internal-real-time
79 only once for all times.
81 2012-06-07 Philippe Brochard <pbrochard@common-lisp.net>
83 * contrib/toolbar.lisp (define-toolbar-hooks): Add auto-hide
85 (define-toolbar-hooks): Add auto-hide toolbar (show/hide on mouse
88 2012-06-06 Philippe Brochard <pbrochard@common-lisp.net>
90 * src/xlib-util.lisp (handle-event): Add an additional hook event
91 system to handle events in contrib code.
93 2012-06-03 Philippe Brochard <pbrochard@common-lisp.net>
95 * src/clfswm-placement.lisp: Add an optional border size in all
98 2012-05-30 Philippe Brochard <pbrochard@common-lisp.net>
100 * contrib/toolbar.lisp (clock): Add a clock module.
102 2012-05-28 Philippe Brochard <pbrochard@common-lisp.net>
104 * contrib/toolbar.lisp: begining of toolbar support.
106 2012-05-24 Philippe Brochard <pbrochard@common-lisp.net>
108 * src/clfswm-internal.lisp (rotate-root-geometry): Do not use
109 rotatef but a simpler algorithm.
111 2012-05-19 Philippe Brochard <pbrochard@common-lisp.net>
113 * src/clfswm-placement.lisp: Adjust width and height in child and
114 root placement to prevent too big child size.
116 2012-05-18 Philippe Brochard <pbrochard@common-lisp.net>
118 * src/clfswm-placement.lisp: New root placement possibility.
120 * src/clfswm-util.lisp (change-current-root-geometry): New
123 2012-05-17 Philippe Brochard <pbrochard@common-lisp.net>
125 * src/clfswm-util.lisp (exchange-root-geometry-with-mouse): New
128 2012-05-16 Philippe Brochard <pbrochard@common-lisp.net>
130 * src/menu-def.lisp: New root menu.
132 2012-05-15 Philippe Brochard <pbrochard@common-lisp.net>
134 * src/clfswm-circulate-mode.lisp (rotate-root-geometry-next)
135 (rotate-root-geometry-previous): New second mode binding to change
138 2012-05-13 Philippe Brochard <pbrochard@common-lisp.net>
140 * src/clfswm-internal.lisp: Remove the *current-child* variable
141 and use a setfable function (current-child) instead.
142 (current-child-setter): Store root current child before apllying
143 current child change.
145 2012-05-09 Philippe Brochard <pbrochard@common-lisp.net>
147 * src/clfswm-internal.lisp: Use xdpyinfo/xinerama informations
148 instead of xrandr informations.
150 2012-05-06 Philippe Brochard <pbrochard@common-lisp.net>
152 * src/clfswm-internal.lisp : Use only one list for root
154 (*root*): Root management API simplification.
156 2012-04-30 Philippe Brochard <pbrochard@common-lisp.net>
158 * src/clfswm-internal.lisp: Big change to replace *current-root*
159 variable to support multiple root.
161 2012-04-18 Philippe Brochard <pbrochard@common-lisp.net>
163 * src/tools.lisp (add-new-hook, add-hook): New macro. Do not
164 duplicate hooks by default. Use add-new-hook if you want to
167 2012-04-16 Philippe Brochard <pbrochard@common-lisp.net>
169 * src/clfswm-corner.lisp (wait-window-in-query-tree): Add a limit
170 of try to wait the command window.
172 2012-02-25 Philippe Brochard <pbrochard@common-lisp.net>
174 * src/clfswm-util.lisp (place-frames-from-xrandr)
175 (swap-frame-geometry, rotate-frame-geometry): New helper functions
176 for multiple physical screen.
177 (jump-to-slot, add-frame-in-parent-frame): Change *current-root*
180 2012-01-18 Philippe Brochard <pbrochard@common-lisp.net>
182 * src/*.lisp: Use create-symbol and create-symbol-in-package
183 instead of the shorter symb. (Thanks Aad Versteden).
185 * src/bindings-second-mode.lisp (set-default-second-keys): New
186 key binding to set window and frame transparency.
188 * src/bindings.lisp (set-default-main-mouse): New mouse binding to
189 set window and frame transparency.
191 * src/clfswm-keys.lisp (define-keys): New macro to ease multiple
192 keys definitions. (Thanks Valentin Plechinger for the request).
194 * src/*.lisp: Add full transparency support with xcompmgr.
196 2012-01-14 Philippe Brochard <pbrochard@common-lisp.net>
198 * src/*.lisp: Add transparency support.
200 2012-01-09 Ales Guzik <ales.guzik@gmail.com>
202 * src/clfswm-layout.lisp (tile-layout-mix): New layout to
203 automatically choose between vertival and horizontal tile layout.
204 (tile-space-layout): Fix to have space between screen border and
205 frame the same as between frames.
207 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
209 * load.lisp: Support clisp 2.49+ module system to load CLX.
211 2012-01-04 Ales Guzik <ales.guzik@gmail.com>
213 * src/clfswm-layout.lisp (update-layout-managed-children-keep-position):
214 Fix an inattention error.
216 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
218 * src/xlib-util.lisp (with-xlib-protect): Protect from
219 xlib:lookup-error. This prevent an error in clisp/new-clx when
220 sometimes an xlib:colormap is expected instead of an xlib:window.
222 2012-01-03 Philippe Brochard <pbrochard@common-lisp.net>
224 * src/xlib-util.lisp (handle-event): Fix a clisp/new-clx error
225 when sometimes window slot of event-slots is a pixmap instead of a
228 2011-12-26 Philippe Brochard <pbrochard@common-lisp.net>
230 * src/clfswm-query.lisp: Fill the history list with a non-nil
233 2011-12-25 Philippe Brochard <pbrochard@common-lisp.net>
235 * src/package.lisp (make-x-drawable): Drawable wrapper to prevent
236 type error in some CLX versions.
237 Replace xlib:drawable-* functions with x-drawable-* equivalents
239 2011-12-14 Philippe Brochard <pbrochard@common-lisp.net>
241 * src/clfswm-util.lisp (um-create-xdg-section-list): Add at least
242 the 'Utility menu entry.
244 * src/config.lisp (*xdg-section-list*): moved to config.lisp.
246 * src/clfswm-util.lisp (update-menus): Set a default value for
247 searching .desktop files when XDG_DATA_DIRS is not set.
249 2011-10-15 Philippe Brochard <pbrochard@common-lisp.net>
251 * src/clfswm-internal.lisp (place-window-from-hints): Use
252 with-placement macro to place unmanaged windows in an arbitrary
255 2011-06-16 Philippe Brochard <pbrochard@common-lisp.net>
257 * src/clfswm-internal.lisp (clean-windows-in-all-frames): Prevent
258 current root and current child being equal to child.
260 2011-06-13 Philippe Brochard <pbrochard@common-lisp.net>
262 * src/keysyms.lisp: Repeat Page_Down/Up keysym definitions at the
263 end of the file to change keysyms priority.
265 2011-06-13 Sylvain HENRY <hsyl20@gmail.com>
267 * *.*: Minor spelling fix.
269 2011-06-12 Philippe Brochard <pbrochard@common-lisp.net>
271 * src/clfswm.lisp (:unmap-notify, :destroy-notify): Show all
272 children just after the xlib tree cleanup -> reduce the
273 flickering when a window is deleted or destroyed.
275 * src/clfswm-internal.lisp (process-existing-windows): Do not
276 process the notify window.
278 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
280 * *: **** Release 1106 ****
282 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
284 * src/clfswm-internal.lisp (clean-windows-in-all-frames): New
285 function to prevent xlib error when a window is deleted.
287 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
289 * src/clfswm-internal.lisp
290 (delete-child-and-children-in-all-frames): Delete or destroy
291 children before displaying all children.
293 2011-06-05 Philippe Brochard <pbrochard@common-lisp.net>
295 * src/clfswm-util.lisp (add-frame-in-parent-frame): New function
298 2011-06-04 Philippe Brochard <pbrochard@common-lisp.net>
300 * src/clfswm.lisp (main-unprotected): Destroy all frames windows
301 before closing the display (not really needed).
303 2011-06-02 Philippe Brochard <pbrochard@common-lisp.net>
305 * src/clfswm-layout.lisp (inc-tile-layout-size)
306 (dec-tile-layout-size, inc-slow-tile-layout-size)
307 (dec-slow-tile-layout-size): New functions and bindings.
309 2011-06-01 Philippe Brochard <pbrochard@common-lisp.net>
311 * src/clfswm-expose-mode.lisp (define-expose-letter-keys): Add
312 0..1 and A..Z keys to select a child in exposé mode.
314 * src/clfswm-internal.lisp (display-frame-info): Remove hidden
315 infos in frames windows.
317 * src/clfswm-util.lisp (ask-close/kill-current-window): Menu
320 2011-05-30 Philippe Brochard <pbrochard@common-lisp.net>
322 * src/clfswm-internal.lisp (get-parent-layout): Minor fullscreen
325 2011-05-29 Philippe Brochard <pbrochard@common-lisp.net>
327 * src/clfswm-internal.lisp
328 (delete-child-and-children-in-all-frames): Show all children
329 before deleting/destroying a windows, so prevent a flickering.
330 (get-parent-layout): Return the fullscreen size when the current
333 2011-05-28 Philippe Brochard <pbrochard@common-lisp.net>
335 * src/clfswm-internal.lisp (get-parent-layout): Handle correctly
338 * src/clfswm-util.lisp (delete-focus-window-generic): Do not hide
339 child before removing, so prevent a flickering.
341 * src/clfswm-internal.lisp (show-all-children): Rectangular
342 optimization to display only needed children.
343 (show-all-children): Remove flickering on
344 select-next/previous-brother.
346 2011-05-17 Philippe Brochard <pbrochard@common-lisp.net>
348 * src/clfswm-util.lisp (copy-focus-window, cut-focus-window): New
349 functions and ask-close/kill-current-window menu and bindings
352 2011-05-16 Philippe Brochard <pbrochard@common-lisp.net>
354 * src/clfswm-util.lisp (ask-close/kill-current-window): Add an
355 *ask-close/kill-placement* placement window variable.
357 2011-05-09 Philippe Brochard <pbrochard@common-lisp.net>
359 * contrib/osd.lisp (funcall-button-from-code): Display osd
360 documention for buttons and fix some redefining warnings.
362 2011-05-07 Philippe Brochard <pbrochard@common-lisp.net>
364 * src/clfswm-nw-hooks.lisp (make-permanent-nw-hook-frame): New
365 function. Prevent to add or delete a new window hook for this
368 * src/clfswm-layout.lisp (update-layout-managed-children-position):
371 2011-05-06 Philippe Brochard <pbrochard@common-lisp.net>
373 * src/bindings-second-mode.lisp (set-default-second-keys):
374 select-brother-spatial-move-* binding update.
376 * src/clfswm-layout.lisp (tile-left|right|top|bottom-layout): Ask
377 to keep children positions or not.
379 * src/clfswm-internal.lisp (fixe-real-size): Takes care of border
382 * src/clfswm-layout.lisp (update-layout-managed-children): Fix a
383 bug by using the parent frame instead of the current child.
385 * src/clfswm-circulate-mode.lisp
386 (select-brother-generic-spatial-move+right/left/up/down): New
387 function to select a brother from another in a spatial move.
389 2011-04-19 Philippe Brochard <pbrochard@common-lisp.net>
391 * src/clfswm-pack.lisp (move-frame-constrained)
392 (resize-frame-constrained): Use pixels instead of floating
395 2011-04-18 Philippe Brochard <pbrochard@common-lisp.net>
397 * src/clfswm-pack.lisp (resize-frame-constrained): Takes care of
399 (implode-frame, implode-current-frame): New functions. Absorb all
400 frames subchildren in frame. Explode frame opposite.
402 2011-04-17 Philippe Brochard <pbrochard@common-lisp.net>
404 * src/clfswm-pack.lisp (move-frame-constrained)
405 (resize-frame-constrained): New function. Move and resize frame
406 with the mouse constrained by other frame brothers.
408 2011-04-14 Philippe Brochard <pbrochard@common-lisp.net>
410 * src/clfswm-util.lisp (with-movement-select-next-brother)
411 (with-movement-select-previous-brother)
412 (with-movement-select-next-child): Use a simple method (do not
413 enter in the circulate mode) to allow to circulate in all children
416 * src/clfswm-menu.lisp (open-menu): Save info hash table keys
417 instead of deleting newly created keys.
419 2011-03-21 Philippe Brochard <pbrochard@common-lisp.net>
421 * src/clfswm-internal.lisp (x-px->fl, y-px->fl): Takes care of
424 2011-03-20 Philippe Brochard <pbrochard@common-lisp.net>
426 * src/clfswm-info.lisp (show-config-variable): call
427 produce-conf-var-doc.
429 2011-03-18 Philippe Brochard <pbrochard@common-lisp.net>
431 * src/clfswm-autodoc.lisp (produce-conf-var-doc-html): Produce a
432 documentation for all configurable variables in CLFSWM -
435 * src/clfswm-internal.lisp (leave-frame): Hide all children except
438 2011-03-16 Philippe Brochard <pbrochard@common-lisp.net>
440 * src/clfswm-autodoc.lisp (produce-all-docs): Produce a
441 documentation for all configurable variables in CLFSWM.
443 * src/clfswm-layout.lisp (set-gimp-layout): Display a notify
444 window with the help on the GIMP layout.
446 2011-03-12 Philippe Brochard <pbrochard@common-lisp.net>
448 * src/menu-def.lisp: Menu update to prevent cursor keys clash.
450 * clfswm.asd: Change compilation order to prevent undefined
453 * src/clfswm-internal.lisp (show-child(frame)): Handle properly
454 the show-root-frame-p parameter.
456 2011-03-11 Philippe Brochard <pbrochard@common-lisp.net>
458 * src/clfswm-util.lisp (move-frame, resize-frame): Do not move or
459 resize a frame when it's the current root.
461 2011-03-10 Philippe Brochard <pbrochard@common-lisp.net>
463 * src/clfswm-internal.lisp (show-all-children): Handle properly
464 duplicated child in multipe frames.
466 2011-03-09 Philippe Brochard <pbrochard@common-lisp.net>
468 * contrib/volume-mode.lisp (set-default-volume-keys): Add more
469 keybindings (up/down, right/left) to raise/lower the volume.
471 * src/clfswm-layout.lisp: Add a variable border size for frames
474 2011-03-08 Philippe Brochard <pbrochard@common-lisp.net>
476 * src/clfswm-util.lisp (cut-current-child, remove-current-child)
477 (delete-current-child): Hide the current child before doing the
480 * src/clfswm-internal.lisp (show-all-children): Hide windows not
481 in the current root before displaying those in current root.
482 Remove all hide-all unnecessary calls.
484 * src/clfswm-configuration.lisp (save-variables-in-conf-file):
485 Save only variables with a different value than their original
488 2011-03-07 Philippe Brochard <pbrochard@common-lisp.net>
490 * src/clfswm-info.lisp (show-config-variable): Use the new
493 * src/clfswm-autodoc.lisp (produce-configuration-variables): Use
494 the new defconfig method.
496 * src/clfswm-configuration.lisp (create-configuration-menu):
497 Change the config system with a more lispy one and a less string
498 based one: (defconfig name value group doc).
501 2011-03-06 Philippe Brochard <pbrochard@common-lisp.net>
503 * src/clfswm-internal.lisp (show-all-children): Simplify the
505 (show-child): Display an unmanaged window whe it's the current
507 (show-all-children): add the ability to display all child from
508 *root-frame* and hide all those who are not in *current-root*.
509 -> remove hide-all-children when needed.
511 * src/xlib-util.lisp (move-window,resize-window): Add a
512 *color-move-window* border when moving or resizing a window.
514 2011-03-04 Philippe Brochard <pbrochard@common-lisp.net>
516 * src/clfswm-internal.lisp (show-all-children): Perform only one
517 recusion on the clfswm tree: calculate geometry and place child in
520 2011-03-03 Philippe Brochard <pbrochard@common-lisp.net>
522 * src/clfswm-internal.lisp (show-all-children): Rethink of display
523 child order to prevent very annoying flickering.
525 2011-02-27 Philippe Brochard <pbrochard@common-lisp.net>
527 * src/clfswm-util.lisp (query-yes-or-no): New function.
529 * src/clfswm-configuration.lisp (reset-all-config-variables): New
530 function and menu entry.
531 (query-conf-value): Add the ability to leave the field blank to
532 reset the variable to its default value.
534 2011-02-26 Philippe Brochard <pbrochard@common-lisp.net>
536 * src/clfswm-configuration.lisp
537 (add-all-configuration-default-value): Add a default value to
538 configurable variables.
540 2011-02-23 Philippe Brochard <pbrochard@common-lisp.net>
542 * src/clfswm.lisp (main-unprotected): Create the configuration
543 menu only once at startup.
545 2011-02-22 Desmond O. Chang <dochang@gmail.com>
547 * contrib/amixer.lisp: Add a volume mode inspired by the emms
548 volume package. Alsa mixer interface.
550 * contrib/volume-mode.lisp: Add a volume mode inspired by the emms
553 2011-02-22 Desmond O. Chang <dochang@gmail.com>
555 * src/clfswm.lisp (main): Use ASDF:SYSTEM-SOURCE-DIRECTORY instead
556 of *LOAD-TRUENAME*. *LOAD-TRUENAME* is only bound during a call to
557 LOAD. If one eval CLFSWM:MAIN in repl, BASE-DIR will be an empty
558 string. Use ASDF:SYSTEM-SOURCE-DIRECTORY to fix it.
560 2011-02-16 Philippe Brochard <pbrochard@common-lisp.net>
562 * src/clfswm.lisp (main-unprotected): Add a close hook. And close
563 the notify window, the virtual keyboard and the clfswm terminal by
566 2011-02-15 Philippe Brochard <pbrochard@common-lisp.net>
568 * src/clfswm.lisp (main-unprotected): Destroy the notify window
569 before closing the display. This fix a bug when resetting/reloading
572 2011-02-12 Philippe Brochard <pbrochard@common-lisp.net>
574 * src/xlib-util.lisp (equal-wm-class-fun, equal-wm-name-fun)
575 (raise-window-fun, raise-and-focus-window-fun): New functions.
577 * src/config.lisp (*clfswm-terminal-cmd*): Switch from xterm to
579 (*never-managed-window-list*): Structure change to be more
580 flexible. Let the choice to focus, raise and do nothing on never
583 2011-02-09 Philippe Brochard <pbrochard@common-lisp.net>
585 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Take
586 care of never managed windows to move or resize them if the raise
589 * src/clfswm-internal.lisp (in-frame, in-window, in-child): New
592 2011-02-08 Philippe Brochard <pbrochard@common-lisp.net>
594 * src/clfswm.lisp (main-mode): Raise or not unmanaged windows
595 following request in *never-managed-window-list*.
597 2011-02-05 Philippe Brochard <pbrochard@common-lisp.net>
599 * *: **** Release 1102 ****
601 2011-02-05 Desmond O. Chang <dochang@gmail.com>
603 * src/keysyms.lisp: Add extended keysyms from stumpwm.
605 2011-02-01 Desmond O. Chang <dochang@gmail.com>
607 * src/clfswm-util.lisp (run-or-raise): New function (thanks to
610 * src/clfswm-internal.lisp (with-all-*): add a nil block.
612 2011-01-28 Desmond O. Chang <dochang@gmail.com>
614 * src/clfswm-util.lisp (xdg-config-home): XDG_CONFIG_HOME should
615 be $HOME/.config by default.
617 2010-12-29 Philippe Brochard <pbrochard@common-lisp.net>
619 * contrib/osd.lisp (display-doc): Add another method where a
620 CLFSWM native window is used to display the key documentation.
622 2010-12-27 Philippe Brochard <pbrochard@common-lisp.net>
624 * src/xlib-util.lisp (with-xlib-protect): Force to revert to the
627 2010-12-25 Philippe Brochard <pbrochard@common-lisp.net>
629 * src/clfswm-second-mode.lisp (second-key-mode): Call the second
630 mode leave function only when the generic mode was ended.
632 2010-12-08 Philippe Brochard <pbrochard@common-lisp.net>
634 * src/clfswm-second-mode.lisp (sm-leave-function): Do not use
635 *second-mode-program* anymore.
637 2010-12-07 Philippe Brochard <pbrochard@common-lisp.net>
639 * src/clfswm-second-mode.lisp (*second-mode-leave-function*): New
640 variable bound to a function executed (when not null) on second
643 2010-11-14 Philippe Brochard <pbrochard@common-lisp.net>
645 * src/clfswm-util.lisp (find-child-under-mouse): Do not find
648 2010-11-13 Philippe Brochard <pbrochard@common-lisp.net>
650 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
651 Do not display the accel window for unmanaged windows.
653 2010-11-11 Philippe Brochard <pbrochard@common-lisp.net>
655 * src/clfswm-internal.lisp (set-current-root): Handle
656 window-parent in set-current-root.
658 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
659 focus the parent child when the current root is a window.
661 2010-11-09 Philippe Brochard <pbrochard@common-lisp.net>
663 * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
664 New function an bindings.
666 * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
669 2010-11-07 Philippe Brochard <pbrochard@common-lisp.net>
671 * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
672 function to let the user choose to keep child position with
675 * src/clfswm-internal.lisp (remove-frame-data-slot): New
678 2010-11-05 Philippe Brochard <pbrochard@common-lisp.net>
680 * src/clfswm-internal.lisp (frame-select-next-child)
681 (frame-select-previous-child): New functions and bindings. Select
682 the next/previous child in the current frame.
684 2010-10-31 Philippe Brochard <pbrochard@common-lisp.net>
686 * src/clfswm-query.lisp (query-mode-complet): New function: Handle
687 completion in query-mode.
689 2010-10-30 Philippe Brochard <pbrochard@common-lisp.net>
691 * src/clfswm-query.lisp (query-print-string): Handle long lines
694 2010-10-27 Philippe Brochard <pbrochard@common-lisp.net>
696 * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
697 all characters are printable.
699 2010-10-25 Philippe Brochard <pbrochard@common-lisp.net>
701 * contrib/server/server.lisp: Load clfswm client code in the main
702 program and let the user start it with a --client command line
705 * src/package.lisp (*main-entrance-hook*): New hook executed after
706 loading configuration file and before opening the display.
708 2010-10-23 Philippe Brochard <pbrochard@common-lisp.net>
710 * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
712 * src/clfswm-internal.lisp (show-child): Show window only if not
715 * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
716 change modifiers after binding definition.
718 2010-10-21 Philippe Brochard <pbrochard@common-lisp.net>
720 * contrib/osd.lisp: New file: OSD (On Screen Display) for
723 * src/clfswm-menu.lisp (open-menu): Modularise function.
725 2010-10-13 Philippe Brochard <pbrochard@common-lisp.net>
727 * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
728 key binding in main and second mode.
730 2010-10-10 Philippe Brochard <pbrochard@common-lisp.net>
732 * src/clfswm-util.lisp (open-notify-window): Convert hello-window
733 functions to a more generic Notify-window system.
735 * src/tools.lisp (add-timer): Add an id to identify the timer.
737 2010-10-09 Philippe Brochard <pbrochard@common-lisp.net>
739 * src/tools.lisp (erase-timer): New function.
741 * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
742 the hello window. Add Configuration variables.
744 2010-10-08 Philippe Brochard <pbrochard@common-lisp.net>
746 * src/clfswm-util.lisp (): Add an Hello window at startup.
748 * src/tools.lisp (process-timers): Add a timer system.
750 2010-10-07 Philippe Brochard <pbrochard@common-lisp.net>
752 * src/clfswm-query.lisp (add-in-query-string): Handle correctly
755 2010-10-06 Philippe Brochard <pbrochard@common-lisp.net>
757 * src/clfswm-query.lisp (query-print-string): Change cursor color
758 and show parenthesis matching with colors (on match and on
761 2010-10-05 Philippe Brochard <pbrochard@common-lisp.net>
763 * src/clfswm-internal.lisp (show-all-children): Do not raise a
764 child when its parent is hidden.
766 2010-10-02 Philippe Brochard <pbrochard@common-lisp.net>
768 * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
769 possibility to circulate over subchild of the current child.
771 * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
772 (expose-windows-generic): Add an escape-body function to return to
773 the original state on escape key.
775 * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
776 to bind the current child from the configuration file.
778 2010-10-01 Philippe Brochard <pbrochard@common-lisp.net>
780 * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
781 window hook: the frame absorb all new windows that match
782 nw-absorb-test frame data slot.
784 2010-09-30 Philippe Brochard <pbrochard@common-lisp.net>
786 * src/clfswm-expose-mode.lisp (expose-create-window): Show window
787 title in accel window.
789 2010-09-29 Philippe Brochard <pbrochard@common-lisp.net>
791 * configure: Use the Xavier Maillard clfswm script in contrib to
792 build an executable in the standard way.
794 2010-09-26 Philippe Brochard <pbrochard@common-lisp.net>
796 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
797 New functions. Add a window on each child in the expose mode to
800 * src/clfswm-internal.lisp (child-x, child-y, child-width)
801 (child-height): New methods to get real child coordinates.
803 2010-09-25 Philippe Brochard <pbrochard@common-lisp.net>
805 * src/clfswm-layout.lisp (*-layout): Use child-position.
807 * src/clfswm-internal.lisp (child-position): New function.
809 * src/clfswm-expose-mode.lisp (expose-windows-mode)
810 (expose-all-windows-mode): Use a generic mode.
812 * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
813 with handle-event-fun symbols instead of inspecting clfswm
814 internals symbols on each mode change.
816 * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
817 a separate clfswm-expose-mode.lisp file.
819 * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
820 screen size instead of hardcoded test coordinates.
822 2010-09-24 Philippe Brochard <pbrochard@common-lisp.net>
824 * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
825 (speed-mouse-right, speed-mouse-up, speed-mouse-down)
826 (speed-mouse-undo, speed-mouse-first-history): New functions to
827 quickly move the mouse. Implemented for the second mode.
829 2010-09-16 Philippe Brochard <pbrochard@common-lisp.net>
831 * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
832 write permission on $clfswm_asd_path. So anybody can start clfswm
833 even if there is no write permission on the source directory.
835 2010-09-12 Philippe Brochard <pbrochard@common-lisp.net>
837 * contrib/clfswm: Add support to cmucl, ccl and ecl.
839 2010-09-11 Philippe Brochard <pbrochard@common-lisp.net>
841 * src/clfswm-util.lisp (set-hide-unmanaged-window)
842 (set-show-unmanaged-window, set-default-hide-unmanaged-window):
843 New functions and menu entry.
844 (set-globally-hide-unmanaged-window)
845 (set-globally-show-unmanaged-window): New functions and menu
848 * src/clfswm-internal.lisp (hide-unmanager-window-p): New
850 (show-child): Add a data slot on frame to hide or not unmanaged
853 * src/clfswm-corner.lisp (present-clfswm-terminal)
854 (present-virtual-keyboard): Use a function (generic-present-body)
855 instead of a macro (generate-present-body).
857 * src/clfswm-util.lisp (update-menus): List all directories and
858 subdirectories in $XDG_DATA_DIRS/applications.
860 2010-09-10 Philippe Brochard <pbrochard@common-lisp.net>
862 * src/clfswm-corner.lisp (generate-present-body): New macro.
863 (present-clfswm-terminal, present-virtual-keyboard): Use
864 generate-present-body.
866 2010-09-09 Philippe Brochard <pbrochard@common-lisp.net>
868 * src/clfswm-util.lisp (update-menus): Follow XDG specifications
869 instead of the non-portable Debian update-menu.
871 2010-09-07 Philippe Brochard <pbrochard@common-lisp.net>
873 * src/clfswm.lisp (error-handler): New function do handle
874 asynchronous errors and ignore them.
875 (open-display): Install the new error-handler on display.
877 2010-09-05 Philippe Brochard <pbrochard@common-lisp.net>
879 * src/xlib-util.lisp (with-xlib-protect): Add a
880 with-simple-restart on top of body execution.
882 2010-09-04 Philippe Brochard <pbrochard@common-lisp.net>
884 * src/clfswm.lisp (main-loop): Protect all xlib functions with an
887 * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
888 handle-event. Add a with-simple-restart to prevent a
889 clisp/new-lisp infinite loop.
891 2010-08-30 Philippe Brochard <pbrochard@common-lisp.net>
893 * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
894 clfswm terminal working even on xterm title changes.
896 2010-08-29 Philippe Brochard <pbrochard@common-lisp.net>
898 * src/clfswm-util.lisp (run-other-window-manager): Update for
901 * src/tools.lisp (do-execute): New parameter io to change the
904 * src/clfswm-util.lisp (hide-current-child): Prevent from removing
907 * src/clfswm-internal.lisp (child-member): New predicate.
908 (child-remove): New function.
910 * src/*.lisp: Use child-member and child-remove everywhere it's
913 2010-08-28 Philippe Brochard <pbrochard@common-lisp.net>
915 * src/clfswm.lisp (main-loop): Ensure that all events have been
916 processed after a process-event.
918 * src/clfswm-internal.lisp (is-in-current-child-p): New function.
920 2010-08-27 Philippe Brochard <pbrochard@common-lisp.net>
922 * src/clfswm.lisp (main-mode:configure-request): Raise the window
923 only when present on the current child and focus it accordingly.
925 2010-08-26 Philippe Brochard <pbrochard@common-lisp.net>
927 * src/clfswm-circulate-mode.lisp (circulate-loop-function):
928 Use is-a-key-pressed-p.
930 * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
932 * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
933 returned by xlib:keysym->keycodes.
935 * src/*.lisp: Use the new child-equal-p to compare children. This
936 prevent a bug with sbcl/cmucl when the standard equal function
937 does not work with xlib:window.
939 * src/clfswm-internal.lisp (child-equal-p): New predicate.
941 2010-08-25 Philippe Brochard <pbrochard@common-lisp.net>
943 * src/clfswm-generic-mode.lisp (generic-mode): Use an
944 xlib:event-listen before processing event with
945 xlib:process-event. This prevent a bug with CLX threaded
946 implementation like sbcl.
948 * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
949 processing event with xlib:process-event. This prevent a bug with
950 CLX threaded implementation like sbcl.
952 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
954 * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
956 * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
959 * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
960 (find-parent-frame, find-frame-window, find-frame-by-name)
961 (find-frame-by-number): Use with-find-in-all-frames to search in
962 frames in the right order.
964 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
965 unwanted flickering with unmanaged windows.
967 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
969 * src/package.lisp: Remove event handler hooks as they're not
970 needed anymore (To replace them: use closure and define-handler).
972 * src/xlib-util.lisp (move-window, resize-window)
973 (wait-mouse-button-release): Use a generic mode.
975 * src/*.lisp: Replace the case to handle event with a more (tricky)
976 lispy method which bind a function to each keywords associated
979 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
981 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
982 menu entry between delete-current-child and remove-current-child.
983 ie: Delete a child and its children in all frames by default.
985 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
987 * src/package.lisp: Add a placement configuration group.
989 * src/binding*.lisp: Bind control+g to escape the current action
992 * src/clfswm-internal.lisp
993 (delete-child-and-children-in-all-frames): New function and
994 binding: Second mode - Control+Delete delete the current child and
995 its children in all frames (ie: close the current child and its
998 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
1000 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
1001 the frame window and the frame gc. Close a very annoying bug when
1002 cuting/pasting a frame or moving a child over frames with the
1005 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1006 all children in *current-root* after moving/resizing a frame.
1008 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
1010 * src/clfswm-util.lisp (delete-focus-window)
1011 (destroy-focus-window): Remove child in parent frame before
1014 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1016 * src/clfswm-util.lisp (identify-key): Add a timeout in
1018 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
1019 of the window passed by xlib:process-event.
1021 * src/xlib-util.lisp (move-window, resize-window)
1022 (wait-mouse-button-release): Add a timeout in xlib:process-event.
1024 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1026 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
1027 to launch an other window manager and to return to clfswm.
1029 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
1031 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
1034 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
1036 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
1039 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
1040 parameter and a loop timeout.
1042 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
1044 * src/clfswm.lisp (main): Add an alternate configuration filename
1047 * load.lisp: Add a debuging code example.
1049 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
1051 * src/clfswm-configuration.lisp (create-configuration-menu): New
1052 menu to configure all clfswm variables while clfswm is running.
1054 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
1056 * src/clfswm-util.lisp (save-configuration-variables): New
1057 function to save all configuration variables in clfswmrc.
1059 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
1061 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
1063 (set-default-info-keys): Add cursor key support in info mode.
1065 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
1067 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
1070 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
1071 prevent reading the configuration file (this may be useful to
1072 produce the original documentation without user modifications
1073 with the rc configuration file).
1075 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
1077 * src/bindings-second-mode.lisp (set-default-second-keys):
1078 Simplification of Escape key to close/kill/remove the focus window
1079 and unhide all windows.
1081 * src/bindings.lisp (set-default-main-keys): Simplification of
1082 Escape key to close/kill/remove the focus window and unhide all
1085 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
1086 focus and unhide all windows capabilities.
1088 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1090 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
1092 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
1094 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
1095 Keep child order and don't make unnecessary child movement.
1096 (one-column-layout, one-line-layout): New layouts.
1098 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
1100 * *: **** Release 0906 ****
1102 * contrib/cd-player.lisp: New file to handle the CD player.
1104 * contrib/xmms.lisp: New file to handle the xmms player.
1106 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1108 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
1109 Maximize windows in their frame - Leave frames to their actual
1112 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
1113 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
1115 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
1117 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
1119 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
1121 * contrib/mpd.lisp: Use a standard menu.
1123 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
1125 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
1127 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
1129 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
1131 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
1134 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
1136 * src/config.lisp (get-fullscreen-size): One pixel adjustment
1139 * src/clfswm-placement.lisp (*-child-placement): One pixel
1142 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
1144 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
1145 Ensure that all characters are printable.
1147 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
1150 * src/clfswm-placement.lisp (*-child-placement): Adjust
1151 coordinates to one pixel in the current child.
1153 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1155 * src/clfswm-query.lisp (query-enter-function): Assign font before
1156 width and height calculation.
1158 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1160 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
1161 bannish the pointer in an arbitrary place.
1163 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
1164 place the info window in an arbitrary place.
1166 * src/clfswm-query.lisp (query-enter-function): Use with-placement
1167 macro to place the query window in an arbitrary place.
1169 * src/clfswm-placement.lisp: New file. Allow to place info windows
1170 or query windows on an arbitrary place. Allow to bannish the
1171 pointer on an arbitrary place.
1173 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
1175 * src/clfswm-circulate-mode.lisp (reorder-child)
1176 (reorder-brother): Unfocus windows before reordering children or
1179 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1181 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
1182 the parent is a frame.
1184 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
1185 motion with a default modifier.
1187 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
1190 * src/clfswm-info.lisp (info-mode): Handle motion with a default
1192 (info-mode): Optimization in loop function.
1194 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1196 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
1197 root-frame correctly.
1199 * clfswm.asd: Dependency fix for clfswm-generic-mode.
1201 * src/clfswm-circulate-mode.lisp (reorder-child)
1202 (reorder-brother): Handle empty frames.
1203 (reorder-brother): Redisplay only the parent frame of the current
1206 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
1207 parent frame of the current frame.
1209 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
1211 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
1212 Maximize/Unmaximize the current frame in its parent frame.
1214 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
1215 windows and frames in their parent frame.
1217 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1219 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
1221 * src/clfswm-circulate-mode.lisp (reorder-child)
1222 (reorder-brother): Reinitialise on circulate type change
1223 child to brother or brother to child.
1225 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
1226 calls xlib:display-finish-output on each map-request. So speed up
1229 * src/xlib-util.lisp (map-window): New function. Call
1230 xlib:display-finish-output on each map request.
1232 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1234 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
1235 Optimisation when drawing second mode window.
1237 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1239 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
1242 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1244 * src/clfswm-util.lisp (run-program-from-query-string): Launch
1245 command only with a return validation.
1247 2009-04-22 Xavier Maillard <xma@gnu.org>
1249 * src/clfswm-query.lisp (query-string): Use a generic mode.
1251 2009-04-19 Xavier Maillard <xma@gnu.org>
1253 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
1255 2009-04-18 Xavier Maillard <xma@gnu.org>
1257 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
1258 to define all other modes.
1260 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1262 * src/package.lisp (): Use *default-font-string* for all
1265 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
1267 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
1269 * src/xlib-util.lisp (null-size-window-p): Better check of null
1272 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
1274 * src/clfswm.lisp (handle-map-request): Add a fix to manage
1275 correctly fullscreen windows (SDL particularly).
1277 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
1279 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
1280 a segfault with clisp/new-clx.
1282 * src/clfswm.lisp (handle-motion-notify): Add a needed window
1285 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
1286 needed window argument.
1288 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
1290 * src/xlib-util.lisp (wait-no-key-or-button-press)
1291 (wait-a-key-or-button-press): Check buttons press/release correctly"
1293 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
1295 * src/menu-def.lisp: Add children navigation menu in the movement
1296 menu (select next/previous child/brother/level).
1298 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
1300 * *: Rename 'sister' frame to 'brother' frame.
1302 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
1303 alias in a real modifier.
1305 * src/package.lisp (*modifier-alias*): New list of modifier alias
1306 For example: :alt is :mod-1, :numlock is :mod-2...
1308 * src/tools.lisp (remove-hook): New function.
1310 * src/clfswm-keys.lisp (with-capslock, without-capslock)
1311 (with-numlock, without-cnumlock): New functions.
1313 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
1315 * src/clfswm-info.lisp: Use the *binding-hook* to create info
1316 keys and mouse bindings.
1318 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
1319 second keys and mouse bindings.
1321 * src/bindings.lisp: Use the *binding-hook* to create main keys
1324 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1326 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
1329 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
1331 * src/menu-def.lisp: Use a menu instead of a function for the
1334 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
1336 * src/clfswm-util.lisp (show-standard-menu): Display the standard
1337 menu from the 'update-menus' command.
1339 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
1341 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
1342 it's already grabbed.
1344 * src/clfswm-internal.lisp (display-frame-info): Use configurable
1345 colors and fix a bug with background.
1346 (display-frame-info): Set window background when displaying info.
1348 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1350 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
1351 warning with clisp/new-clx.
1353 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
1355 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
1358 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1360 * *: **** Release 0809 ****
1362 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1364 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
1366 (ensure-unique-number): New function and menu entry.
1368 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
1370 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
1371 hook: open the next window in a named frame.
1372 (numbered-frame-nw-hook): New new window hook: open the next
1373 window in a numbered frame.
1375 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
1376 cases. So query-string can be called even in the main mode.
1378 * src/clfswm-internal.lisp (show-all-children): Do not raise a
1379 child by default => far less flickering.
1381 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
1383 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
1385 * src/menu-def.lisp: Change key binding for the CLFSWM menu
1388 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
1389 is nil. (workaround on some CLX implementation).
1391 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
1393 * src/menu-def.lisp: Add a menu to set a focus policy for all
1396 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
1397 (all-frames-set-*-focus-policy): Set a focus policy for all
1400 * src/clfswm.lisp (handle-enter-notify): sloppy-select
1401 mode. Select a child and its parents on mouse over.
1403 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
1405 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
1406 policy -> Sloppy focus only for windows in the current frame.
1407 (main-unprotected): Exit clfswm on init error (ie: when another
1408 window manager is running).
1410 * src/clfswm-util.lisp (reset-clfswm): New function.
1412 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
1414 * src/clfswm-menu.lisp (init-menu): New function.
1416 * src/clfswm-util.lisp (reload-clfswm): New function to reload
1418 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
1420 * src/clfswm.lisp (main, main-unprotected): Handle error in a
1421 superior main function. Now CLFSWM can't break the X session. It
1422 just reinitialize the display and run a new main loop.
1424 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
1425 *vt-keyboard-on* global to avoid warnings when loading clfswm.
1427 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
1428 (help-on-gimp-layout): Describe how to use the GIMP layout.
1430 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
1432 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
1433 main-window-right-layout. Change the keybinding for (shift)alt+tab
1434 to not select windows in the main window lisst.
1435 Bind F8 to add a window in the main window list.
1436 Bind F9 to remove a window in the main window list.
1437 Change the focus policy to :sloppy.
1438 (set-previous-layout): Restore the previous layout, keybinding and
1441 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
1443 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
1445 * src/clfswm-layout.lisp (main-window-left-layout)
1446 (main-window-bottom-layout, main-window-top-layout): New
1448 Factorize layouts in menu.
1450 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
1452 * src/clfswm-layout.lisp (main-window-right-layout): A possible
1453 GIMP layout: one or more main windows on one side of the
1454 frame. Others on the other size.
1456 * src/clfswm-util.lisp
1457 (current-frame-set-click/sloppy-focus-policy): Each frame can have
1458 a different focus policy (one of :click or :sloppy).
1459 The default focus policy is set with *default-focus-policy*.
1461 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
1463 * src/clfswm-info.lisp (show-config-variable): New function.
1465 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
1467 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
1469 * src/clfswm-info.lisp: Colored help for key binding and corners
1472 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
1474 * src/clfswm-util.lisp (delete-focus-window)
1475 (destroy-focus-window): Remove chid only in
1476 handle-unmap/destroy-notify. Focus *current-root* only when
1477 closing/killing the current child.
1479 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
1480 functions or corners.
1482 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1484 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
1485 action: Hide/Unhide a terminal on mouse corner action. (By default
1486 right mouse button on the top left corner).
1488 * src/config.lisp (*never-managed-window-list*): New config
1491 * src/clfswm-internal.lisp (never-managed-window-p): New function:
1492 Handle never managed window in a more simple way.
1494 * src/clfswm-corner.lisp: New file and new and more simple method
1495 to define corners actions.
1497 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
1499 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
1501 * src/clfswm-layout.lisp (fast-layout-switch)
1502 (define-fast-layout-switch): New functions: Switch between two
1505 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
1506 really in the second mode. So leave-second-mode can be used even
1509 * src/clfswm-util.lisp (switch-to-last-child): New function:
1510 Store the current child and switch to the previous one.
1512 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1514 * src/clfswm-util.lisp (display-current-window-info): Display the
1516 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
1517 (top right by default). By default 'xvkbd' is used.
1519 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1521 * src/xlib-util.lisp (move-window, resize-window): Compress motion
1524 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
1526 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
1529 * src/clfswm-info.lisp (info-mode): Compress motion events.
1531 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
1533 * src/clfswm-internal.lisp (show-all-children): Compute geometry
1534 and selection first and then show only necessary children.
1535 (show-child): remove unneeded display-p parameter.
1537 * src/config.lisp (get-fullscreen-size): Place the frame border
1538 outside the screen (this prevent the loose of 2 pixels per
1541 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
1543 * src/clfswm-internal.lisp (focus-child): Algorithm change to
1544 raise only the selected child.
1546 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
1548 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
1549 Raise only viewable children.
1551 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
1553 * src/clfswm-internal.lisp (show-all-children): Always raise all
1554 displayed children. Remove all references to raise-p.
1556 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1558 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
1561 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
1562 second mode binding on raise/lower child in its frame.
1564 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
1565 behaviour to the new raise/lower property.
1566 Call clear-nw-hook before the rest of the hook.
1568 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
1569 (mouse-click-to-focus-and-resize-window): Stop button event. This
1570 prevent a keyboard/pointer freeze.
1572 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1574 * src/clfswm-internal.lisp (frame-lower-child)
1575 (frame-raise-child): New functions to raise/lower a child in its
1578 * src/clfswm-util.lisp (have-to-present-windows)
1579 (have-to-present-all-windows): New functions to have an MaxOS
1580 expose like on mouse click in screen corner.
1582 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
1584 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
1586 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
1587 child from a choice in all frames with hidden children.
1589 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
1591 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
1593 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
1594 (unhide-all-children): New functions.
1596 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
1599 * src/clfswm-util.lisp (hide/show-frame-window): new function and
1602 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
1604 * src/clfswm-util.lisp (rename-current-child): Do not display the
1605 frame info for a window.
1607 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
1609 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
1610 frame window for the removed child and its children.
1612 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
1614 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
1617 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
1619 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
1620 the ROX pinboard (ie: leave it lowered in the root window as
1623 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
1624 (tile-left-layout, tile-right-layout, tile-top-layout)
1625 (tile-bottom-layout): Use all the frame space when there is only
1628 * src/clfswm-internal.lisp (place-window-from-hints): Center
1629 unmanaged windows in the root screen.
1631 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
1634 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1636 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
1637 typo in managed types.
1639 * src/clfswm-internal.lisp (show-child): Always display frame info
1640 even if the frame is hidden.
1642 * src/xlib-util.lisp (resize-window): Use a better algorithme to
1645 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1647 * src/clfswm-util.lisp (with-movement): Display frame info for all
1648 frames in current root.
1650 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1652 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
1654 * src/bindings-second-mode.lisp (define-second-key #\a): New
1655 binding on 'add-default-frame'.
1657 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1658 message to follow the autodocumentation process.
1660 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1662 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1663 "Space" to jump to a child. "B" to bind a slot on the current
1666 * src/bindings-second-mode.lisp: Use "Tab" instead of
1669 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
1671 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1672 unmanaged (hidden) windows.
1674 * src/clfswm-internal.lisp (place-window-from-hints): Give a
1675 minimal size for windows.
1676 (with-all-windows-frames-and-parent): New function.
1678 * src/config.lisp (*default-window-width/height*): New parameters.
1680 * src/clfswm-internal.lisp (place-window-from-hints): Center
1681 windows in the screen instead of in their frame.
1683 * src/bindings-second-mode.lisp (tile-space-current-frame): New
1686 * src/clfswm-layout.lisp (register-layout): Intern the once name
1687 in the right package.
1689 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1691 * doc/dot-clfswmrc: Update to follow the new clfswm way.
1693 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
1695 * src/clfswm-internal.lisp (set-current-child)
1696 (adapt-child-to-parent, show-child, hide-child): Handle the case
1697 where child is not a frame or a window.
1699 * src/clfswm-util.lisp
1700 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1701 Check if child is a frame.
1703 * src/clfswm-internal.lisp (managed-window-p): Handle the case
1704 where frame is null.
1705 (place-frame): Check if frame and parent are frames.
1707 * src/clfswm-info.lisp (info-mode): display all frame info before
1710 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1711 info before leaving.
1713 * src/clfswm-internal.lisp (display-all-frame-info): New function.
1715 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
1717 * src/tools.lisp (getenv): Implemented for ECL.
1718 (urun-prog): Implemented for ECL.
1720 * src/clfswm-util.lisp (identify-key): Use a double buffer to
1723 * src/clfswm-query.lisp (query-string): Use a double buffer to
1726 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1729 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1732 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
1734 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1736 * src/menu-def.lisp: New file: move all menu definition in
1739 * src/clfswm-layout.lisp (register-layout): Use a function instead
1742 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
1744 * src/clfswm-autodoc.lisp (produce-menu-doc,
1745 (produce-menu-doc-html): New functions.
1746 (produce-doc-*): Moved to clfswm-autodoc.lisp.
1748 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1749 paste a child on one of its own children. (this prevent a
1751 (move-child-to): Rename move/copy-current-child-by to
1753 (mouse-move-window-over-frame): New function to move the window
1754 under the mouse cursor to another frame.
1756 * src/clfswm-internal.lisp (find-child-in-parent): New function.
1758 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1760 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1761 windows only when its window parent is the current child.
1763 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1765 * src/clfswm-util.lisp (manage-current-window)
1766 (unmanage-current-window): New functions: Allow to force to manage
1767 or unmanage a window by its parent frame.
1769 * src/bindings-second-mode.lisp (#\o): binded to
1770 set-open-in-new-frame-in-parent-frame-nw-hook and
1771 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1773 * src/clfswm-util.lisp (with-current-window): New macro.
1775 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1776 exposure and enter-window handle event.
1778 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1779 children for the current child after the move/resize.
1781 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1783 * src/xlib-util.lisp (resize-window): Take care of window size
1786 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1787 move/resize unmanaged windows.
1789 * src/xlib-util.lisp (move-window, resize-window): New functions.
1791 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1793 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1794 user choose what window type the current frame must handle.
1795 (display-current-window-info): New function.
1796 (current-frame-manage-all-window-type)
1797 (current-frame-manage-only-normal-window-type)
1798 (current-frame-manage-no-window-type): New functions.
1800 * src/clfswm-internal.lisp (managed-window-p): New function.
1802 * src/package.lisp (frame): Managed type: new frame
1803 parameter. This allow to choose what window type a frame must
1806 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1808 * src/clfswm-nw-hooks.lisp
1809 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1811 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1814 * src/tools.lisp (ensure-printable): Return always a string even
1817 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
1819 * src/config.lisp (*default-nw-hook*): New variable to change the
1820 default new window hook.
1822 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1824 * clfswm.asd (clfswm): Add a dependency from
1825 clfswm-second-mode.lisp to clfswm.lisp.
1827 * src/clfswm-util.lisp (identify-key): Show the documentation for
1828 the function bound on a key.
1829 (with-movement): Move with-movement,
1830 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
1831 to clfswm-util.lisp.
1833 * src/clfswm-menu.lisp: New menu system that let user change keys
1834 or functions associated to keys.
1836 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
1838 * src/clfswm-internal.lisp (show-all-children): Display-child is
1839 the first child by default. Solve a bug with father-p.
1841 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
1843 * src/clfswm-internal.lisp (add-frame): Add frame return the
1845 (show-all-children): Move the size computation outside the
1848 * src/bindings-second-mode.lisp (with-movement): Redisplay only
1851 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1852 only the current child.
1854 * src/clfswm-internal.lisp (show-all-children): New display-child
1855 parameter to display only the desired child and its children.
1856 (select-next/previous-child): Only display the current child.
1858 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
1860 * src/clfswm.lisp (init-display): Move the default frame creation
1861 on the default init hook.
1863 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1864 the main mode (for example: "1" on an azerty keyboard).
1866 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
1868 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1869 keysyms. Revert to old grabbing method for the main mode.
1871 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
1873 * src/clfswm.lisp (init-display): Add key handling on no focus
1874 window and on frame windows.
1876 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1878 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1879 all keys by default and replay just what is needed. No change for
1882 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1883 (find-key-from-code): Test for shift and not shift presence.
1885 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
1887 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1888 new key parameter to have less flickering.
1890 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
1892 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1893 layout only one time and revert to no-layout to freely handle
1896 * src/clfswm-nw-hooks.lisp
1897 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1898 with new created window.
1900 * src/clfswm-layout.lisp (register-layout): Now register
1901 automatically a once layout to set the layout only one time and
1902 revert to no-layout to freely handle frames.
1904 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1906 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1907 nw-hook: Open the next window in the current frame and leave the
1908 focus to the current child.
1910 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
1912 * src/bindings-second-mode.lisp: Add keys definitions to
1913 bind-or-jump in the second mode.
1915 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
1916 macro for bind-or-jump-(1|2|3...).
1918 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
1919 arguments to function. This allow to do things like:
1920 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
1921 are passed to my-function on key press.
1923 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
1925 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
1927 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
1929 * src/clfswm-internal.lisp (child-fullname): New function
1931 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
1932 docstring in info-mode-menu. An item can be
1933 '((key function) (key function)) or with docstring
1934 '((key function "documentation 1") (key function "bla bla") (key function))
1936 * src/tools.lisp (ensure-n-elems): New function.
1938 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
1939 resize a frame or the window's father.
1941 * src/clfswm.lisp (init-display): Remove tile-space-layout by
1942 default on the root frame.
1944 * src/clfswm-util.lisp (move/resize-frame): Add standard event
1945 hooks handlers (map-request, configure-notify...)
1947 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
1950 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1952 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
1953 or the window's father.
1955 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
1956 event only if there is a geometry change.
1957 (mouse-focus-move/resize-generic): Generic function to move or
1958 resize a frame or a window father frame.
1960 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1962 * src/clfswm-internal.lisp (show-all-children): Return t if there
1963 is a geometry change.
1965 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
1967 * src/bindings.lisp (Up/Down): Swap select previous/next level.
1969 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
1971 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
1973 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
1974 (with-all-*): Reverse the child list to manage the first child last (like in
1977 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
1978 root window only if true.
1980 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
1981 root window only if *create-frame-on-root* is true.
1983 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
1986 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
1988 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
1989 the current child (even if it's a window).
1991 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
1993 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
1994 (mouse-click-to-focus-and-resize): New functions.
1996 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
1997 (*-px->fl): Convert pixel coordinates to float.
1999 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
2001 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
2003 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
2006 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
2007 and hide-all-children.
2008 (raise-if-needed): New function.
2009 (show-child): Use a first-p parameter to raise windows only when they are
2012 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
2014 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
2017 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
2019 * src/clfswm-info.lisp (keys-from-list): new function.
2021 * src/*: rename 'childs' in 'children'.
2023 * src/*: rename 'group' in 'frame'.
2025 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
2027 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
2029 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
2031 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
2033 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
2035 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
2036 Bind control+o to open the next window in a new group in the root group
2037 (as open in next window in a new workspace in 0801 version).
2039 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
2041 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
2044 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
2046 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
2047 instead of Tab for select-previous-child.
2049 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
2051 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
2054 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
2056 * clfswm-util.lisp (identify-key): Display the documentation
2057 associated to keys when identifying a key.
2059 2008-03-10 Xavier Maillard <xma@gnu.org>
2061 * contrib/clfswm: Complete rewrite of the script. Detect error and
2062 act accordingly. Add command line arguments to configure the
2063 script execution. User can now choose different common lisp
2064 implementation (clisp and sbcl only), choose where to store the
2065 dumped image, where to find clfswm source.
2067 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
2069 * clfswm-internal.lisp (process-new-window): Beginning of new
2070 window hook: each group have a hook to tell what he wants to do
2071 with the new created window.
2073 2008-03-08 Xavier Maillard <xma@gnu.org>
2075 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
2076 call the resulting executable.
2078 * clfswm.lisp (read-conf-file): Check for the user config file in
2079 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
2080 prefered whenever possible.
2082 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
2084 * clfswm-layout.lisp (*-layout): Add an optional raise-p
2085 parameter in each layout.
2087 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2089 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
2091 (copy/move-current-child-by-name/number): new functions
2092 (focus-group-by-name/number): new functions
2093 (delete-group-by-name/number): new functions
2095 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2097 * ************************************************************ *
2098 *: Major update - No more reference to workspaces. The main *
2099 structure is a tree of groups or application windows. *
2100 * ************************************************************ *
2102 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
2104 * clfswm.lisp (read-conf-file): Read configuration in
2105 $HOME/.clfswmrc or in /etc/clfswmrc or in
2106 $XDG_CONFIG_HOME/clfswm/clfswmrc.
2107 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
2110 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
2112 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
2115 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
2117 * clfswm-internal.lisp (find-window-group): New function.
2119 * clfswm*: Change to make clfswm run with clisp/new-clx.
2121 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
2123 * clfswm-util.lisp (query-show-paren): Add show parent matching in
2125 (query-string): Bind control+k to delete end of line.
2127 * clfswm-second-mode.lisp (draw-second-mode-window): Display
2128 the action on mouse motion in second mode.
2130 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
2131 event but do not clear the root window.
2132 (handle-configure-request): Adjust unmanaged window from their
2135 * clfswm-internal.lisp (process-new-window): Adjust new window
2136 with the specified hints (max/min/base width/height).
2138 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
2140 * clfswm.lisp (handle-configure-request): Send an Configuration
2141 Notify event. This solve a bug with xterm and rxvt who takes some
2142 times to be mapped. Now there is no delay.
2144 * bindings-second-mode.lisp (define-shell): Run programs after
2145 living the second mode.
2147 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
2149 * clfswm-internal.lisp (process-new-window): Do not crop transient
2150 window to group size.
2151 (adapt-window-to-group): Do not crop transient window to group
2154 * clfswm.lisp (handle-configure-request): Adapt just the window to
2155 its group and don't take care of the configure request. Remove the
2156 bug with the Gimp outside the group and speed up the window
2158 (handle-exposure): Remove show-all-group on exposure event
2161 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
2163 * clfswm-util.lisp (circulate-group-up-copy-window)
2164 (circulate-group-down-copy-window)
2165 (circulate-workspace-up-copy-group)
2166 (circulate-workspace-down-copy-group): Prevent the copy of the
2167 same window in the same workspace.
2169 * bindings-second-mode.lisp (release-copy-selected-window)
2170 (release-copy-selected-group): Prevent the copy of the same window
2171 in the same workspace.
2173 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
2174 (generic-pager-move-window-on-next-line): Remove the copy
2176 (generic-pager-move-group-on-next-workspace)
2177 (generic-pager-move-group-on-previous-workspace): Prevent the copy
2178 of the same window in the same workspace.
2180 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
2181 (mouse-pager-copy-selected-group-release): Prevent the copy of the
2182 same window in the same workspace.
2184 * tools.lisp (setf/=): new macro to set a variable only when
2187 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
2188 x, y... only when necessary.
2190 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
2192 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
2193 new function and hook: force windows to stay in its group (solve a
2196 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
2198 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
2199 less flickering when moving/resizing groups.
2201 * clfswm-internal.lisp (hide-group): new function.
2202 (show-all-group): clear-all: new parameter.
2204 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
2206 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
2208 * clfswm*: Color change for the pager. Typo or better description
2209 in bindings definitions. Define bindings for a qwerty keyboard by
2210 default. dot-clfswmrc show examples to switch to an azerty
2212 License change to GPL v3.
2213 * config.lisp: new file - group all globals variables in this
2216 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
2218 * xlib-util.lisp (hide-window): Remove structure-notivy events
2219 when hidding a window.
2221 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
2223 * package.lisp (*sm-property-notify-hook*): Readded
2224 property-notify-hook in second mode.
2226 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
2228 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
2230 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
2232 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
2233 Tile the current workspace with the current window on one side and
2234 others on the other (this emulate the larswm, dwm, wmii way). See
2235 the default configuration file to enable this mode by default.
2237 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
2240 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
2242 * clfswm-pager.lisp (pager-draw-window-in-group): Add
2243 ensure-printable to print windows name even with non-ascii
2246 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
2248 * clfswm-pager.lisp (pager-explode-current-group): Create a new
2249 group for each window in group.
2250 (pager-implode-current-group): Move all windows in workspace to
2251 one group and remove other groups.
2253 * clfswm-pack.lisp (explode-group): Create a new group for each
2255 (implode-group): Move all windows in workspace to one group and
2256 remove other groups.
2258 * clfswm-util.lisp (identify-key): Remove local configuration
2259 variables and made them available for configuration from
2261 (query-string): idem.
2263 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
2265 * netwm-util.lisp: Start of NetWM compliance.
2266 Add a Netwm client list gestion.
2268 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
2270 * clfswm-internal.lisp (create-group-on-request): open a new group
2271 only when the current group is not empty.
2273 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
2274 bug with null workspace.
2276 * clfswm-pager.lisp (pager-handle-event): Add a hook
2277 system. This hooks can be changed in the user configuration file.
2279 * package.lisp: All colors and font variables are set in
2280 package.lisp and can be configured in the user configuration
2282 Note: If you have configured some less ugly colors (esp. for the
2283 pager) don't hesitate to let me know :)
2285 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
2286 system. This hooks can be changed in the user configuration file.
2288 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
2289 changed in the user configuration file (~/.clfswmrc)
2291 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
2293 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
2294 arrow action, open next window in new workspace/group.
2296 * bindings.lisp (stop-all-pending-actions): new binding.
2297 (open-next-window-in-new-group-once): Open the next windows in a
2298 new group (only once) or open all new windows in a new group (like
2299 others windows managers).
2301 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
2303 * clfswm.lisp (read-conf-file): New function to read a lisp
2304 configuration file at startup.
2305 (focus-group-under-mouse): Check if group isn't the current group
2306 ( prevent a bug with unclutter ).
2308 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
2310 * bindings.lisp (run-program-from-query-string): A program can be
2311 launch from a input query window.
2313 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
2315 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
2317 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
2319 * clfswm.lisp (process-new-window): One can now open the next
2320 window in a workspace called by its number.
2322 * clfswm-util.lisp (query-font-string): Minimal editing
2324 (eval-from-string): And an REPL in the window manager... :)
2326 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2328 * clfswm.lisp (process-new-window): One can now open the next
2329 window in a new workspace or a new group.
2331 * clfswm-pager.lisp (pager-mode): Display the next arrow action
2332 with the hidden windows.
2334 * clfswm.lisp (second-key-mode): Display the current workspace
2335 number and the next arrow action in the state window.
2337 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
2338 the pager mode and then redisplay only the current workspace.
2340 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
2342 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
2343 they can be focused with a keypress, sorted or renumbered.
2345 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2347 * clfswm-pager.lisp (pager-mode): Remove multiple silly
2348 pager-draw-display. This prevent a lot of flickering in the
2351 * clfswm.lisp: Remove all display-force-output and replace them
2352 with only one display-finish-output in the event loop.
2354 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
2356 * clfswm-pager.lisp (pager-center-group): New function - center a
2357 group at the middle of the screen.
2359 * clfswm-pack.lisp (center-group): New function - center a group
2360 at the middle of the screen.
2362 * clfswm.lisp (show-group): Add a cross line under the group.
2363 (show-group): Group are showned even if fullscreened.
2364 (init-display): Add an exposure event on the root window.
2366 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
2368 * package.lisp (*default-group*): Default group is the same size
2369 of a fullscreened group.
2371 * bindings*: Use shift to move, control+shift to copy.
2373 * *.lisp: Add comments for configuration or alternatives. So grep
2374 for CONFIG to see where you can configure clfswm. And grep for
2375 Alternative to use some commented code.
2377 * clfswm.lisp (second-key-mode): Use a single window to show the
2378 second mode. See for alternatives at the end of this file.
2380 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
2382 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
2383 macro of key and mouse definitions.
2384 (define-define-key/mouse): Use state instead of modifiers list
2385 this fix a bug when the modifiers list is not in the rigth order.
2387 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
2389 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
2391 * clfswm-info.lisp (info-mode): Add an info mode.
2393 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
2395 * clfswm.lisp (process-new-window): Change border size for
2397 (show-all-windows-in-workspace): Unhide all windows even when the
2398 current group is in fullscreen mode.
2400 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
2402 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
2403 redisplay the identify window after a terminal switch.
2405 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
2406 redisplay the pager after a terminal switch.
2408 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
2410 * clfswm-util.lisp (identify-key): Add a window to display
2411 the keys to identify on screen.
2413 * bindings.lisp, bindings-pager.lisp: Define same keys to
2414 move/copy groups/windows in second mode and in pager.
2416 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
2418 (show-all-windows-in-workspace): unhide window before adapting it
2421 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
2423 * clfswm.lisp (handle-event): Revert to an older version.
2425 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
2427 * clfswm-util.lisp (force-window-in-group)
2428 (force-window-center-in-group): New functions for transient windows.
2430 * clfswm-pager.lisp (pager-remove-current-workspace/group):
2431 bugfix: hide all windows before removing group or workspace.
2433 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
2435 * bindings-pager.lisp (mouse-pager-move-selected-group)
2436 (mouse-pager-copy-selected-group)
2437 (mouse-pager-move-selected-window)
2438 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
2439 (mouse-pager-rotate-window-down): New functions to have mouse in
2442 * clfswm-pager.lisp (pager-swap-window)
2443 (pager-copy-group-on-next/previous-workspace)
2444 (pager-copy-window-on-next/previous-line): New functions
2446 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
2448 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
2449 (pager-move-group-on-next/previous-workspace): new functions.
2451 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
2452 to its half size (new functions).
2454 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
2456 * clfswm-pager.lisp: workspaces, groups and windows can now be
2457 selectionned with the keyboard or the mouse.
2459 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
2461 * clfswm-pager.lisp (pager-select-workspace-right/left):
2462 workspaces can now be selectionned with the keyboard.
2464 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
2466 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
2467 new function to remove a previous defined key or mouse combination.
2469 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
2471 * clfswm.lisp (main): Check for access error in init-display.
2473 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
2474 keycode before grabbing.
2476 * bindings.lisp: Remove nlambda and use defun to keep the function
2477 documentation with clisp.
2478 (define-shell): new macro to define shell command for the second
2481 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
2483 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
2486 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
2488 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
2489 workspace circulation.
2491 * clfswm-util.lisp (absorb-orphan-window): new function.
2493 * clfswm-keys.lisp: Keysyms support.
2495 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
2497 * clfswm.lisp (show-group): Use one gc for all groups and not one
2500 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
2502 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
2504 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
2505 width and height outside group.
2507 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
2509 * clfswm.lisp: First public release.