1 2012-07-23 Philippe Brochard <pbrochard@common-lisp.net>
3 * src/clfswm-expose-mode.lisp: New expose mode based on standard
6 2012-06-27 Philippe Brochard <pbrochard@common-lisp.net>
8 * src/clfswm-util.lisp (eval-from-query-string): Add completion
9 for eval for query string.
11 2012-06-26 Philippe Brochard <pbrochard@common-lisp.net>
13 * src/clfswm-query.lisp: Add completion for shell commands.
15 2012-06-18 Philippe Brochard <pbrochard@common-lisp.net>
17 * src/clfswm-placement.lisp: Each child can have its own border
18 size. New binding to change the child border size on the fly.
20 2012-06-08 Philippe Brochard <pbrochard@common-lisp.net>
22 * src/tools.lisp (process-timers): Call get-internal-real-time
23 only once for all times.
25 2012-06-07 Philippe Brochard <pbrochard@common-lisp.net>
27 * contrib/toolbar.lisp (define-toolbar-hooks): Add auto-hide
29 (define-toolbar-hooks): Add auto-hide toolbar (show/hide on mouse
32 2012-06-06 Philippe Brochard <pbrochard@common-lisp.net>
34 * src/xlib-util.lisp (handle-event): Add an additional hook event
35 system to handle events in contrib code.
37 2012-06-03 Philippe Brochard <pbrochard@common-lisp.net>
39 * src/clfswm-placement.lisp: Add an optional border size in all
42 2012-05-30 Philippe Brochard <pbrochard@common-lisp.net>
44 * contrib/toolbar.lisp (clock): Add a clock module.
46 2012-05-28 Philippe Brochard <pbrochard@common-lisp.net>
48 * contrib/toolbar.lisp: begining of toolbar support.
50 2012-05-24 Philippe Brochard <pbrochard@common-lisp.net>
52 * src/clfswm-internal.lisp (rotate-root-geometry): Do not use
53 rotatef but a simpler algorithm.
55 2012-05-19 Philippe Brochard <pbrochard@common-lisp.net>
57 * src/clfswm-placement.lisp: Adjust width and height in child and
58 root placement to prevent too big child size.
60 2012-05-18 Philippe Brochard <pbrochard@common-lisp.net>
62 * src/clfswm-placement.lisp: New root placement possibility.
64 * src/clfswm-util.lisp (change-current-root-geometry): New
67 2012-05-17 Philippe Brochard <pbrochard@common-lisp.net>
69 * src/clfswm-util.lisp (exchange-root-geometry-with-mouse): New
72 2012-05-16 Philippe Brochard <pbrochard@common-lisp.net>
74 * src/menu-def.lisp: New root menu.
76 2012-05-15 Philippe Brochard <pbrochard@common-lisp.net>
78 * src/clfswm-circulate-mode.lisp (rotate-root-geometry-next)
79 (rotate-root-geometry-previous): New second mode binding to change
82 2012-05-13 Philippe Brochard <pbrochard@common-lisp.net>
84 * src/clfswm-internal.lisp: Remove the *current-child* variable
85 and use a setfable function (current-child) instead.
86 (current-child-setter): Store root current child before apllying
89 2012-05-09 Philippe Brochard <pbrochard@common-lisp.net>
91 * src/clfswm-internal.lisp: Use xdpyinfo/xinerama informations
92 instead of xrandr informations.
94 2012-05-06 Philippe Brochard <pbrochard@common-lisp.net>
96 * src/clfswm-internal.lisp : Use only one list for root
98 (*root*): Root management API simplification.
100 2012-04-30 Philippe Brochard <pbrochard@common-lisp.net>
102 * src/clfswm-internal.lisp: Big change to replace *current-root*
103 variable to support multiple root.
105 2012-04-18 Philippe Brochard <pbrochard@common-lisp.net>
107 * src/tools.lisp (add-new-hook, add-hook): New macro. Do not
108 duplicate hooks by default. Use add-new-hook if you want to
111 2012-04-16 Philippe Brochard <pbrochard@common-lisp.net>
113 * src/clfswm-corner.lisp (wait-window-in-query-tree): Add a limit
114 of try to wait the command window.
116 2012-02-25 Philippe Brochard <pbrochard@common-lisp.net>
118 * src/clfswm-util.lisp (place-frames-from-xrandr)
119 (swap-frame-geometry, rotate-frame-geometry): New helper functions
120 for multiple physical screen.
121 (jump-to-slot, add-frame-in-parent-frame): Change *current-root*
124 2012-01-18 Philippe Brochard <pbrochard@common-lisp.net>
126 * src/*.lisp: Use create-symbol and create-symbol-in-package
127 instead of the shorter symb. (Thanks Aad Versteden).
129 * src/bindings-second-mode.lisp (set-default-second-keys): New
130 key binding to set window and frame transparency.
132 * src/bindings.lisp (set-default-main-mouse): New mouse binding to
133 set window and frame transparency.
135 * src/clfswm-keys.lisp (define-keys): New macro to ease multiple
136 keys definitions. (Thanks Valentin Plechinger for the request).
138 * src/*.lisp: Add full transparency support with xcompmgr.
140 2012-01-14 Philippe Brochard <pbrochard@common-lisp.net>
142 * src/*.lisp: Add transparency support.
144 2012-01-09 Ales Guzik <ales.guzik@gmail.com>
146 * src/clfswm-layout.lisp (tile-layout-mix): New layout to
147 automatically choose between vertival and horizontal tile layout.
148 (tile-space-layout): Fix to have space between screen border and
149 frame the same as between frames.
151 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
153 * load.lisp: Support clisp 2.49+ module system to load CLX.
155 2012-01-04 Ales Guzik <ales.guzik@gmail.com>
157 * src/clfswm-layout.lisp (update-layout-managed-children-keep-position):
158 Fix an inattention error.
160 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
162 * src/xlib-util.lisp (with-xlib-protect): Protect from
163 xlib:lookup-error. This prevent an error in clisp/new-clx when
164 sometimes an xlib:colormap is expected instead of an xlib:window.
166 2012-01-03 Philippe Brochard <pbrochard@common-lisp.net>
168 * src/xlib-util.lisp (handle-event): Fix a clisp/new-clx error
169 when sometimes window slot of event-slots is a pixmap instead of a
172 2011-12-26 Philippe Brochard <pbrochard@common-lisp.net>
174 * src/clfswm-query.lisp: Fill the history list with a non-nil
177 2011-12-25 Philippe Brochard <pbrochard@common-lisp.net>
179 * src/package.lisp (make-x-drawable): Drawable wrapper to prevent
180 type error in some CLX versions.
181 Replace xlib:drawable-* functions with x-drawable-* equivalents
183 2011-12-14 Philippe Brochard <pbrochard@common-lisp.net>
185 * src/clfswm-util.lisp (um-create-xdg-section-list): Add at least
186 the 'Utility menu entry.
188 * src/config.lisp (*xdg-section-list*): moved to config.lisp.
190 * src/clfswm-util.lisp (update-menus): Set a default value for
191 searching .desktop files when XDG_DATA_DIRS is not set.
193 2011-10-15 Philippe Brochard <pbrochard@common-lisp.net>
195 * src/clfswm-internal.lisp (place-window-from-hints): Use
196 with-placement macro to place unmanaged windows in an arbitrary
199 2011-06-16 Philippe Brochard <pbrochard@common-lisp.net>
201 * src/clfswm-internal.lisp (clean-windows-in-all-frames): Prevent
202 current root and current child being equal to child.
204 2011-06-13 Philippe Brochard <pbrochard@common-lisp.net>
206 * src/keysyms.lisp: Repeat Page_Down/Up keysym definitions at the
207 end of the file to change keysyms priority.
209 2011-06-13 Sylvain HENRY <hsyl20@gmail.com>
211 * *.*: Minor spelling fix.
213 2011-06-12 Philippe Brochard <pbrochard@common-lisp.net>
215 * src/clfswm.lisp (:unmap-notify, :destroy-notify): Show all
216 children just after the xlib tree cleanup -> reduce the
217 flickering when a window is deleted or destroyed.
219 * src/clfswm-internal.lisp (process-existing-windows): Do not
220 process the notify window.
222 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
224 * *: **** Release 1106 ****
226 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
228 * src/clfswm-internal.lisp (clean-windows-in-all-frames): New
229 function to prevent xlib error when a window is deleted.
231 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
233 * src/clfswm-internal.lisp
234 (delete-child-and-children-in-all-frames): Delete or destroy
235 children before displaying all children.
237 2011-06-05 Philippe Brochard <pbrochard@common-lisp.net>
239 * src/clfswm-util.lisp (add-frame-in-parent-frame): New function
242 2011-06-04 Philippe Brochard <pbrochard@common-lisp.net>
244 * src/clfswm.lisp (main-unprotected): Destroy all frames windows
245 before closing the display (not really needed).
247 2011-06-02 Philippe Brochard <pbrochard@common-lisp.net>
249 * src/clfswm-layout.lisp (inc-tile-layout-size)
250 (dec-tile-layout-size, inc-slow-tile-layout-size)
251 (dec-slow-tile-layout-size): New functions and bindings.
253 2011-06-01 Philippe Brochard <pbrochard@common-lisp.net>
255 * src/clfswm-expose-mode.lisp (define-expose-letter-keys): Add
256 0..1 and A..Z keys to select a child in exposé mode.
258 * src/clfswm-internal.lisp (display-frame-info): Remove hidden
259 infos in frames windows.
261 * src/clfswm-util.lisp (ask-close/kill-current-window): Menu
264 2011-05-30 Philippe Brochard <pbrochard@common-lisp.net>
266 * src/clfswm-internal.lisp (get-parent-layout): Minor fullscreen
269 2011-05-29 Philippe Brochard <pbrochard@common-lisp.net>
271 * src/clfswm-internal.lisp
272 (delete-child-and-children-in-all-frames): Show all children
273 before deleting/destroying a windows, so prevent a flickering.
274 (get-parent-layout): Return the fullscreen size when the current
277 2011-05-28 Philippe Brochard <pbrochard@common-lisp.net>
279 * src/clfswm-internal.lisp (get-parent-layout): Handle correctly
282 * src/clfswm-util.lisp (delete-focus-window-generic): Do not hide
283 child before removing, so prevent a flickering.
285 * src/clfswm-internal.lisp (show-all-children): Rectangular
286 optimization to display only needed children.
287 (show-all-children): Remove flickering on
288 select-next/previous-brother.
290 2011-05-17 Philippe Brochard <pbrochard@common-lisp.net>
292 * src/clfswm-util.lisp (copy-focus-window, cut-focus-window): New
293 functions and ask-close/kill-current-window menu and bindings
296 2011-05-16 Philippe Brochard <pbrochard@common-lisp.net>
298 * src/clfswm-util.lisp (ask-close/kill-current-window): Add an
299 *ask-close/kill-placement* placement window variable.
301 2011-05-09 Philippe Brochard <pbrochard@common-lisp.net>
303 * contrib/osd.lisp (funcall-button-from-code): Display osd
304 documention for buttons and fix some redefining warnings.
306 2011-05-07 Philippe Brochard <pbrochard@common-lisp.net>
308 * src/clfswm-nw-hooks.lisp (make-permanent-nw-hook-frame): New
309 function. Prevent to add or delete a new window hook for this
312 * src/clfswm-layout.lisp (update-layout-managed-children-position):
315 2011-05-06 Philippe Brochard <pbrochard@common-lisp.net>
317 * src/bindings-second-mode.lisp (set-default-second-keys):
318 select-brother-spatial-move-* binding update.
320 * src/clfswm-layout.lisp (tile-left|right|top|bottom-layout): Ask
321 to keep children positions or not.
323 * src/clfswm-internal.lisp (fixe-real-size): Takes care of border
326 * src/clfswm-layout.lisp (update-layout-managed-children): Fix a
327 bug by using the parent frame instead of the current child.
329 * src/clfswm-circulate-mode.lisp
330 (select-brother-generic-spatial-move+right/left/up/down): New
331 function to select a brother from another in a spatial move.
333 2011-04-19 Philippe Brochard <pbrochard@common-lisp.net>
335 * src/clfswm-pack.lisp (move-frame-constrained)
336 (resize-frame-constrained): Use pixels instead of floating
339 2011-04-18 Philippe Brochard <pbrochard@common-lisp.net>
341 * src/clfswm-pack.lisp (resize-frame-constrained): Takes care of
343 (implode-frame, implode-current-frame): New functions. Absorb all
344 frames subchildren in frame. Explode frame opposite.
346 2011-04-17 Philippe Brochard <pbrochard@common-lisp.net>
348 * src/clfswm-pack.lisp (move-frame-constrained)
349 (resize-frame-constrained): New function. Move and resize frame
350 with the mouse constrained by other frame brothers.
352 2011-04-14 Philippe Brochard <pbrochard@common-lisp.net>
354 * src/clfswm-util.lisp (with-movement-select-next-brother)
355 (with-movement-select-previous-brother)
356 (with-movement-select-next-child): Use a simple method (do not
357 enter in the circulate mode) to allow to circulate in all children
360 * src/clfswm-menu.lisp (open-menu): Save info hash table keys
361 instead of deleting newly created keys.
363 2011-03-21 Philippe Brochard <pbrochard@common-lisp.net>
365 * src/clfswm-internal.lisp (x-px->fl, y-px->fl): Takes care of
368 2011-03-20 Philippe Brochard <pbrochard@common-lisp.net>
370 * src/clfswm-info.lisp (show-config-variable): call
371 produce-conf-var-doc.
373 2011-03-18 Philippe Brochard <pbrochard@common-lisp.net>
375 * src/clfswm-autodoc.lisp (produce-conf-var-doc-html): Produce a
376 documentation for all configurable variables in CLFSWM -
379 * src/clfswm-internal.lisp (leave-frame): Hide all children except
382 2011-03-16 Philippe Brochard <pbrochard@common-lisp.net>
384 * src/clfswm-autodoc.lisp (produce-all-docs): Produce a
385 documentation for all configurable variables in CLFSWM.
387 * src/clfswm-layout.lisp (set-gimp-layout): Display a notify
388 window with the help on the GIMP layout.
390 2011-03-12 Philippe Brochard <pbrochard@common-lisp.net>
392 * src/menu-def.lisp: Menu update to prevent cursor keys clash.
394 * clfswm.asd: Change compilation order to prevent undefined
397 * src/clfswm-internal.lisp (show-child(frame)): Handle properly
398 the show-root-frame-p parameter.
400 2011-03-11 Philippe Brochard <pbrochard@common-lisp.net>
402 * src/clfswm-util.lisp (move-frame, resize-frame): Do not move or
403 resize a frame when it's the current root.
405 2011-03-10 Philippe Brochard <pbrochard@common-lisp.net>
407 * src/clfswm-internal.lisp (show-all-children): Handle properly
408 duplicated child in multipe frames.
410 2011-03-09 Philippe Brochard <pbrochard@common-lisp.net>
412 * contrib/volume-mode.lisp (set-default-volume-keys): Add more
413 keybindings (up/down, right/left) to raise/lower the volume.
415 * src/clfswm-layout.lisp: Add a variable border size for frames
418 2011-03-08 Philippe Brochard <pbrochard@common-lisp.net>
420 * src/clfswm-util.lisp (cut-current-child, remove-current-child)
421 (delete-current-child): Hide the current child before doing the
424 * src/clfswm-internal.lisp (show-all-children): Hide windows not
425 in the current root before displaying those in current root.
426 Remove all hide-all unnecessary calls.
428 * src/clfswm-configuration.lisp (save-variables-in-conf-file):
429 Save only variables with a different value than their original
432 2011-03-07 Philippe Brochard <pbrochard@common-lisp.net>
434 * src/clfswm-info.lisp (show-config-variable): Use the new
437 * src/clfswm-autodoc.lisp (produce-configuration-variables): Use
438 the new defconfig method.
440 * src/clfswm-configuration.lisp (create-configuration-menu):
441 Change the config system with a more lispy one and a less string
442 based one: (defconfig name value group doc).
445 2011-03-06 Philippe Brochard <pbrochard@common-lisp.net>
447 * src/clfswm-internal.lisp (show-all-children): Simplify the
449 (show-child): Display an unmanaged window whe it's the current
451 (show-all-children): add the ability to display all child from
452 *root-frame* and hide all those who are not in *current-root*.
453 -> remove hide-all-children when needed.
455 * src/xlib-util.lisp (move-window,resize-window): Add a
456 *color-move-window* border when moving or resizing a window.
458 2011-03-04 Philippe Brochard <pbrochard@common-lisp.net>
460 * src/clfswm-internal.lisp (show-all-children): Perform only one
461 recusion on the clfswm tree: calculate geometry and place child in
464 2011-03-03 Philippe Brochard <pbrochard@common-lisp.net>
466 * src/clfswm-internal.lisp (show-all-children): Rethink of display
467 child order to prevent very annoying flickering.
469 2011-02-27 Philippe Brochard <pbrochard@common-lisp.net>
471 * src/clfswm-util.lisp (query-yes-or-no): New function.
473 * src/clfswm-configuration.lisp (reset-all-config-variables): New
474 function and menu entry.
475 (query-conf-value): Add the ability to leave the field blank to
476 reset the variable to its default value.
478 2011-02-26 Philippe Brochard <pbrochard@common-lisp.net>
480 * src/clfswm-configuration.lisp
481 (add-all-configuration-default-value): Add a default value to
482 configurable variables.
484 2011-02-23 Philippe Brochard <pbrochard@common-lisp.net>
486 * src/clfswm.lisp (main-unprotected): Create the configuration
487 menu only once at startup.
489 2011-02-22 Desmond O. Chang <dochang@gmail.com>
491 * contrib/amixer.lisp: Add a volume mode inspired by the emms
492 volume package. Alsa mixer interface.
494 * contrib/volume-mode.lisp: Add a volume mode inspired by the emms
497 2011-02-22 Desmond O. Chang <dochang@gmail.com>
499 * src/clfswm.lisp (main): Use ASDF:SYSTEM-SOURCE-DIRECTORY instead
500 of *LOAD-TRUENAME*. *LOAD-TRUENAME* is only bound during a call to
501 LOAD. If one eval CLFSWM:MAIN in repl, BASE-DIR will be an empty
502 string. Use ASDF:SYSTEM-SOURCE-DIRECTORY to fix it.
504 2011-02-16 Philippe Brochard <pbrochard@common-lisp.net>
506 * src/clfswm.lisp (main-unprotected): Add a close hook. And close
507 the notify window, the virtual keyboard and the clfswm terminal by
510 2011-02-15 Philippe Brochard <pbrochard@common-lisp.net>
512 * src/clfswm.lisp (main-unprotected): Destroy the notify window
513 before closing the display. This fix a bug when resetting/reloading
516 2011-02-12 Philippe Brochard <pbrochard@common-lisp.net>
518 * src/xlib-util.lisp (equal-wm-class-fun, equal-wm-name-fun)
519 (raise-window-fun, raise-and-focus-window-fun): New functions.
521 * src/config.lisp (*clfswm-terminal-cmd*): Switch from xterm to
523 (*never-managed-window-list*): Structure change to be more
524 flexible. Let the choice to focus, raise and do nothing on never
527 2011-02-09 Philippe Brochard <pbrochard@common-lisp.net>
529 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Take
530 care of never managed windows to move or resize them if the raise
533 * src/clfswm-internal.lisp (in-frame, in-window, in-child): New
536 2011-02-08 Philippe Brochard <pbrochard@common-lisp.net>
538 * src/clfswm.lisp (main-mode): Raise or not unmanaged windows
539 following request in *never-managed-window-list*.
541 2011-02-05 Philippe Brochard <pbrochard@common-lisp.net>
543 * *: **** Release 1102 ****
545 2011-02-05 Desmond O. Chang <dochang@gmail.com>
547 * src/keysyms.lisp: Add extended keysyms from stumpwm.
549 2011-02-01 Desmond O. Chang <dochang@gmail.com>
551 * src/clfswm-util.lisp (run-or-raise): New function (thanks to
554 * src/clfswm-internal.lisp (with-all-*): add a nil block.
556 2011-01-28 Desmond O. Chang <dochang@gmail.com>
558 * src/clfswm-util.lisp (xdg-config-home): XDG_CONFIG_HOME should
559 be $HOME/.config by default.
561 2010-12-29 Philippe Brochard <pbrochard@common-lisp.net>
563 * contrib/osd.lisp (display-doc): Add another method where a
564 CLFSWM native window is used to display the key documentation.
566 2010-12-27 Philippe Brochard <pbrochard@common-lisp.net>
568 * src/xlib-util.lisp (with-xlib-protect): Force to revert to the
571 2010-12-25 Philippe Brochard <pbrochard@common-lisp.net>
573 * src/clfswm-second-mode.lisp (second-key-mode): Call the second
574 mode leave function only when the generic mode was ended.
576 2010-12-08 Philippe Brochard <pbrochard@common-lisp.net>
578 * src/clfswm-second-mode.lisp (sm-leave-function): Do not use
579 *second-mode-program* anymore.
581 2010-12-07 Philippe Brochard <pbrochard@common-lisp.net>
583 * src/clfswm-second-mode.lisp (*second-mode-leave-function*): New
584 variable bound to a function executed (when not null) on second
587 2010-11-14 Philippe Brochard <pbrochard@common-lisp.net>
589 * src/clfswm-util.lisp (find-child-under-mouse): Do not find
592 2010-11-13 Philippe Brochard <pbrochard@common-lisp.net>
594 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
595 Do not display the accel window for unmanaged windows.
597 2010-11-11 Philippe Brochard <pbrochard@common-lisp.net>
599 * src/clfswm-internal.lisp (set-current-root): Handle
600 window-parent in set-current-root.
602 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
603 focus the parent child when the current root is a window.
605 2010-11-09 Philippe Brochard <pbrochard@common-lisp.net>
607 * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
608 New function an bindings.
610 * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
613 2010-11-07 Philippe Brochard <pbrochard@common-lisp.net>
615 * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
616 function to let the user choose to keep child position with
619 * src/clfswm-internal.lisp (remove-frame-data-slot): New
622 2010-11-05 Philippe Brochard <pbrochard@common-lisp.net>
624 * src/clfswm-internal.lisp (frame-select-next-child)
625 (frame-select-previous-child): New functions and bindings. Select
626 the next/previous child in the current frame.
628 2010-10-31 Philippe Brochard <pbrochard@common-lisp.net>
630 * src/clfswm-query.lisp (query-mode-complet): New function: Handle
631 completion in query-mode.
633 2010-10-30 Philippe Brochard <pbrochard@common-lisp.net>
635 * src/clfswm-query.lisp (query-print-string): Handle long lines
638 2010-10-27 Philippe Brochard <pbrochard@common-lisp.net>
640 * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
641 all characters are printable.
643 2010-10-25 Philippe Brochard <pbrochard@common-lisp.net>
645 * contrib/server/server.lisp: Load clfswm client code in the main
646 program and let the user start it with a --client command line
649 * src/package.lisp (*main-entrance-hook*): New hook executed after
650 loading configuration file and before opening the display.
652 2010-10-23 Philippe Brochard <pbrochard@common-lisp.net>
654 * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
656 * src/clfswm-internal.lisp (show-child): Show window only if not
659 * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
660 change modifiers after binding definition.
662 2010-10-21 Philippe Brochard <pbrochard@common-lisp.net>
664 * contrib/osd.lisp: New file: OSD (On Screen Display) for
667 * src/clfswm-menu.lisp (open-menu): Modularise function.
669 2010-10-13 Philippe Brochard <pbrochard@common-lisp.net>
671 * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
672 key binding in main and second mode.
674 2010-10-10 Philippe Brochard <pbrochard@common-lisp.net>
676 * src/clfswm-util.lisp (open-notify-window): Convert hello-window
677 functions to a more generic Notify-window system.
679 * src/tools.lisp (add-timer): Add an id to identify the timer.
681 2010-10-09 Philippe Brochard <pbrochard@common-lisp.net>
683 * src/tools.lisp (erase-timer): New function.
685 * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
686 the hello window. Add Configuration variables.
688 2010-10-08 Philippe Brochard <pbrochard@common-lisp.net>
690 * src/clfswm-util.lisp (): Add an Hello window at startup.
692 * src/tools.lisp (process-timers): Add a timer system.
694 2010-10-07 Philippe Brochard <pbrochard@common-lisp.net>
696 * src/clfswm-query.lisp (add-in-query-string): Handle correctly
699 2010-10-06 Philippe Brochard <pbrochard@common-lisp.net>
701 * src/clfswm-query.lisp (query-print-string): Change cursor color
702 and show parenthesis matching with colors (on match and on
705 2010-10-05 Philippe Brochard <pbrochard@common-lisp.net>
707 * src/clfswm-internal.lisp (show-all-children): Do not raise a
708 child when its parent is hidden.
710 2010-10-02 Philippe Brochard <pbrochard@common-lisp.net>
712 * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
713 possibility to circulate over subchild of the current child.
715 * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
716 (expose-windows-generic): Add an escape-body function to return to
717 the original state on escape key.
719 * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
720 to bind the current child from the configuration file.
722 2010-10-01 Philippe Brochard <pbrochard@common-lisp.net>
724 * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
725 window hook: the frame absorb all new windows that match
726 nw-absorb-test frame data slot.
728 2010-09-30 Philippe Brochard <pbrochard@common-lisp.net>
730 * src/clfswm-expose-mode.lisp (expose-create-window): Show window
731 title in accel window.
733 2010-09-29 Philippe Brochard <pbrochard@common-lisp.net>
735 * configure: Use the Xavier Maillard clfswm script in contrib to
736 build an executable in the standard way.
738 2010-09-26 Philippe Brochard <pbrochard@common-lisp.net>
740 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
741 New functions. Add a window on each child in the expose mode to
744 * src/clfswm-internal.lisp (child-x, child-y, child-width)
745 (child-height): New methods to get real child coordinates.
747 2010-09-25 Philippe Brochard <pbrochard@common-lisp.net>
749 * src/clfswm-layout.lisp (*-layout): Use child-position.
751 * src/clfswm-internal.lisp (child-position): New function.
753 * src/clfswm-expose-mode.lisp (expose-windows-mode)
754 (expose-all-windows-mode): Use a generic mode.
756 * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
757 with handle-event-fun symbols instead of inspecting clfswm
758 internals symbols on each mode change.
760 * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
761 a separate clfswm-expose-mode.lisp file.
763 * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
764 screen size instead of hardcoded test coordinates.
766 2010-09-24 Philippe Brochard <pbrochard@common-lisp.net>
768 * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
769 (speed-mouse-right, speed-mouse-up, speed-mouse-down)
770 (speed-mouse-undo, speed-mouse-first-history): New functions to
771 quickly move the mouse. Implemented for the second mode.
773 2010-09-16 Philippe Brochard <pbrochard@common-lisp.net>
775 * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
776 write permission on $clfswm_asd_path. So anybody can start clfswm
777 even if there is no write permission on the source directory.
779 2010-09-12 Philippe Brochard <pbrochard@common-lisp.net>
781 * contrib/clfswm: Add support to cmucl, ccl and ecl.
783 2010-09-11 Philippe Brochard <pbrochard@common-lisp.net>
785 * src/clfswm-util.lisp (set-hide-unmanaged-window)
786 (set-show-unmanaged-window, set-default-hide-unmanaged-window):
787 New functions and menu entry.
788 (set-globally-hide-unmanaged-window)
789 (set-globally-show-unmanaged-window): New functions and menu
792 * src/clfswm-internal.lisp (hide-unmanager-window-p): New
794 (show-child): Add a data slot on frame to hide or not unmanaged
797 * src/clfswm-corner.lisp (present-clfswm-terminal)
798 (present-virtual-keyboard): Use a function (generic-present-body)
799 instead of a macro (generate-present-body).
801 * src/clfswm-util.lisp (update-menus): List all directories and
802 subdirectories in $XDG_DATA_DIRS/applications.
804 2010-09-10 Philippe Brochard <pbrochard@common-lisp.net>
806 * src/clfswm-corner.lisp (generate-present-body): New macro.
807 (present-clfswm-terminal, present-virtual-keyboard): Use
808 generate-present-body.
810 2010-09-09 Philippe Brochard <pbrochard@common-lisp.net>
812 * src/clfswm-util.lisp (update-menus): Follow XDG specifications
813 instead of the non-portable Debian update-menu.
815 2010-09-07 Philippe Brochard <pbrochard@common-lisp.net>
817 * src/clfswm.lisp (error-handler): New function do handle
818 asynchronous errors and ignore them.
819 (open-display): Install the new error-handler on display.
821 2010-09-05 Philippe Brochard <pbrochard@common-lisp.net>
823 * src/xlib-util.lisp (with-xlib-protect): Add a
824 with-simple-restart on top of body execution.
826 2010-09-04 Philippe Brochard <pbrochard@common-lisp.net>
828 * src/clfswm.lisp (main-loop): Protect all xlib functions with an
831 * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
832 handle-event. Add a with-simple-restart to prevent a
833 clisp/new-lisp infinite loop.
835 2010-08-30 Philippe Brochard <pbrochard@common-lisp.net>
837 * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
838 clfswm terminal working even on xterm title changes.
840 2010-08-29 Philippe Brochard <pbrochard@common-lisp.net>
842 * src/clfswm-util.lisp (run-other-window-manager): Update for
845 * src/tools.lisp (do-execute): New parameter io to change the
848 * src/clfswm-util.lisp (hide-current-child): Prevent from removing
851 * src/clfswm-internal.lisp (child-member): New predicate.
852 (child-remove): New function.
854 * src/*.lisp: Use child-member and child-remove everywhere it's
857 2010-08-28 Philippe Brochard <pbrochard@common-lisp.net>
859 * src/clfswm.lisp (main-loop): Ensure that all events have been
860 processed after a process-event.
862 * src/clfswm-internal.lisp (is-in-current-child-p): New function.
864 2010-08-27 Philippe Brochard <pbrochard@common-lisp.net>
866 * src/clfswm.lisp (main-mode:configure-request): Raise the window
867 only when present on the current child and focus it accordingly.
869 2010-08-26 Philippe Brochard <pbrochard@common-lisp.net>
871 * src/clfswm-circulate-mode.lisp (circulate-loop-function):
872 Use is-a-key-pressed-p.
874 * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
876 * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
877 returned by xlib:keysym->keycodes.
879 * src/*.lisp: Use the new child-equal-p to compare children. This
880 prevent a bug with sbcl/cmucl when the standard equal function
881 does not work with xlib:window.
883 * src/clfswm-internal.lisp (child-equal-p): New predicate.
885 2010-08-25 Philippe Brochard <pbrochard@common-lisp.net>
887 * src/clfswm-generic-mode.lisp (generic-mode): Use an
888 xlib:event-listen before processing event with
889 xlib:process-event. This prevent a bug with CLX threaded
890 implementation like sbcl.
892 * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
893 processing event with xlib:process-event. This prevent a bug with
894 CLX threaded implementation like sbcl.
896 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
898 * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
900 * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
903 * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
904 (find-parent-frame, find-frame-window, find-frame-by-name)
905 (find-frame-by-number): Use with-find-in-all-frames to search in
906 frames in the right order.
908 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
909 unwanted flickering with unmanaged windows.
911 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
913 * src/package.lisp: Remove event handler hooks as they're not
914 needed anymore (To replace them: use closure and define-handler).
916 * src/xlib-util.lisp (move-window, resize-window)
917 (wait-mouse-button-release): Use a generic mode.
919 * src/*.lisp: Replace the case to handle event with a more (tricky)
920 lispy method which bind a function to each keywords associated
923 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
925 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
926 menu entry between delete-current-child and remove-current-child.
927 ie: Delete a child and its children in all frames by default.
929 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
931 * src/package.lisp: Add a placement configuration group.
933 * src/binding*.lisp: Bind control+g to escape the current action
936 * src/clfswm-internal.lisp
937 (delete-child-and-children-in-all-frames): New function and
938 binding: Second mode - Control+Delete delete the current child and
939 its children in all frames (ie: close the current child and its
942 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
944 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
945 the frame window and the frame gc. Close a very annoying bug when
946 cuting/pasting a frame or moving a child over frames with the
949 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
950 all children in *current-root* after moving/resizing a frame.
952 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
954 * src/clfswm-util.lisp (delete-focus-window)
955 (destroy-focus-window): Remove child in parent frame before
958 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
960 * src/clfswm-util.lisp (identify-key): Add a timeout in
962 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
963 of the window passed by xlib:process-event.
965 * src/xlib-util.lisp (move-window, resize-window)
966 (wait-mouse-button-release): Add a timeout in xlib:process-event.
968 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
970 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
971 to launch an other window manager and to return to clfswm.
973 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
975 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
978 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
980 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
983 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
984 parameter and a loop timeout.
986 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
988 * src/clfswm.lisp (main): Add an alternate configuration filename
991 * load.lisp: Add a debuging code example.
993 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
995 * src/clfswm-configuration.lisp (create-configuration-menu): New
996 menu to configure all clfswm variables while clfswm is running.
998 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
1000 * src/clfswm-util.lisp (save-configuration-variables): New
1001 function to save all configuration variables in clfswmrc.
1003 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
1005 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
1007 (set-default-info-keys): Add cursor key support in info mode.
1009 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
1011 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
1014 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
1015 prevent reading the configuration file (this may be useful to
1016 produce the original documentation without user modifications
1017 with the rc configuration file).
1019 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
1021 * src/bindings-second-mode.lisp (set-default-second-keys):
1022 Simplification of Escape key to close/kill/remove the focus window
1023 and unhide all windows.
1025 * src/bindings.lisp (set-default-main-keys): Simplification of
1026 Escape key to close/kill/remove the focus window and unhide all
1029 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
1030 focus and unhide all windows capabilities.
1032 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1034 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
1036 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
1038 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
1039 Keep child order and don't make unnecessary child movement.
1040 (one-column-layout, one-line-layout): New layouts.
1042 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
1044 * *: **** Release 0906 ****
1046 * contrib/cd-player.lisp: New file to handle the CD player.
1048 * contrib/xmms.lisp: New file to handle the xmms player.
1050 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1052 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
1053 Maximize windows in their frame - Leave frames to their actual
1056 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
1057 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
1059 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
1061 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
1063 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
1065 * contrib/mpd.lisp: Use a standard menu.
1067 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
1069 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
1071 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
1073 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
1075 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
1078 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
1080 * src/config.lisp (get-fullscreen-size): One pixel adjustment
1083 * src/clfswm-placement.lisp (*-child-placement): One pixel
1086 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
1088 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
1089 Ensure that all characters are printable.
1091 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
1094 * src/clfswm-placement.lisp (*-child-placement): Adjust
1095 coordinates to one pixel in the current child.
1097 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1099 * src/clfswm-query.lisp (query-enter-function): Assign font before
1100 width and height calculation.
1102 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1104 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
1105 bannish the pointer in an arbitrary place.
1107 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
1108 place the info window in an arbitrary place.
1110 * src/clfswm-query.lisp (query-enter-function): Use with-placement
1111 macro to place the query window in an arbitrary place.
1113 * src/clfswm-placement.lisp: New file. Allow to place info windows
1114 or query windows on an arbitrary place. Allow to bannish the
1115 pointer on an arbitrary place.
1117 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
1119 * src/clfswm-circulate-mode.lisp (reorder-child)
1120 (reorder-brother): Unfocus windows before reordering children or
1123 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1125 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
1126 the parent is a frame.
1128 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
1129 motion with a default modifier.
1131 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
1134 * src/clfswm-info.lisp (info-mode): Handle motion with a default
1136 (info-mode): Optimization in loop function.
1138 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1140 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
1141 root-frame correctly.
1143 * clfswm.asd: Dependency fix for clfswm-generic-mode.
1145 * src/clfswm-circulate-mode.lisp (reorder-child)
1146 (reorder-brother): Handle empty frames.
1147 (reorder-brother): Redisplay only the parent frame of the current
1150 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
1151 parent frame of the current frame.
1153 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
1155 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
1156 Maximize/Unmaximize the current frame in its parent frame.
1158 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
1159 windows and frames in their parent frame.
1161 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1163 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
1165 * src/clfswm-circulate-mode.lisp (reorder-child)
1166 (reorder-brother): Reinitialise on circulate type change
1167 child to brother or brother to child.
1169 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
1170 calls xlib:display-finish-output on each map-request. So speed up
1173 * src/xlib-util.lisp (map-window): New function. Call
1174 xlib:display-finish-output on each map request.
1176 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1178 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
1179 Optimisation when drawing second mode window.
1181 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1183 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
1186 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1188 * src/clfswm-util.lisp (run-program-from-query-string): Launch
1189 command only with a return validation.
1191 2009-04-22 Xavier Maillard <xma@gnu.org>
1193 * src/clfswm-query.lisp (query-string): Use a generic mode.
1195 2009-04-19 Xavier Maillard <xma@gnu.org>
1197 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
1199 2009-04-18 Xavier Maillard <xma@gnu.org>
1201 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
1202 to define all other modes.
1204 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1206 * src/package.lisp (): Use *default-font-string* for all
1209 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
1211 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
1213 * src/xlib-util.lisp (null-size-window-p): Better check of null
1216 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
1218 * src/clfswm.lisp (handle-map-request): Add a fix to manage
1219 correctly fullscreen windows (SDL particularly).
1221 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
1223 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
1224 a segfault with clisp/new-clx.
1226 * src/clfswm.lisp (handle-motion-notify): Add a needed window
1229 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
1230 needed window argument.
1232 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
1234 * src/xlib-util.lisp (wait-no-key-or-button-press)
1235 (wait-a-key-or-button-press): Check buttons press/release correctly"
1237 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
1239 * src/menu-def.lisp: Add children navigation menu in the movement
1240 menu (select next/previous child/brother/level).
1242 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
1244 * *: Rename 'sister' frame to 'brother' frame.
1246 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
1247 alias in a real modifier.
1249 * src/package.lisp (*modifier-alias*): New list of modifier alias
1250 For example: :alt is :mod-1, :numlock is :mod-2...
1252 * src/tools.lisp (remove-hook): New function.
1254 * src/clfswm-keys.lisp (with-capslock, without-capslock)
1255 (with-numlock, without-cnumlock): New functions.
1257 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
1259 * src/clfswm-info.lisp: Use the *binding-hook* to create info
1260 keys and mouse bindings.
1262 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
1263 second keys and mouse bindings.
1265 * src/bindings.lisp: Use the *binding-hook* to create main keys
1268 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1270 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
1273 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
1275 * src/menu-def.lisp: Use a menu instead of a function for the
1278 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
1280 * src/clfswm-util.lisp (show-standard-menu): Display the standard
1281 menu from the 'update-menus' command.
1283 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
1285 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
1286 it's already grabbed.
1288 * src/clfswm-internal.lisp (display-frame-info): Use configurable
1289 colors and fix a bug with background.
1290 (display-frame-info): Set window background when displaying info.
1292 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1294 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
1295 warning with clisp/new-clx.
1297 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
1299 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
1302 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1304 * *: **** Release 0809 ****
1306 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1308 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
1310 (ensure-unique-number): New function and menu entry.
1312 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
1314 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
1315 hook: open the next window in a named frame.
1316 (numbered-frame-nw-hook): New new window hook: open the next
1317 window in a numbered frame.
1319 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
1320 cases. So query-string can be called even in the main mode.
1322 * src/clfswm-internal.lisp (show-all-children): Do not raise a
1323 child by default => far less flickering.
1325 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
1327 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
1329 * src/menu-def.lisp: Change key binding for the CLFSWM menu
1332 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
1333 is nil. (workaround on some CLX implementation).
1335 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
1337 * src/menu-def.lisp: Add a menu to set a focus policy for all
1340 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
1341 (all-frames-set-*-focus-policy): Set a focus policy for all
1344 * src/clfswm.lisp (handle-enter-notify): sloppy-select
1345 mode. Select a child and its parents on mouse over.
1347 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
1349 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
1350 policy -> Sloppy focus only for windows in the current frame.
1351 (main-unprotected): Exit clfswm on init error (ie: when another
1352 window manager is running).
1354 * src/clfswm-util.lisp (reset-clfswm): New function.
1356 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
1358 * src/clfswm-menu.lisp (init-menu): New function.
1360 * src/clfswm-util.lisp (reload-clfswm): New function to reload
1362 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
1364 * src/clfswm.lisp (main, main-unprotected): Handle error in a
1365 superior main function. Now CLFSWM can't break the X session. It
1366 just reinitialize the display and run a new main loop.
1368 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
1369 *vt-keyboard-on* global to avoid warnings when loading clfswm.
1371 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
1372 (help-on-gimp-layout): Describe how to use the GIMP layout.
1374 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
1376 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
1377 main-window-right-layout. Change the keybinding for (shift)alt+tab
1378 to not select windows in the main window lisst.
1379 Bind F8 to add a window in the main window list.
1380 Bind F9 to remove a window in the main window list.
1381 Change the focus policy to :sloppy.
1382 (set-previous-layout): Restore the previous layout, keybinding and
1385 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
1387 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
1389 * src/clfswm-layout.lisp (main-window-left-layout)
1390 (main-window-bottom-layout, main-window-top-layout): New
1392 Factorize layouts in menu.
1394 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
1396 * src/clfswm-layout.lisp (main-window-right-layout): A possible
1397 GIMP layout: one or more main windows on one side of the
1398 frame. Others on the other size.
1400 * src/clfswm-util.lisp
1401 (current-frame-set-click/sloppy-focus-policy): Each frame can have
1402 a different focus policy (one of :click or :sloppy).
1403 The default focus policy is set with *default-focus-policy*.
1405 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
1407 * src/clfswm-info.lisp (show-config-variable): New function.
1409 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
1411 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
1413 * src/clfswm-info.lisp: Colored help for key binding and corners
1416 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
1418 * src/clfswm-util.lisp (delete-focus-window)
1419 (destroy-focus-window): Remove chid only in
1420 handle-unmap/destroy-notify. Focus *current-root* only when
1421 closing/killing the current child.
1423 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
1424 functions or corners.
1426 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1428 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
1429 action: Hide/Unhide a terminal on mouse corner action. (By default
1430 right mouse button on the top left corner).
1432 * src/config.lisp (*never-managed-window-list*): New config
1435 * src/clfswm-internal.lisp (never-managed-window-p): New function:
1436 Handle never managed window in a more simple way.
1438 * src/clfswm-corner.lisp: New file and new and more simple method
1439 to define corners actions.
1441 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
1443 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
1445 * src/clfswm-layout.lisp (fast-layout-switch)
1446 (define-fast-layout-switch): New functions: Switch between two
1449 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
1450 really in the second mode. So leave-second-mode can be used even
1453 * src/clfswm-util.lisp (switch-to-last-child): New function:
1454 Store the current child and switch to the previous one.
1456 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1458 * src/clfswm-util.lisp (display-current-window-info): Display the
1460 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
1461 (top right by default). By default 'xvkbd' is used.
1463 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1465 * src/xlib-util.lisp (move-window, resize-window): Compress motion
1468 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
1470 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
1473 * src/clfswm-info.lisp (info-mode): Compress motion events.
1475 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
1477 * src/clfswm-internal.lisp (show-all-children): Compute geometry
1478 and selection first and then show only necessary children.
1479 (show-child): remove unneeded display-p parameter.
1481 * src/config.lisp (get-fullscreen-size): Place the frame border
1482 outside the screen (this prevent the loose of 2 pixels per
1485 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
1487 * src/clfswm-internal.lisp (focus-child): Algorithm change to
1488 raise only the selected child.
1490 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
1492 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
1493 Raise only viewable children.
1495 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
1497 * src/clfswm-internal.lisp (show-all-children): Always raise all
1498 displayed children. Remove all references to raise-p.
1500 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1502 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
1505 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
1506 second mode binding on raise/lower child in its frame.
1508 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
1509 behaviour to the new raise/lower property.
1510 Call clear-nw-hook before the rest of the hook.
1512 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
1513 (mouse-click-to-focus-and-resize-window): Stop button event. This
1514 prevent a keyboard/pointer freeze.
1516 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1518 * src/clfswm-internal.lisp (frame-lower-child)
1519 (frame-raise-child): New functions to raise/lower a child in its
1522 * src/clfswm-util.lisp (have-to-present-windows)
1523 (have-to-present-all-windows): New functions to have an MaxOS
1524 expose like on mouse click in screen corner.
1526 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
1528 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
1530 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
1531 child from a choice in all frames with hidden children.
1533 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
1535 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
1537 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
1538 (unhide-all-children): New functions.
1540 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
1543 * src/clfswm-util.lisp (hide/show-frame-window): new function and
1546 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
1548 * src/clfswm-util.lisp (rename-current-child): Do not display the
1549 frame info for a window.
1551 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
1553 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
1554 frame window for the removed child and its children.
1556 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
1558 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
1561 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
1563 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
1564 the ROX pinboard (ie: leave it lowered in the root window as
1567 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
1568 (tile-left-layout, tile-right-layout, tile-top-layout)
1569 (tile-bottom-layout): Use all the frame space when there is only
1572 * src/clfswm-internal.lisp (place-window-from-hints): Center
1573 unmanaged windows in the root screen.
1575 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
1578 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1580 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
1581 typo in managed types.
1583 * src/clfswm-internal.lisp (show-child): Always display frame info
1584 even if the frame is hidden.
1586 * src/xlib-util.lisp (resize-window): Use a better algorithme to
1589 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1591 * src/clfswm-util.lisp (with-movement): Display frame info for all
1592 frames in current root.
1594 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1596 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
1598 * src/bindings-second-mode.lisp (define-second-key #\a): New
1599 binding on 'add-default-frame'.
1601 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1602 message to follow the autodocumentation process.
1604 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1606 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1607 "Space" to jump to a child. "B" to bind a slot on the current
1610 * src/bindings-second-mode.lisp: Use "Tab" instead of
1613 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
1615 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1616 unmanaged (hidden) windows.
1618 * src/clfswm-internal.lisp (place-window-from-hints): Give a
1619 minimal size for windows.
1620 (with-all-windows-frames-and-parent): New function.
1622 * src/config.lisp (*default-window-width/height*): New parameters.
1624 * src/clfswm-internal.lisp (place-window-from-hints): Center
1625 windows in the screen instead of in their frame.
1627 * src/bindings-second-mode.lisp (tile-space-current-frame): New
1630 * src/clfswm-layout.lisp (register-layout): Intern the once name
1631 in the right package.
1633 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1635 * doc/dot-clfswmrc: Update to follow the new clfswm way.
1637 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
1639 * src/clfswm-internal.lisp (set-current-child)
1640 (adapt-child-to-parent, show-child, hide-child): Handle the case
1641 where child is not a frame or a window.
1643 * src/clfswm-util.lisp
1644 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1645 Check if child is a frame.
1647 * src/clfswm-internal.lisp (managed-window-p): Handle the case
1648 where frame is null.
1649 (place-frame): Check if frame and parent are frames.
1651 * src/clfswm-info.lisp (info-mode): display all frame info before
1654 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1655 info before leaving.
1657 * src/clfswm-internal.lisp (display-all-frame-info): New function.
1659 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
1661 * src/tools.lisp (getenv): Implemented for ECL.
1662 (urun-prog): Implemented for ECL.
1664 * src/clfswm-util.lisp (identify-key): Use a double buffer to
1667 * src/clfswm-query.lisp (query-string): Use a double buffer to
1670 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1673 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1676 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
1678 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1680 * src/menu-def.lisp: New file: move all menu definition in
1683 * src/clfswm-layout.lisp (register-layout): Use a function instead
1686 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
1688 * src/clfswm-autodoc.lisp (produce-menu-doc,
1689 (produce-menu-doc-html): New functions.
1690 (produce-doc-*): Moved to clfswm-autodoc.lisp.
1692 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1693 paste a child on one of its own children. (this prevent a
1695 (move-child-to): Rename move/copy-current-child-by to
1697 (mouse-move-window-over-frame): New function to move the window
1698 under the mouse cursor to another frame.
1700 * src/clfswm-internal.lisp (find-child-in-parent): New function.
1702 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1704 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1705 windows only when its window parent is the current child.
1707 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1709 * src/clfswm-util.lisp (manage-current-window)
1710 (unmanage-current-window): New functions: Allow to force to manage
1711 or unmanage a window by its parent frame.
1713 * src/bindings-second-mode.lisp (#\o): binded to
1714 set-open-in-new-frame-in-parent-frame-nw-hook and
1715 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1717 * src/clfswm-util.lisp (with-current-window): New macro.
1719 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1720 exposure and enter-window handle event.
1722 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1723 children for the current child after the move/resize.
1725 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1727 * src/xlib-util.lisp (resize-window): Take care of window size
1730 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1731 move/resize unmanaged windows.
1733 * src/xlib-util.lisp (move-window, resize-window): New functions.
1735 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1737 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1738 user choose what window type the current frame must handle.
1739 (display-current-window-info): New function.
1740 (current-frame-manage-all-window-type)
1741 (current-frame-manage-only-normal-window-type)
1742 (current-frame-manage-no-window-type): New functions.
1744 * src/clfswm-internal.lisp (managed-window-p): New function.
1746 * src/package.lisp (frame): Managed type: new frame
1747 parameter. This allow to choose what window type a frame must
1750 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1752 * src/clfswm-nw-hooks.lisp
1753 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1755 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1758 * src/tools.lisp (ensure-printable): Return always a string even
1761 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
1763 * src/config.lisp (*default-nw-hook*): New variable to change the
1764 default new window hook.
1766 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1768 * clfswm.asd (clfswm): Add a dependency from
1769 clfswm-second-mode.lisp to clfswm.lisp.
1771 * src/clfswm-util.lisp (identify-key): Show the documentation for
1772 the function bound on a key.
1773 (with-movement): Move with-movement,
1774 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
1775 to clfswm-util.lisp.
1777 * src/clfswm-menu.lisp: New menu system that let user change keys
1778 or functions associated to keys.
1780 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
1782 * src/clfswm-internal.lisp (show-all-children): Display-child is
1783 the first child by default. Solve a bug with father-p.
1785 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
1787 * src/clfswm-internal.lisp (add-frame): Add frame return the
1789 (show-all-children): Move the size computation outside the
1792 * src/bindings-second-mode.lisp (with-movement): Redisplay only
1795 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1796 only the current child.
1798 * src/clfswm-internal.lisp (show-all-children): New display-child
1799 parameter to display only the desired child and its children.
1800 (select-next/previous-child): Only display the current child.
1802 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
1804 * src/clfswm.lisp (init-display): Move the default frame creation
1805 on the default init hook.
1807 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1808 the main mode (for example: "1" on an azerty keyboard).
1810 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
1812 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1813 keysyms. Revert to old grabbing method for the main mode.
1815 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
1817 * src/clfswm.lisp (init-display): Add key handling on no focus
1818 window and on frame windows.
1820 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1822 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1823 all keys by default and replay just what is needed. No change for
1826 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1827 (find-key-from-code): Test for shift and not shift presence.
1829 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
1831 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1832 new key parameter to have less flickering.
1834 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
1836 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1837 layout only one time and revert to no-layout to freely handle
1840 * src/clfswm-nw-hooks.lisp
1841 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1842 with new created window.
1844 * src/clfswm-layout.lisp (register-layout): Now register
1845 automatically a once layout to set the layout only one time and
1846 revert to no-layout to freely handle frames.
1848 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1850 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1851 nw-hook: Open the next window in the current frame and leave the
1852 focus to the current child.
1854 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
1856 * src/bindings-second-mode.lisp: Add keys definitions to
1857 bind-or-jump in the second mode.
1859 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
1860 macro for bind-or-jump-(1|2|3...).
1862 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
1863 arguments to function. This allow to do things like:
1864 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
1865 are passed to my-function on key press.
1867 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
1869 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
1871 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
1873 * src/clfswm-internal.lisp (child-fullname): New function
1875 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
1876 docstring in info-mode-menu. An item can be
1877 '((key function) (key function)) or with docstring
1878 '((key function "documentation 1") (key function "bla bla") (key function))
1880 * src/tools.lisp (ensure-n-elems): New function.
1882 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
1883 resize a frame or the window's father.
1885 * src/clfswm.lisp (init-display): Remove tile-space-layout by
1886 default on the root frame.
1888 * src/clfswm-util.lisp (move/resize-frame): Add standard event
1889 hooks handlers (map-request, configure-notify...)
1891 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
1894 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1896 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
1897 or the window's father.
1899 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
1900 event only if there is a geometry change.
1901 (mouse-focus-move/resize-generic): Generic function to move or
1902 resize a frame or a window father frame.
1904 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1906 * src/clfswm-internal.lisp (show-all-children): Return t if there
1907 is a geometry change.
1909 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
1911 * src/bindings.lisp (Up/Down): Swap select previous/next level.
1913 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
1915 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
1917 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
1918 (with-all-*): Reverse the child list to manage the first child last (like in
1921 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
1922 root window only if true.
1924 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
1925 root window only if *create-frame-on-root* is true.
1927 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
1930 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
1932 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
1933 the current child (even if it's a window).
1935 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
1937 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
1938 (mouse-click-to-focus-and-resize): New functions.
1940 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
1941 (*-px->fl): Convert pixel coordinates to float.
1943 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
1945 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
1947 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
1950 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
1951 and hide-all-children.
1952 (raise-if-needed): New function.
1953 (show-child): Use a first-p parameter to raise windows only when they are
1956 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
1958 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
1961 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
1963 * src/clfswm-info.lisp (keys-from-list): new function.
1965 * src/*: rename 'childs' in 'children'.
1967 * src/*: rename 'group' in 'frame'.
1969 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
1971 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
1973 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
1975 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
1977 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
1979 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
1980 Bind control+o to open the next window in a new group in the root group
1981 (as open in next window in a new workspace in 0801 version).
1983 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
1985 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
1988 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
1990 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
1991 instead of Tab for select-previous-child.
1993 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
1995 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
1998 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
2000 * clfswm-util.lisp (identify-key): Display the documentation
2001 associated to keys when identifying a key.
2003 2008-03-10 Xavier Maillard <xma@gnu.org>
2005 * contrib/clfswm: Complete rewrite of the script. Detect error and
2006 act accordingly. Add command line arguments to configure the
2007 script execution. User can now choose different common lisp
2008 implementation (clisp and sbcl only), choose where to store the
2009 dumped image, where to find clfswm source.
2011 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
2013 * clfswm-internal.lisp (process-new-window): Beginning of new
2014 window hook: each group have a hook to tell what he wants to do
2015 with the new created window.
2017 2008-03-08 Xavier Maillard <xma@gnu.org>
2019 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
2020 call the resulting executable.
2022 * clfswm.lisp (read-conf-file): Check for the user config file in
2023 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
2024 prefered whenever possible.
2026 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
2028 * clfswm-layout.lisp (*-layout): Add an optional raise-p
2029 parameter in each layout.
2031 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2033 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
2035 (copy/move-current-child-by-name/number): new functions
2036 (focus-group-by-name/number): new functions
2037 (delete-group-by-name/number): new functions
2039 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2041 * ************************************************************ *
2042 *: Major update - No more reference to workspaces. The main *
2043 structure is a tree of groups or application windows. *
2044 * ************************************************************ *
2046 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
2048 * clfswm.lisp (read-conf-file): Read configuration in
2049 $HOME/.clfswmrc or in /etc/clfswmrc or in
2050 $XDG_CONFIG_HOME/clfswm/clfswmrc.
2051 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
2054 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
2056 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
2059 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
2061 * clfswm-internal.lisp (find-window-group): New function.
2063 * clfswm*: Change to make clfswm run with clisp/new-clx.
2065 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
2067 * clfswm-util.lisp (query-show-paren): Add show parent matching in
2069 (query-string): Bind control+k to delete end of line.
2071 * clfswm-second-mode.lisp (draw-second-mode-window): Display
2072 the action on mouse motion in second mode.
2074 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
2075 event but do not clear the root window.
2076 (handle-configure-request): Adjust unmanaged window from their
2079 * clfswm-internal.lisp (process-new-window): Adjust new window
2080 with the specified hints (max/min/base width/height).
2082 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
2084 * clfswm.lisp (handle-configure-request): Send an Configuration
2085 Notify event. This solve a bug with xterm and rxvt who takes some
2086 times to be mapped. Now there is no delay.
2088 * bindings-second-mode.lisp (define-shell): Run programs after
2089 living the second mode.
2091 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
2093 * clfswm-internal.lisp (process-new-window): Do not crop transient
2094 window to group size.
2095 (adapt-window-to-group): Do not crop transient window to group
2098 * clfswm.lisp (handle-configure-request): Adapt just the window to
2099 its group and don't take care of the configure request. Remove the
2100 bug with the Gimp outside the group and speed up the window
2102 (handle-exposure): Remove show-all-group on exposure event
2105 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
2107 * clfswm-util.lisp (circulate-group-up-copy-window)
2108 (circulate-group-down-copy-window)
2109 (circulate-workspace-up-copy-group)
2110 (circulate-workspace-down-copy-group): Prevent the copy of the
2111 same window in the same workspace.
2113 * bindings-second-mode.lisp (release-copy-selected-window)
2114 (release-copy-selected-group): Prevent the copy of the same window
2115 in the same workspace.
2117 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
2118 (generic-pager-move-window-on-next-line): Remove the copy
2120 (generic-pager-move-group-on-next-workspace)
2121 (generic-pager-move-group-on-previous-workspace): Prevent the copy
2122 of the same window in the same workspace.
2124 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
2125 (mouse-pager-copy-selected-group-release): Prevent the copy of the
2126 same window in the same workspace.
2128 * tools.lisp (setf/=): new macro to set a variable only when
2131 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
2132 x, y... only when necessary.
2134 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
2136 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
2137 new function and hook: force windows to stay in its group (solve a
2140 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
2142 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
2143 less flickering when moving/resizing groups.
2145 * clfswm-internal.lisp (hide-group): new function.
2146 (show-all-group): clear-all: new parameter.
2148 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
2150 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
2152 * clfswm*: Color change for the pager. Typo or better description
2153 in bindings definitions. Define bindings for a qwerty keyboard by
2154 default. dot-clfswmrc show examples to switch to an azerty
2156 License change to GPL v3.
2157 * config.lisp: new file - group all globals variables in this
2160 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
2162 * xlib-util.lisp (hide-window): Remove structure-notivy events
2163 when hidding a window.
2165 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
2167 * package.lisp (*sm-property-notify-hook*): Readded
2168 property-notify-hook in second mode.
2170 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
2172 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
2174 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
2176 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
2177 Tile the current workspace with the current window on one side and
2178 others on the other (this emulate the larswm, dwm, wmii way). See
2179 the default configuration file to enable this mode by default.
2181 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
2184 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
2186 * clfswm-pager.lisp (pager-draw-window-in-group): Add
2187 ensure-printable to print windows name even with non-ascii
2190 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
2192 * clfswm-pager.lisp (pager-explode-current-group): Create a new
2193 group for each window in group.
2194 (pager-implode-current-group): Move all windows in workspace to
2195 one group and remove other groups.
2197 * clfswm-pack.lisp (explode-group): Create a new group for each
2199 (implode-group): Move all windows in workspace to one group and
2200 remove other groups.
2202 * clfswm-util.lisp (identify-key): Remove local configuration
2203 variables and made them available for configuration from
2205 (query-string): idem.
2207 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
2209 * netwm-util.lisp: Start of NetWM compliance.
2210 Add a Netwm client list gestion.
2212 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
2214 * clfswm-internal.lisp (create-group-on-request): open a new group
2215 only when the current group is not empty.
2217 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
2218 bug with null workspace.
2220 * clfswm-pager.lisp (pager-handle-event): Add a hook
2221 system. This hooks can be changed in the user configuration file.
2223 * package.lisp: All colors and font variables are set in
2224 package.lisp and can be configured in the user configuration
2226 Note: If you have configured some less ugly colors (esp. for the
2227 pager) don't hesitate to let me know :)
2229 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
2230 system. This hooks can be changed in the user configuration file.
2232 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
2233 changed in the user configuration file (~/.clfswmrc)
2235 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
2237 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
2238 arrow action, open next window in new workspace/group.
2240 * bindings.lisp (stop-all-pending-actions): new binding.
2241 (open-next-window-in-new-group-once): Open the next windows in a
2242 new group (only once) or open all new windows in a new group (like
2243 others windows managers).
2245 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
2247 * clfswm.lisp (read-conf-file): New function to read a lisp
2248 configuration file at startup.
2249 (focus-group-under-mouse): Check if group isn't the current group
2250 ( prevent a bug with unclutter ).
2252 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
2254 * bindings.lisp (run-program-from-query-string): A program can be
2255 launch from a input query window.
2257 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
2259 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
2261 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
2263 * clfswm.lisp (process-new-window): One can now open the next
2264 window in a workspace called by its number.
2266 * clfswm-util.lisp (query-font-string): Minimal editing
2268 (eval-from-string): And an REPL in the window manager... :)
2270 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2272 * clfswm.lisp (process-new-window): One can now open the next
2273 window in a new workspace or a new group.
2275 * clfswm-pager.lisp (pager-mode): Display the next arrow action
2276 with the hidden windows.
2278 * clfswm.lisp (second-key-mode): Display the current workspace
2279 number and the next arrow action in the state window.
2281 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
2282 the pager mode and then redisplay only the current workspace.
2284 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
2286 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
2287 they can be focused with a keypress, sorted or renumbered.
2289 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2291 * clfswm-pager.lisp (pager-mode): Remove multiple silly
2292 pager-draw-display. This prevent a lot of flickering in the
2295 * clfswm.lisp: Remove all display-force-output and replace them
2296 with only one display-finish-output in the event loop.
2298 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
2300 * clfswm-pager.lisp (pager-center-group): New function - center a
2301 group at the middle of the screen.
2303 * clfswm-pack.lisp (center-group): New function - center a group
2304 at the middle of the screen.
2306 * clfswm.lisp (show-group): Add a cross line under the group.
2307 (show-group): Group are showned even if fullscreened.
2308 (init-display): Add an exposure event on the root window.
2310 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
2312 * package.lisp (*default-group*): Default group is the same size
2313 of a fullscreened group.
2315 * bindings*: Use shift to move, control+shift to copy.
2317 * *.lisp: Add comments for configuration or alternatives. So grep
2318 for CONFIG to see where you can configure clfswm. And grep for
2319 Alternative to use some commented code.
2321 * clfswm.lisp (second-key-mode): Use a single window to show the
2322 second mode. See for alternatives at the end of this file.
2324 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
2326 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
2327 macro of key and mouse definitions.
2328 (define-define-key/mouse): Use state instead of modifiers list
2329 this fix a bug when the modifiers list is not in the rigth order.
2331 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
2333 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
2335 * clfswm-info.lisp (info-mode): Add an info mode.
2337 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
2339 * clfswm.lisp (process-new-window): Change border size for
2341 (show-all-windows-in-workspace): Unhide all windows even when the
2342 current group is in fullscreen mode.
2344 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
2346 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
2347 redisplay the identify window after a terminal switch.
2349 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
2350 redisplay the pager after a terminal switch.
2352 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
2354 * clfswm-util.lisp (identify-key): Add a window to display
2355 the keys to identify on screen.
2357 * bindings.lisp, bindings-pager.lisp: Define same keys to
2358 move/copy groups/windows in second mode and in pager.
2360 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
2362 (show-all-windows-in-workspace): unhide window before adapting it
2365 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
2367 * clfswm.lisp (handle-event): Revert to an older version.
2369 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
2371 * clfswm-util.lisp (force-window-in-group)
2372 (force-window-center-in-group): New functions for transient windows.
2374 * clfswm-pager.lisp (pager-remove-current-workspace/group):
2375 bugfix: hide all windows before removing group or workspace.
2377 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
2379 * bindings-pager.lisp (mouse-pager-move-selected-group)
2380 (mouse-pager-copy-selected-group)
2381 (mouse-pager-move-selected-window)
2382 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
2383 (mouse-pager-rotate-window-down): New functions to have mouse in
2386 * clfswm-pager.lisp (pager-swap-window)
2387 (pager-copy-group-on-next/previous-workspace)
2388 (pager-copy-window-on-next/previous-line): New functions
2390 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
2392 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
2393 (pager-move-group-on-next/previous-workspace): new functions.
2395 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
2396 to its half size (new functions).
2398 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
2400 * clfswm-pager.lisp: workspaces, groups and windows can now be
2401 selectionned with the keyboard or the mouse.
2403 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
2405 * clfswm-pager.lisp (pager-select-workspace-right/left):
2406 workspaces can now be selectionned with the keyboard.
2408 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
2410 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
2411 new function to remove a previous defined key or mouse combination.
2413 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
2415 * clfswm.lisp (main): Check for access error in init-display.
2417 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
2418 keycode before grabbing.
2420 * bindings.lisp: Remove nlambda and use defun to keep the function
2421 documentation with clisp.
2422 (define-shell): new macro to define shell command for the second
2425 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
2427 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
2430 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
2432 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
2433 workspace circulation.
2435 * clfswm-util.lisp (absorb-orphan-window): new function.
2437 * clfswm-keys.lisp: Keysyms support.
2439 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
2441 * clfswm.lisp (show-group): Use one gc for all groups and not one
2444 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
2446 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
2448 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
2449 width and height outside group.
2451 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
2453 * clfswm.lisp: First public release.