1 2012-10-03 Philippe Brochard <pbrochard@common-lisp.net>
3 * src/clfswm.lisp (main-loop): Reset X error count only once for
6 2012-10-02 Philippe Brochard <pbrochard@common-lisp.net>
8 * src/xlib-util.lisp (handle-event): Ignore synchronous xlib
9 window-error and drawable-error in event handler.
11 * contrib/clfswm: Dump different image from different installation
14 2012-09-30 Philippe Brochard <pbrochard@common-lisp.net>
16 * src/clfswm.lisp (configure-request handler): Send a
17 configuration notify event in a more precise way.
19 2012-09-29 Philippe Brochard <pbrochard@common-lisp.net>
21 * src/xlib-util.lisp (with-xlib-protect): Limit X errors ignored
22 to prevent freezes and add a backtrace system.
24 2012-09-23 Philippe Brochard <pbrochard@common-lisp.net>
26 * src/clfswm.lisp (configure-request handler): To be ICCCM
27 compliant, send a fake configuration notify event only when the
28 window has moved and not when it has been resized.
30 2012-09-21 Philippe Brochard <pbrochard@common-lisp.net>
34 2012-09-09 Philippe Brochard <pbrochard@common-lisp.net>
36 * src/clfswm-internal.lisp
37 (delete-child-and-children-in-all-frames): Remove all children in
38 frames and only close windows.
40 * src/*.lisp: Remove uneeded with-xlib-protect.
42 2012-09-06 Philippe Brochard <pbrochard@common-lisp.net>
44 * contrib/wallpaper.lisp (wallpaper): create/use-background
45 simplification function.
47 2012-09-05 Philippe Brochard <pbrochard@common-lisp.net>
49 * contrib/wallpaper.lisp: New functionality to handle backgrounds
50 on differents screen heads.
52 * contrib/toolbar.lisp (toolbar-adjust-root-size): Takes care of
53 multiple toolbar on the same root edge.
55 2012-09-04 Philippe Brochard <pbrochard@common-lisp.net>
57 * src/clfswm-internal.lisp (show-all-children): Hide only children
58 hidden by normal windows or frames (but not :dialog,
60 (process-new-window): Remove borders for maxsize windows.
61 (show-all-children): Let the choice to always display children or
62 to optimize by hidding children not seen . The first option is
63 better with transparency support (frames behind orther frames are
64 seen). The second one is faster with many children in the same
65 frame (not seen children are not displayed).
67 2012-08-31 Philippe Brochard <pbrochard@common-lisp.net>
69 * src/xlib-util.lisp (with-xlib-protect): Handle all Xlib errors
70 for better code protection.
72 2012-08-28 Philippe Brochard <pbrochard@common-lisp.net>
74 * src/clfswm-expose-mode.lisp (expose-query-key-press-hook): Add
75 an option to immediately select child if they can be directly
78 2012-08-25 Philippe Brochard <pbrochard@common-lisp.net>
80 * contrib/volume-mode.lisp: Add mouse buttons actions in volume
81 mode. Add a volume button toolbar module.
83 2012-08-24 Philippe Brochard <pbrochard@common-lisp.net>
85 * contrib/mpd.lisp: New toolbar modules (available only if
86 toolbar.lisp is loaded).
87 Add a small parameter for toolbar modules useful with vertical
90 2012-08-21 Philippe Brochard <pbrochard@common-lisp.net>
92 * contrib/reboot-halt.lisp: Add configuration command for system
95 * contrib/toolbar.lisp (toggle-toolbar-hide-state): New function.
97 2012-08-20 Philippe Brochard <pbrochard@common-lisp.net>
99 * src/clfswm-internal.lisp (add-in-never-managed-window-list): New
102 2012-08-20 Philipp Kroos <philipp.kroos@t-online.de>
104 * src/clfswm-placement.lisp (here-placement): Evaluates to current
107 2012-08-20 Philipp Kroos <philipp.kroos@t-online.de>
109 * contrib/toolbar.lisp: Add an expose-mode-button-module.
111 2012-08-19 Philippe Brochard <pbrochard@common-lisp.net>
113 * contrib/toolbar.lisp (remove-toolbar): New function.
115 2012-08-18 Philippe Brochard <pbrochard@common-lisp.net>
117 * contrib/toolbar.lisp: Add configurable colors in toolbar
120 2012-08-16 Philippe Brochard <pbrochard@common-lisp.net>
122 * src/tools.lisp: Factorize system usage information collection.
123 (start-system-poll): Use a lock file instead of a local variable.
125 * contrib/toolbar.lisp: Add memory, cpu and battery usage module
126 with a poll methode. More responsive but up to date every 10s by
129 2012-08-15 Philippe Brochard <pbrochard@common-lisp.net>
131 * contrib/toolbar.lisp: Add a clickable label module for toolbar.
132 Add a clickable entry to open the CLFSWM main menu.
133 Add memory, cpu and battery usage module.
135 * src/clfswm-menu.lisp (open-menu): Prevent to reopen an opened
136 menu. Fixe a but with negative selected-item.
138 2012-08-14 Philippe Brochard <pbrochard@common-lisp.net>
140 * src/clfswm-util.lisp (eval-from-query-string): Show a notify
141 window when updating symobls list for REPL completion.
142 (show-current-root): New function and configuration menu to
143 display a message on the current root.
145 * contrib/toolbar.lisp: Add arguments in toolbar modules.
147 * src/xlib-util.lisp (event-hook-name): Intern hook name symbol
150 2012-08-13 Philippe Brochard <pbrochard@common-lisp.net>
152 * contrib/toolbar.lisp (toolbar-module-text): Print a formatted
153 text at module position centered in toolbar.
155 * src/xlib-util.lisp (optimize-event-hook): Remove unused event
158 2012-08-12 Philippe Brochard <pbrochard@common-lisp.net>
160 * contrib/toolbar.lisp: End of toolbar framework.
161 (list-toolbar-modules): Add a list toolbar modules function.
163 2012-08-03 Philippe Brochard <pbrochard@common-lisp.net>
165 * src/clfswm-internal.lisp (show-child): Show unmanaged windows
166 on (maybe) current child in all roots.
168 * src/clfswm-util.lisp (find-child-under-mouse-in-child-tree):
169 Handle children from all roots instead of from *root-frame*.
171 2012-07-23 Philippe Brochard <pbrochard@common-lisp.net>
173 * src/clfswm-expose-mode.lisp: New expose mode based on standard
176 2012-06-27 Philippe Brochard <pbrochard@common-lisp.net>
178 * src/clfswm-util.lisp (eval-from-query-string): Add completion
179 for eval for query string.
181 2012-06-26 Philippe Brochard <pbrochard@common-lisp.net>
183 * src/clfswm-query.lisp: Add completion for shell commands.
185 2012-06-18 Philippe Brochard <pbrochard@common-lisp.net>
187 * src/clfswm-placement.lisp: Each child can have its own border
188 size. New binding to change the child border size on the fly.
190 2012-06-08 Philippe Brochard <pbrochard@common-lisp.net>
192 * src/tools.lisp (process-timers): Call get-internal-real-time
193 only once for all times.
195 2012-06-07 Philippe Brochard <pbrochard@common-lisp.net>
197 * contrib/toolbar.lisp (define-toolbar-hooks): Add auto-hide
199 (define-toolbar-hooks): Add auto-hide toolbar (show/hide on mouse
202 2012-06-06 Philippe Brochard <pbrochard@common-lisp.net>
204 * src/xlib-util.lisp (handle-event): Add an additional hook event
205 system to handle events in contrib code.
207 2012-06-03 Philippe Brochard <pbrochard@common-lisp.net>
209 * src/clfswm-placement.lisp: Add an optional border size in all
212 2012-05-30 Philippe Brochard <pbrochard@common-lisp.net>
214 * contrib/toolbar.lisp (clock): Add a clock module.
216 2012-05-28 Philippe Brochard <pbrochard@common-lisp.net>
218 * contrib/toolbar.lisp: begining of toolbar support.
220 2012-05-24 Philippe Brochard <pbrochard@common-lisp.net>
222 * src/clfswm-internal.lisp (rotate-root-geometry): Do not use
223 rotatef but a simpler algorithm.
225 2012-05-19 Philippe Brochard <pbrochard@common-lisp.net>
227 * src/clfswm-placement.lisp: Adjust width and height in child and
228 root placement to prevent too big child size.
230 2012-05-18 Philippe Brochard <pbrochard@common-lisp.net>
232 * src/clfswm-placement.lisp: New root placement possibility.
234 * src/clfswm-util.lisp (change-current-root-geometry): New
237 2012-05-17 Philippe Brochard <pbrochard@common-lisp.net>
239 * src/clfswm-util.lisp (exchange-root-geometry-with-mouse): New
242 2012-05-16 Philippe Brochard <pbrochard@common-lisp.net>
244 * src/menu-def.lisp: New root menu.
246 2012-05-15 Philippe Brochard <pbrochard@common-lisp.net>
248 * src/clfswm-circulate-mode.lisp (rotate-root-geometry-next)
249 (rotate-root-geometry-previous): New second mode binding to change
252 2012-05-13 Philippe Brochard <pbrochard@common-lisp.net>
254 * src/clfswm-internal.lisp: Remove the *current-child* variable
255 and use a setfable function (current-child) instead.
256 (current-child-setter): Store root current child before apllying
257 current child change.
259 2012-05-09 Philippe Brochard <pbrochard@common-lisp.net>
261 * src/clfswm-internal.lisp: Use xdpyinfo/xinerama informations
262 instead of xrandr informations.
264 2012-05-06 Philippe Brochard <pbrochard@common-lisp.net>
266 * src/clfswm-internal.lisp : Use only one list for root
268 (*root*): Root management API simplification.
270 2012-04-30 Philippe Brochard <pbrochard@common-lisp.net>
272 * src/clfswm-internal.lisp: Big change to replace *current-root*
273 variable to support multiple root.
275 2012-04-18 Philippe Brochard <pbrochard@common-lisp.net>
277 * src/tools.lisp (add-new-hook, add-hook): New macro. Do not
278 duplicate hooks by default. Use add-new-hook if you want to
281 2012-04-16 Philippe Brochard <pbrochard@common-lisp.net>
283 * src/clfswm-corner.lisp (wait-window-in-query-tree): Add a limit
284 of try to wait the command window.
286 2012-02-25 Philippe Brochard <pbrochard@common-lisp.net>
288 * src/clfswm-util.lisp (place-frames-from-xrandr)
289 (swap-frame-geometry, rotate-frame-geometry): New helper functions
290 for multiple physical screen.
291 (jump-to-slot, add-frame-in-parent-frame): Change *current-root*
294 2012-01-18 Philippe Brochard <pbrochard@common-lisp.net>
296 * src/*.lisp: Use create-symbol and create-symbol-in-package
297 instead of the shorter symb. (Thanks Aad Versteden).
299 * src/bindings-second-mode.lisp (set-default-second-keys): New
300 key binding to set window and frame transparency.
302 * src/bindings.lisp (set-default-main-mouse): New mouse binding to
303 set window and frame transparency.
305 * src/clfswm-keys.lisp (define-keys): New macro to ease multiple
306 keys definitions. (Thanks Valentin Plechinger for the request).
308 * src/*.lisp: Add full transparency support with xcompmgr.
310 2012-01-14 Philippe Brochard <pbrochard@common-lisp.net>
312 * src/*.lisp: Add transparency support.
314 2012-01-09 Ales Guzik <ales.guzik@gmail.com>
316 * src/clfswm-layout.lisp (tile-layout-mix): New layout to
317 automatically choose between vertival and horizontal tile layout.
318 (tile-space-layout): Fix to have space between screen border and
319 frame the same as between frames.
321 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
323 * load.lisp: Support clisp 2.49+ module system to load CLX.
325 2012-01-04 Ales Guzik <ales.guzik@gmail.com>
327 * src/clfswm-layout.lisp (update-layout-managed-children-keep-position):
328 Fix an inattention error.
330 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
332 * src/xlib-util.lisp (with-xlib-protect): Protect from
333 xlib:lookup-error. This prevent an error in clisp/new-clx when
334 sometimes an xlib:colormap is expected instead of an xlib:window.
336 2012-01-03 Philippe Brochard <pbrochard@common-lisp.net>
338 * src/xlib-util.lisp (handle-event): Fix a clisp/new-clx error
339 when sometimes window slot of event-slots is a pixmap instead of a
342 2011-12-26 Philippe Brochard <pbrochard@common-lisp.net>
344 * src/clfswm-query.lisp: Fill the history list with a non-nil
347 2011-12-25 Philippe Brochard <pbrochard@common-lisp.net>
349 * src/package.lisp (make-x-drawable): Drawable wrapper to prevent
350 type error in some CLX versions.
351 Replace xlib:drawable-* functions with x-drawable-* equivalents
353 2011-12-14 Philippe Brochard <pbrochard@common-lisp.net>
355 * src/clfswm-util.lisp (um-create-xdg-section-list): Add at least
356 the 'Utility menu entry.
358 * src/config.lisp (*xdg-section-list*): moved to config.lisp.
360 * src/clfswm-util.lisp (update-menus): Set a default value for
361 searching .desktop files when XDG_DATA_DIRS is not set.
363 2011-10-15 Philippe Brochard <pbrochard@common-lisp.net>
365 * src/clfswm-internal.lisp (place-window-from-hints): Use
366 with-placement macro to place unmanaged windows in an arbitrary
369 2011-06-16 Philippe Brochard <pbrochard@common-lisp.net>
371 * src/clfswm-internal.lisp (clean-windows-in-all-frames): Prevent
372 current root and current child being equal to child.
374 2011-06-13 Philippe Brochard <pbrochard@common-lisp.net>
376 * src/keysyms.lisp: Repeat Page_Down/Up keysym definitions at the
377 end of the file to change keysyms priority.
379 2011-06-13 Sylvain HENRY <hsyl20@gmail.com>
381 * *.*: Minor spelling fix.
383 2011-06-12 Philippe Brochard <pbrochard@common-lisp.net>
385 * src/clfswm.lisp (:unmap-notify, :destroy-notify): Show all
386 children just after the xlib tree cleanup -> reduce the
387 flickering when a window is deleted or destroyed.
389 * src/clfswm-internal.lisp (process-existing-windows): Do not
390 process the notify window.
392 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
394 * *: **** Release 1106 ****
396 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
398 * src/clfswm-internal.lisp (clean-windows-in-all-frames): New
399 function to prevent xlib error when a window is deleted.
401 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
403 * src/clfswm-internal.lisp
404 (delete-child-and-children-in-all-frames): Delete or destroy
405 children before displaying all children.
407 2011-06-05 Philippe Brochard <pbrochard@common-lisp.net>
409 * src/clfswm-util.lisp (add-frame-in-parent-frame): New function
412 2011-06-04 Philippe Brochard <pbrochard@common-lisp.net>
414 * src/clfswm.lisp (main-unprotected): Destroy all frames windows
415 before closing the display (not really needed).
417 2011-06-02 Philippe Brochard <pbrochard@common-lisp.net>
419 * src/clfswm-layout.lisp (inc-tile-layout-size)
420 (dec-tile-layout-size, inc-slow-tile-layout-size)
421 (dec-slow-tile-layout-size): New functions and bindings.
423 2011-06-01 Philippe Brochard <pbrochard@common-lisp.net>
425 * src/clfswm-expose-mode.lisp (define-expose-letter-keys): Add
426 0..1 and A..Z keys to select a child in exposé mode.
428 * src/clfswm-internal.lisp (display-frame-info): Remove hidden
429 infos in frames windows.
431 * src/clfswm-util.lisp (ask-close/kill-current-window): Menu
434 2011-05-30 Philippe Brochard <pbrochard@common-lisp.net>
436 * src/clfswm-internal.lisp (get-parent-layout): Minor fullscreen
439 2011-05-29 Philippe Brochard <pbrochard@common-lisp.net>
441 * src/clfswm-internal.lisp
442 (delete-child-and-children-in-all-frames): Show all children
443 before deleting/destroying a windows, so prevent a flickering.
444 (get-parent-layout): Return the fullscreen size when the current
447 2011-05-28 Philippe Brochard <pbrochard@common-lisp.net>
449 * src/clfswm-internal.lisp (get-parent-layout): Handle correctly
452 * src/clfswm-util.lisp (delete-focus-window-generic): Do not hide
453 child before removing, so prevent a flickering.
455 * src/clfswm-internal.lisp (show-all-children): Rectangular
456 optimization to display only needed children.
457 (show-all-children): Remove flickering on
458 select-next/previous-brother.
460 2011-05-17 Philippe Brochard <pbrochard@common-lisp.net>
462 * src/clfswm-util.lisp (copy-focus-window, cut-focus-window): New
463 functions and ask-close/kill-current-window menu and bindings
466 2011-05-16 Philippe Brochard <pbrochard@common-lisp.net>
468 * src/clfswm-util.lisp (ask-close/kill-current-window): Add an
469 *ask-close/kill-placement* placement window variable.
471 2011-05-09 Philippe Brochard <pbrochard@common-lisp.net>
473 * contrib/osd.lisp (funcall-button-from-code): Display osd
474 documention for buttons and fix some redefining warnings.
476 2011-05-07 Philippe Brochard <pbrochard@common-lisp.net>
478 * src/clfswm-nw-hooks.lisp (make-permanent-nw-hook-frame): New
479 function. Prevent to add or delete a new window hook for this
482 * src/clfswm-layout.lisp (update-layout-managed-children-position):
485 2011-05-06 Philippe Brochard <pbrochard@common-lisp.net>
487 * src/bindings-second-mode.lisp (set-default-second-keys):
488 select-brother-spatial-move-* binding update.
490 * src/clfswm-layout.lisp (tile-left|right|top|bottom-layout): Ask
491 to keep children positions or not.
493 * src/clfswm-internal.lisp (fixe-real-size): Takes care of border
496 * src/clfswm-layout.lisp (update-layout-managed-children): Fix a
497 bug by using the parent frame instead of the current child.
499 * src/clfswm-circulate-mode.lisp
500 (select-brother-generic-spatial-move+right/left/up/down): New
501 function to select a brother from another in a spatial move.
503 2011-04-19 Philippe Brochard <pbrochard@common-lisp.net>
505 * src/clfswm-pack.lisp (move-frame-constrained)
506 (resize-frame-constrained): Use pixels instead of floating
509 2011-04-18 Philippe Brochard <pbrochard@common-lisp.net>
511 * src/clfswm-pack.lisp (resize-frame-constrained): Takes care of
513 (implode-frame, implode-current-frame): New functions. Absorb all
514 frames subchildren in frame. Explode frame opposite.
516 2011-04-17 Philippe Brochard <pbrochard@common-lisp.net>
518 * src/clfswm-pack.lisp (move-frame-constrained)
519 (resize-frame-constrained): New function. Move and resize frame
520 with the mouse constrained by other frame brothers.
522 2011-04-14 Philippe Brochard <pbrochard@common-lisp.net>
524 * src/clfswm-util.lisp (with-movement-select-next-brother)
525 (with-movement-select-previous-brother)
526 (with-movement-select-next-child): Use a simple method (do not
527 enter in the circulate mode) to allow to circulate in all children
530 * src/clfswm-menu.lisp (open-menu): Save info hash table keys
531 instead of deleting newly created keys.
533 2011-03-21 Philippe Brochard <pbrochard@common-lisp.net>
535 * src/clfswm-internal.lisp (x-px->fl, y-px->fl): Takes care of
538 2011-03-20 Philippe Brochard <pbrochard@common-lisp.net>
540 * src/clfswm-info.lisp (show-config-variable): call
541 produce-conf-var-doc.
543 2011-03-18 Philippe Brochard <pbrochard@common-lisp.net>
545 * src/clfswm-autodoc.lisp (produce-conf-var-doc-html): Produce a
546 documentation for all configurable variables in CLFSWM -
549 * src/clfswm-internal.lisp (leave-frame): Hide all children except
552 2011-03-16 Philippe Brochard <pbrochard@common-lisp.net>
554 * src/clfswm-autodoc.lisp (produce-all-docs): Produce a
555 documentation for all configurable variables in CLFSWM.
557 * src/clfswm-layout.lisp (set-gimp-layout): Display a notify
558 window with the help on the GIMP layout.
560 2011-03-12 Philippe Brochard <pbrochard@common-lisp.net>
562 * src/menu-def.lisp: Menu update to prevent cursor keys clash.
564 * clfswm.asd: Change compilation order to prevent undefined
567 * src/clfswm-internal.lisp (show-child(frame)): Handle properly
568 the show-root-frame-p parameter.
570 2011-03-11 Philippe Brochard <pbrochard@common-lisp.net>
572 * src/clfswm-util.lisp (move-frame, resize-frame): Do not move or
573 resize a frame when it's the current root.
575 2011-03-10 Philippe Brochard <pbrochard@common-lisp.net>
577 * src/clfswm-internal.lisp (show-all-children): Handle properly
578 duplicated child in multipe frames.
580 2011-03-09 Philippe Brochard <pbrochard@common-lisp.net>
582 * contrib/volume-mode.lisp (set-default-volume-keys): Add more
583 keybindings (up/down, right/left) to raise/lower the volume.
585 * src/clfswm-layout.lisp: Add a variable border size for frames
588 2011-03-08 Philippe Brochard <pbrochard@common-lisp.net>
590 * src/clfswm-util.lisp (cut-current-child, remove-current-child)
591 (delete-current-child): Hide the current child before doing the
594 * src/clfswm-internal.lisp (show-all-children): Hide windows not
595 in the current root before displaying those in current root.
596 Remove all hide-all unnecessary calls.
598 * src/clfswm-configuration.lisp (save-variables-in-conf-file):
599 Save only variables with a different value than their original
602 2011-03-07 Philippe Brochard <pbrochard@common-lisp.net>
604 * src/clfswm-info.lisp (show-config-variable): Use the new
607 * src/clfswm-autodoc.lisp (produce-configuration-variables): Use
608 the new defconfig method.
610 * src/clfswm-configuration.lisp (create-configuration-menu):
611 Change the config system with a more lispy one and a less string
612 based one: (defconfig name value group doc).
615 2011-03-06 Philippe Brochard <pbrochard@common-lisp.net>
617 * src/clfswm-internal.lisp (show-all-children): Simplify the
619 (show-child): Display an unmanaged window whe it's the current
621 (show-all-children): add the ability to display all child from
622 *root-frame* and hide all those who are not in *current-root*.
623 -> remove hide-all-children when needed.
625 * src/xlib-util.lisp (move-window,resize-window): Add a
626 *color-move-window* border when moving or resizing a window.
628 2011-03-04 Philippe Brochard <pbrochard@common-lisp.net>
630 * src/clfswm-internal.lisp (show-all-children): Perform only one
631 recusion on the clfswm tree: calculate geometry and place child in
634 2011-03-03 Philippe Brochard <pbrochard@common-lisp.net>
636 * src/clfswm-internal.lisp (show-all-children): Rethink of display
637 child order to prevent very annoying flickering.
639 2011-02-27 Philippe Brochard <pbrochard@common-lisp.net>
641 * src/clfswm-util.lisp (query-yes-or-no): New function.
643 * src/clfswm-configuration.lisp (reset-all-config-variables): New
644 function and menu entry.
645 (query-conf-value): Add the ability to leave the field blank to
646 reset the variable to its default value.
648 2011-02-26 Philippe Brochard <pbrochard@common-lisp.net>
650 * src/clfswm-configuration.lisp
651 (add-all-configuration-default-value): Add a default value to
652 configurable variables.
654 2011-02-23 Philippe Brochard <pbrochard@common-lisp.net>
656 * src/clfswm.lisp (main-unprotected): Create the configuration
657 menu only once at startup.
659 2011-02-22 Desmond O. Chang <dochang@gmail.com>
661 * contrib/amixer.lisp: Add a volume mode inspired by the emms
662 volume package. Alsa mixer interface.
664 * contrib/volume-mode.lisp: Add a volume mode inspired by the emms
667 2011-02-22 Desmond O. Chang <dochang@gmail.com>
669 * src/clfswm.lisp (main): Use ASDF:SYSTEM-SOURCE-DIRECTORY instead
670 of *LOAD-TRUENAME*. *LOAD-TRUENAME* is only bound during a call to
671 LOAD. If one eval CLFSWM:MAIN in repl, BASE-DIR will be an empty
672 string. Use ASDF:SYSTEM-SOURCE-DIRECTORY to fix it.
674 2011-02-16 Philippe Brochard <pbrochard@common-lisp.net>
676 * src/clfswm.lisp (main-unprotected): Add a close hook. And close
677 the notify window, the virtual keyboard and the clfswm terminal by
680 2011-02-15 Philippe Brochard <pbrochard@common-lisp.net>
682 * src/clfswm.lisp (main-unprotected): Destroy the notify window
683 before closing the display. This fix a bug when resetting/reloading
686 2011-02-12 Philippe Brochard <pbrochard@common-lisp.net>
688 * src/xlib-util.lisp (equal-wm-class-fun, equal-wm-name-fun)
689 (raise-window-fun, raise-and-focus-window-fun): New functions.
691 * src/config.lisp (*clfswm-terminal-cmd*): Switch from xterm to
693 (*never-managed-window-list*): Structure change to be more
694 flexible. Let the choice to focus, raise and do nothing on never
697 2011-02-09 Philippe Brochard <pbrochard@common-lisp.net>
699 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Take
700 care of never managed windows to move or resize them if the raise
703 * src/clfswm-internal.lisp (in-frame, in-window, in-child): New
706 2011-02-08 Philippe Brochard <pbrochard@common-lisp.net>
708 * src/clfswm.lisp (main-mode): Raise or not unmanaged windows
709 following request in *never-managed-window-list*.
711 2011-02-05 Philippe Brochard <pbrochard@common-lisp.net>
713 * *: **** Release 1102 ****
715 2011-02-05 Desmond O. Chang <dochang@gmail.com>
717 * src/keysyms.lisp: Add extended keysyms from stumpwm.
719 2011-02-01 Desmond O. Chang <dochang@gmail.com>
721 * src/clfswm-util.lisp (run-or-raise): New function (thanks to
724 * src/clfswm-internal.lisp (with-all-*): add a nil block.
726 2011-01-28 Desmond O. Chang <dochang@gmail.com>
728 * src/clfswm-util.lisp (xdg-config-home): XDG_CONFIG_HOME should
729 be $HOME/.config by default.
731 2010-12-29 Philippe Brochard <pbrochard@common-lisp.net>
733 * contrib/osd.lisp (display-doc): Add another method where a
734 CLFSWM native window is used to display the key documentation.
736 2010-12-27 Philippe Brochard <pbrochard@common-lisp.net>
738 * src/xlib-util.lisp (with-xlib-protect): Force to revert to the
741 2010-12-25 Philippe Brochard <pbrochard@common-lisp.net>
743 * src/clfswm-second-mode.lisp (second-key-mode): Call the second
744 mode leave function only when the generic mode was ended.
746 2010-12-08 Philippe Brochard <pbrochard@common-lisp.net>
748 * src/clfswm-second-mode.lisp (sm-leave-function): Do not use
749 *second-mode-program* anymore.
751 2010-12-07 Philippe Brochard <pbrochard@common-lisp.net>
753 * src/clfswm-second-mode.lisp (*second-mode-leave-function*): New
754 variable bound to a function executed (when not null) on second
757 2010-11-14 Philippe Brochard <pbrochard@common-lisp.net>
759 * src/clfswm-util.lisp (find-child-under-mouse): Do not find
762 2010-11-13 Philippe Brochard <pbrochard@common-lisp.net>
764 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
765 Do not display the accel window for unmanaged windows.
767 2010-11-11 Philippe Brochard <pbrochard@common-lisp.net>
769 * src/clfswm-internal.lisp (set-current-root): Handle
770 window-parent in set-current-root.
772 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
773 focus the parent child when the current root is a window.
775 2010-11-09 Philippe Brochard <pbrochard@common-lisp.net>
777 * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
778 New function an bindings.
780 * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
783 2010-11-07 Philippe Brochard <pbrochard@common-lisp.net>
785 * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
786 function to let the user choose to keep child position with
789 * src/clfswm-internal.lisp (remove-frame-data-slot): New
792 2010-11-05 Philippe Brochard <pbrochard@common-lisp.net>
794 * src/clfswm-internal.lisp (frame-select-next-child)
795 (frame-select-previous-child): New functions and bindings. Select
796 the next/previous child in the current frame.
798 2010-10-31 Philippe Brochard <pbrochard@common-lisp.net>
800 * src/clfswm-query.lisp (query-mode-complet): New function: Handle
801 completion in query-mode.
803 2010-10-30 Philippe Brochard <pbrochard@common-lisp.net>
805 * src/clfswm-query.lisp (query-print-string): Handle long lines
808 2010-10-27 Philippe Brochard <pbrochard@common-lisp.net>
810 * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
811 all characters are printable.
813 2010-10-25 Philippe Brochard <pbrochard@common-lisp.net>
815 * contrib/server/server.lisp: Load clfswm client code in the main
816 program and let the user start it with a --client command line
819 * src/package.lisp (*main-entrance-hook*): New hook executed after
820 loading configuration file and before opening the display.
822 2010-10-23 Philippe Brochard <pbrochard@common-lisp.net>
824 * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
826 * src/clfswm-internal.lisp (show-child): Show window only if not
829 * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
830 change modifiers after binding definition.
832 2010-10-21 Philippe Brochard <pbrochard@common-lisp.net>
834 * contrib/osd.lisp: New file: OSD (On Screen Display) for
837 * src/clfswm-menu.lisp (open-menu): Modularise function.
839 2010-10-13 Philippe Brochard <pbrochard@common-lisp.net>
841 * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
842 key binding in main and second mode.
844 2010-10-10 Philippe Brochard <pbrochard@common-lisp.net>
846 * src/clfswm-util.lisp (open-notify-window): Convert hello-window
847 functions to a more generic Notify-window system.
849 * src/tools.lisp (add-timer): Add an id to identify the timer.
851 2010-10-09 Philippe Brochard <pbrochard@common-lisp.net>
853 * src/tools.lisp (erase-timer): New function.
855 * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
856 the hello window. Add Configuration variables.
858 2010-10-08 Philippe Brochard <pbrochard@common-lisp.net>
860 * src/clfswm-util.lisp (): Add an Hello window at startup.
862 * src/tools.lisp (process-timers): Add a timer system.
864 2010-10-07 Philippe Brochard <pbrochard@common-lisp.net>
866 * src/clfswm-query.lisp (add-in-query-string): Handle correctly
869 2010-10-06 Philippe Brochard <pbrochard@common-lisp.net>
871 * src/clfswm-query.lisp (query-print-string): Change cursor color
872 and show parenthesis matching with colors (on match and on
875 2010-10-05 Philippe Brochard <pbrochard@common-lisp.net>
877 * src/clfswm-internal.lisp (show-all-children): Do not raise a
878 child when its parent is hidden.
880 2010-10-02 Philippe Brochard <pbrochard@common-lisp.net>
882 * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
883 possibility to circulate over subchild of the current child.
885 * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
886 (expose-windows-generic): Add an escape-body function to return to
887 the original state on escape key.
889 * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
890 to bind the current child from the configuration file.
892 2010-10-01 Philippe Brochard <pbrochard@common-lisp.net>
894 * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
895 window hook: the frame absorb all new windows that match
896 nw-absorb-test frame data slot.
898 2010-09-30 Philippe Brochard <pbrochard@common-lisp.net>
900 * src/clfswm-expose-mode.lisp (expose-create-window): Show window
901 title in accel window.
903 2010-09-29 Philippe Brochard <pbrochard@common-lisp.net>
905 * configure: Use the Xavier Maillard clfswm script in contrib to
906 build an executable in the standard way.
908 2010-09-26 Philippe Brochard <pbrochard@common-lisp.net>
910 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
911 New functions. Add a window on each child in the expose mode to
914 * src/clfswm-internal.lisp (child-x, child-y, child-width)
915 (child-height): New methods to get real child coordinates.
917 2010-09-25 Philippe Brochard <pbrochard@common-lisp.net>
919 * src/clfswm-layout.lisp (*-layout): Use child-position.
921 * src/clfswm-internal.lisp (child-position): New function.
923 * src/clfswm-expose-mode.lisp (expose-windows-mode)
924 (expose-all-windows-mode): Use a generic mode.
926 * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
927 with handle-event-fun symbols instead of inspecting clfswm
928 internals symbols on each mode change.
930 * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
931 a separate clfswm-expose-mode.lisp file.
933 * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
934 screen size instead of hardcoded test coordinates.
936 2010-09-24 Philippe Brochard <pbrochard@common-lisp.net>
938 * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
939 (speed-mouse-right, speed-mouse-up, speed-mouse-down)
940 (speed-mouse-undo, speed-mouse-first-history): New functions to
941 quickly move the mouse. Implemented for the second mode.
943 2010-09-16 Philippe Brochard <pbrochard@common-lisp.net>
945 * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
946 write permission on $clfswm_asd_path. So anybody can start clfswm
947 even if there is no write permission on the source directory.
949 2010-09-12 Philippe Brochard <pbrochard@common-lisp.net>
951 * contrib/clfswm: Add support to cmucl, ccl and ecl.
953 2010-09-11 Philippe Brochard <pbrochard@common-lisp.net>
955 * src/clfswm-util.lisp (set-hide-unmanaged-window)
956 (set-show-unmanaged-window, set-default-hide-unmanaged-window):
957 New functions and menu entry.
958 (set-globally-hide-unmanaged-window)
959 (set-globally-show-unmanaged-window): New functions and menu
962 * src/clfswm-internal.lisp (hide-unmanager-window-p): New
964 (show-child): Add a data slot on frame to hide or not unmanaged
967 * src/clfswm-corner.lisp (present-clfswm-terminal)
968 (present-virtual-keyboard): Use a function (generic-present-body)
969 instead of a macro (generate-present-body).
971 * src/clfswm-util.lisp (update-menus): List all directories and
972 subdirectories in $XDG_DATA_DIRS/applications.
974 2010-09-10 Philippe Brochard <pbrochard@common-lisp.net>
976 * src/clfswm-corner.lisp (generate-present-body): New macro.
977 (present-clfswm-terminal, present-virtual-keyboard): Use
978 generate-present-body.
980 2010-09-09 Philippe Brochard <pbrochard@common-lisp.net>
982 * src/clfswm-util.lisp (update-menus): Follow XDG specifications
983 instead of the non-portable Debian update-menu.
985 2010-09-07 Philippe Brochard <pbrochard@common-lisp.net>
987 * src/clfswm.lisp (error-handler): New function do handle
988 asynchronous errors and ignore them.
989 (open-display): Install the new error-handler on display.
991 2010-09-05 Philippe Brochard <pbrochard@common-lisp.net>
993 * src/xlib-util.lisp (with-xlib-protect): Add a
994 with-simple-restart on top of body execution.
996 2010-09-04 Philippe Brochard <pbrochard@common-lisp.net>
998 * src/clfswm.lisp (main-loop): Protect all xlib functions with an
1001 * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
1002 handle-event. Add a with-simple-restart to prevent a
1003 clisp/new-lisp infinite loop.
1005 2010-08-30 Philippe Brochard <pbrochard@common-lisp.net>
1007 * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
1008 clfswm terminal working even on xterm title changes.
1010 2010-08-29 Philippe Brochard <pbrochard@common-lisp.net>
1012 * src/clfswm-util.lisp (run-other-window-manager): Update for
1013 clisp compatibility.
1015 * src/tools.lisp (do-execute): New parameter io to change the
1016 input/output method.
1018 * src/clfswm-util.lisp (hide-current-child): Prevent from removing
1021 * src/clfswm-internal.lisp (child-member): New predicate.
1022 (child-remove): New function.
1024 * src/*.lisp: Use child-member and child-remove everywhere it's
1027 2010-08-28 Philippe Brochard <pbrochard@common-lisp.net>
1029 * src/clfswm.lisp (main-loop): Ensure that all events have been
1030 processed after a process-event.
1032 * src/clfswm-internal.lisp (is-in-current-child-p): New function.
1034 2010-08-27 Philippe Brochard <pbrochard@common-lisp.net>
1036 * src/clfswm.lisp (main-mode:configure-request): Raise the window
1037 only when present on the current child and focus it accordingly.
1039 2010-08-26 Philippe Brochard <pbrochard@common-lisp.net>
1041 * src/clfswm-circulate-mode.lisp (circulate-loop-function):
1042 Use is-a-key-pressed-p.
1044 * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
1046 * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
1047 returned by xlib:keysym->keycodes.
1049 * src/*.lisp: Use the new child-equal-p to compare children. This
1050 prevent a bug with sbcl/cmucl when the standard equal function
1051 does not work with xlib:window.
1053 * src/clfswm-internal.lisp (child-equal-p): New predicate.
1055 2010-08-25 Philippe Brochard <pbrochard@common-lisp.net>
1057 * src/clfswm-generic-mode.lisp (generic-mode): Use an
1058 xlib:event-listen before processing event with
1059 xlib:process-event. This prevent a bug with CLX threaded
1060 implementation like sbcl.
1062 * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
1063 processing event with xlib:process-event. This prevent a bug with
1064 CLX threaded implementation like sbcl.
1066 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1068 * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
1070 * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
1073 * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
1074 (find-parent-frame, find-frame-window, find-frame-by-name)
1075 (find-frame-by-number): Use with-find-in-all-frames to search in
1076 frames in the right order.
1078 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
1079 unwanted flickering with unmanaged windows.
1081 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
1083 * src/package.lisp: Remove event handler hooks as they're not
1084 needed anymore (To replace them: use closure and define-handler).
1086 * src/xlib-util.lisp (move-window, resize-window)
1087 (wait-mouse-button-release): Use a generic mode.
1089 * src/*.lisp: Replace the case to handle event with a more (tricky)
1090 lispy method which bind a function to each keywords associated
1093 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
1095 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
1096 menu entry between delete-current-child and remove-current-child.
1097 ie: Delete a child and its children in all frames by default.
1099 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
1101 * src/package.lisp: Add a placement configuration group.
1103 * src/binding*.lisp: Bind control+g to escape the current action
1106 * src/clfswm-internal.lisp
1107 (delete-child-and-children-in-all-frames): New function and
1108 binding: Second mode - Control+Delete delete the current child and
1109 its children in all frames (ie: close the current child and its
1112 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
1114 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
1115 the frame window and the frame gc. Close a very annoying bug when
1116 cuting/pasting a frame or moving a child over frames with the
1119 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1120 all children in *current-root* after moving/resizing a frame.
1122 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
1124 * src/clfswm-util.lisp (delete-focus-window)
1125 (destroy-focus-window): Remove child in parent frame before
1128 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1130 * src/clfswm-util.lisp (identify-key): Add a timeout in
1132 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
1133 of the window passed by xlib:process-event.
1135 * src/xlib-util.lisp (move-window, resize-window)
1136 (wait-mouse-button-release): Add a timeout in xlib:process-event.
1138 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1140 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
1141 to launch an other window manager and to return to clfswm.
1143 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
1145 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
1148 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
1150 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
1153 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
1154 parameter and a loop timeout.
1156 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
1158 * src/clfswm.lisp (main): Add an alternate configuration filename
1161 * load.lisp: Add a debuging code example.
1163 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
1165 * src/clfswm-configuration.lisp (create-configuration-menu): New
1166 menu to configure all clfswm variables while clfswm is running.
1168 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
1170 * src/clfswm-util.lisp (save-configuration-variables): New
1171 function to save all configuration variables in clfswmrc.
1173 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
1175 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
1177 (set-default-info-keys): Add cursor key support in info mode.
1179 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
1181 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
1184 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
1185 prevent reading the configuration file (this may be useful to
1186 produce the original documentation without user modifications
1187 with the rc configuration file).
1189 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
1191 * src/bindings-second-mode.lisp (set-default-second-keys):
1192 Simplification of Escape key to close/kill/remove the focus window
1193 and unhide all windows.
1195 * src/bindings.lisp (set-default-main-keys): Simplification of
1196 Escape key to close/kill/remove the focus window and unhide all
1199 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
1200 focus and unhide all windows capabilities.
1202 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1204 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
1206 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
1208 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
1209 Keep child order and don't make unnecessary child movement.
1210 (one-column-layout, one-line-layout): New layouts.
1212 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
1214 * *: **** Release 0906 ****
1216 * contrib/cd-player.lisp: New file to handle the CD player.
1218 * contrib/xmms.lisp: New file to handle the xmms player.
1220 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1222 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
1223 Maximize windows in their frame - Leave frames to their actual
1226 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
1227 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
1229 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
1231 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
1233 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
1235 * contrib/mpd.lisp: Use a standard menu.
1237 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
1239 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
1241 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
1243 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
1245 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
1248 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
1250 * src/config.lisp (get-fullscreen-size): One pixel adjustment
1253 * src/clfswm-placement.lisp (*-child-placement): One pixel
1256 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
1258 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
1259 Ensure that all characters are printable.
1261 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
1264 * src/clfswm-placement.lisp (*-child-placement): Adjust
1265 coordinates to one pixel in the current child.
1267 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1269 * src/clfswm-query.lisp (query-enter-function): Assign font before
1270 width and height calculation.
1272 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1274 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
1275 bannish the pointer in an arbitrary place.
1277 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
1278 place the info window in an arbitrary place.
1280 * src/clfswm-query.lisp (query-enter-function): Use with-placement
1281 macro to place the query window in an arbitrary place.
1283 * src/clfswm-placement.lisp: New file. Allow to place info windows
1284 or query windows on an arbitrary place. Allow to bannish the
1285 pointer on an arbitrary place.
1287 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
1289 * src/clfswm-circulate-mode.lisp (reorder-child)
1290 (reorder-brother): Unfocus windows before reordering children or
1293 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1295 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
1296 the parent is a frame.
1298 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
1299 motion with a default modifier.
1301 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
1304 * src/clfswm-info.lisp (info-mode): Handle motion with a default
1306 (info-mode): Optimization in loop function.
1308 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1310 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
1311 root-frame correctly.
1313 * clfswm.asd: Dependency fix for clfswm-generic-mode.
1315 * src/clfswm-circulate-mode.lisp (reorder-child)
1316 (reorder-brother): Handle empty frames.
1317 (reorder-brother): Redisplay only the parent frame of the current
1320 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
1321 parent frame of the current frame.
1323 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
1325 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
1326 Maximize/Unmaximize the current frame in its parent frame.
1328 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
1329 windows and frames in their parent frame.
1331 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1333 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
1335 * src/clfswm-circulate-mode.lisp (reorder-child)
1336 (reorder-brother): Reinitialise on circulate type change
1337 child to brother or brother to child.
1339 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
1340 calls xlib:display-finish-output on each map-request. So speed up
1343 * src/xlib-util.lisp (map-window): New function. Call
1344 xlib:display-finish-output on each map request.
1346 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1348 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
1349 Optimisation when drawing second mode window.
1351 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1353 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
1356 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1358 * src/clfswm-util.lisp (run-program-from-query-string): Launch
1359 command only with a return validation.
1361 2009-04-22 Xavier Maillard <xma@gnu.org>
1363 * src/clfswm-query.lisp (query-string): Use a generic mode.
1365 2009-04-19 Xavier Maillard <xma@gnu.org>
1367 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
1369 2009-04-18 Xavier Maillard <xma@gnu.org>
1371 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
1372 to define all other modes.
1374 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1376 * src/package.lisp (): Use *default-font-string* for all
1379 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
1381 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
1383 * src/xlib-util.lisp (null-size-window-p): Better check of null
1386 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
1388 * src/clfswm.lisp (handle-map-request): Add a fix to manage
1389 correctly fullscreen windows (SDL particularly).
1391 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
1393 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
1394 a segfault with clisp/new-clx.
1396 * src/clfswm.lisp (handle-motion-notify): Add a needed window
1399 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
1400 needed window argument.
1402 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
1404 * src/xlib-util.lisp (wait-no-key-or-button-press)
1405 (wait-a-key-or-button-press): Check buttons press/release correctly"
1407 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
1409 * src/menu-def.lisp: Add children navigation menu in the movement
1410 menu (select next/previous child/brother/level).
1412 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
1414 * *: Rename 'sister' frame to 'brother' frame.
1416 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
1417 alias in a real modifier.
1419 * src/package.lisp (*modifier-alias*): New list of modifier alias
1420 For example: :alt is :mod-1, :numlock is :mod-2...
1422 * src/tools.lisp (remove-hook): New function.
1424 * src/clfswm-keys.lisp (with-capslock, without-capslock)
1425 (with-numlock, without-cnumlock): New functions.
1427 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
1429 * src/clfswm-info.lisp: Use the *binding-hook* to create info
1430 keys and mouse bindings.
1432 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
1433 second keys and mouse bindings.
1435 * src/bindings.lisp: Use the *binding-hook* to create main keys
1438 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1440 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
1443 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
1445 * src/menu-def.lisp: Use a menu instead of a function for the
1448 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
1450 * src/clfswm-util.lisp (show-standard-menu): Display the standard
1451 menu from the 'update-menus' command.
1453 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
1455 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
1456 it's already grabbed.
1458 * src/clfswm-internal.lisp (display-frame-info): Use configurable
1459 colors and fix a bug with background.
1460 (display-frame-info): Set window background when displaying info.
1462 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1464 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
1465 warning with clisp/new-clx.
1467 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
1469 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
1472 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1474 * *: **** Release 0809 ****
1476 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1478 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
1480 (ensure-unique-number): New function and menu entry.
1482 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
1484 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
1485 hook: open the next window in a named frame.
1486 (numbered-frame-nw-hook): New new window hook: open the next
1487 window in a numbered frame.
1489 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
1490 cases. So query-string can be called even in the main mode.
1492 * src/clfswm-internal.lisp (show-all-children): Do not raise a
1493 child by default => far less flickering.
1495 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
1497 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
1499 * src/menu-def.lisp: Change key binding for the CLFSWM menu
1502 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
1503 is nil. (workaround on some CLX implementation).
1505 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
1507 * src/menu-def.lisp: Add a menu to set a focus policy for all
1510 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
1511 (all-frames-set-*-focus-policy): Set a focus policy for all
1514 * src/clfswm.lisp (handle-enter-notify): sloppy-select
1515 mode. Select a child and its parents on mouse over.
1517 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
1519 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
1520 policy -> Sloppy focus only for windows in the current frame.
1521 (main-unprotected): Exit clfswm on init error (ie: when another
1522 window manager is running).
1524 * src/clfswm-util.lisp (reset-clfswm): New function.
1526 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
1528 * src/clfswm-menu.lisp (init-menu): New function.
1530 * src/clfswm-util.lisp (reload-clfswm): New function to reload
1532 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
1534 * src/clfswm.lisp (main, main-unprotected): Handle error in a
1535 superior main function. Now CLFSWM can't break the X session. It
1536 just reinitialize the display and run a new main loop.
1538 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
1539 *vt-keyboard-on* global to avoid warnings when loading clfswm.
1541 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
1542 (help-on-gimp-layout): Describe how to use the GIMP layout.
1544 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
1546 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
1547 main-window-right-layout. Change the keybinding for (shift)alt+tab
1548 to not select windows in the main window lisst.
1549 Bind F8 to add a window in the main window list.
1550 Bind F9 to remove a window in the main window list.
1551 Change the focus policy to :sloppy.
1552 (set-previous-layout): Restore the previous layout, keybinding and
1555 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
1557 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
1559 * src/clfswm-layout.lisp (main-window-left-layout)
1560 (main-window-bottom-layout, main-window-top-layout): New
1562 Factorize layouts in menu.
1564 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
1566 * src/clfswm-layout.lisp (main-window-right-layout): A possible
1567 GIMP layout: one or more main windows on one side of the
1568 frame. Others on the other size.
1570 * src/clfswm-util.lisp
1571 (current-frame-set-click/sloppy-focus-policy): Each frame can have
1572 a different focus policy (one of :click or :sloppy).
1573 The default focus policy is set with *default-focus-policy*.
1575 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
1577 * src/clfswm-info.lisp (show-config-variable): New function.
1579 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
1581 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
1583 * src/clfswm-info.lisp: Colored help for key binding and corners
1586 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
1588 * src/clfswm-util.lisp (delete-focus-window)
1589 (destroy-focus-window): Remove chid only in
1590 handle-unmap/destroy-notify. Focus *current-root* only when
1591 closing/killing the current child.
1593 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
1594 functions or corners.
1596 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1598 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
1599 action: Hide/Unhide a terminal on mouse corner action. (By default
1600 right mouse button on the top left corner).
1602 * src/config.lisp (*never-managed-window-list*): New config
1605 * src/clfswm-internal.lisp (never-managed-window-p): New function:
1606 Handle never managed window in a more simple way.
1608 * src/clfswm-corner.lisp: New file and new and more simple method
1609 to define corners actions.
1611 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
1613 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
1615 * src/clfswm-layout.lisp (fast-layout-switch)
1616 (define-fast-layout-switch): New functions: Switch between two
1619 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
1620 really in the second mode. So leave-second-mode can be used even
1623 * src/clfswm-util.lisp (switch-to-last-child): New function:
1624 Store the current child and switch to the previous one.
1626 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1628 * src/clfswm-util.lisp (display-current-window-info): Display the
1630 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
1631 (top right by default). By default 'xvkbd' is used.
1633 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1635 * src/xlib-util.lisp (move-window, resize-window): Compress motion
1638 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
1640 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
1643 * src/clfswm-info.lisp (info-mode): Compress motion events.
1645 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
1647 * src/clfswm-internal.lisp (show-all-children): Compute geometry
1648 and selection first and then show only necessary children.
1649 (show-child): remove unneeded display-p parameter.
1651 * src/config.lisp (get-fullscreen-size): Place the frame border
1652 outside the screen (this prevent the loose of 2 pixels per
1655 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
1657 * src/clfswm-internal.lisp (focus-child): Algorithm change to
1658 raise only the selected child.
1660 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
1662 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
1663 Raise only viewable children.
1665 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
1667 * src/clfswm-internal.lisp (show-all-children): Always raise all
1668 displayed children. Remove all references to raise-p.
1670 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1672 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
1675 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
1676 second mode binding on raise/lower child in its frame.
1678 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
1679 behaviour to the new raise/lower property.
1680 Call clear-nw-hook before the rest of the hook.
1682 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
1683 (mouse-click-to-focus-and-resize-window): Stop button event. This
1684 prevent a keyboard/pointer freeze.
1686 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1688 * src/clfswm-internal.lisp (frame-lower-child)
1689 (frame-raise-child): New functions to raise/lower a child in its
1692 * src/clfswm-util.lisp (have-to-present-windows)
1693 (have-to-present-all-windows): New functions to have an MaxOS
1694 expose like on mouse click in screen corner.
1696 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
1698 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
1700 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
1701 child from a choice in all frames with hidden children.
1703 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
1705 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
1707 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
1708 (unhide-all-children): New functions.
1710 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
1713 * src/clfswm-util.lisp (hide/show-frame-window): new function and
1716 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
1718 * src/clfswm-util.lisp (rename-current-child): Do not display the
1719 frame info for a window.
1721 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
1723 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
1724 frame window for the removed child and its children.
1726 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
1728 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
1731 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
1733 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
1734 the ROX pinboard (ie: leave it lowered in the root window as
1737 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
1738 (tile-left-layout, tile-right-layout, tile-top-layout)
1739 (tile-bottom-layout): Use all the frame space when there is only
1742 * src/clfswm-internal.lisp (place-window-from-hints): Center
1743 unmanaged windows in the root screen.
1745 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
1748 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1750 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
1751 typo in managed types.
1753 * src/clfswm-internal.lisp (show-child): Always display frame info
1754 even if the frame is hidden.
1756 * src/xlib-util.lisp (resize-window): Use a better algorithme to
1759 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1761 * src/clfswm-util.lisp (with-movement): Display frame info for all
1762 frames in current root.
1764 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1766 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
1768 * src/bindings-second-mode.lisp (define-second-key #\a): New
1769 binding on 'add-default-frame'.
1771 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1772 message to follow the autodocumentation process.
1774 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1776 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1777 "Space" to jump to a child. "B" to bind a slot on the current
1780 * src/bindings-second-mode.lisp: Use "Tab" instead of
1783 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
1785 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1786 unmanaged (hidden) windows.
1788 * src/clfswm-internal.lisp (place-window-from-hints): Give a
1789 minimal size for windows.
1790 (with-all-windows-frames-and-parent): New function.
1792 * src/config.lisp (*default-window-width/height*): New parameters.
1794 * src/clfswm-internal.lisp (place-window-from-hints): Center
1795 windows in the screen instead of in their frame.
1797 * src/bindings-second-mode.lisp (tile-space-current-frame): New
1800 * src/clfswm-layout.lisp (register-layout): Intern the once name
1801 in the right package.
1803 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1805 * doc/dot-clfswmrc: Update to follow the new clfswm way.
1807 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
1809 * src/clfswm-internal.lisp (set-current-child)
1810 (adapt-child-to-parent, show-child, hide-child): Handle the case
1811 where child is not a frame or a window.
1813 * src/clfswm-util.lisp
1814 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1815 Check if child is a frame.
1817 * src/clfswm-internal.lisp (managed-window-p): Handle the case
1818 where frame is null.
1819 (place-frame): Check if frame and parent are frames.
1821 * src/clfswm-info.lisp (info-mode): display all frame info before
1824 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1825 info before leaving.
1827 * src/clfswm-internal.lisp (display-all-frame-info): New function.
1829 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
1831 * src/tools.lisp (getenv): Implemented for ECL.
1832 (urun-prog): Implemented for ECL.
1834 * src/clfswm-util.lisp (identify-key): Use a double buffer to
1837 * src/clfswm-query.lisp (query-string): Use a double buffer to
1840 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1843 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1846 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
1848 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1850 * src/menu-def.lisp: New file: move all menu definition in
1853 * src/clfswm-layout.lisp (register-layout): Use a function instead
1856 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
1858 * src/clfswm-autodoc.lisp (produce-menu-doc,
1859 (produce-menu-doc-html): New functions.
1860 (produce-doc-*): Moved to clfswm-autodoc.lisp.
1862 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1863 paste a child on one of its own children. (this prevent a
1865 (move-child-to): Rename move/copy-current-child-by to
1867 (mouse-move-window-over-frame): New function to move the window
1868 under the mouse cursor to another frame.
1870 * src/clfswm-internal.lisp (find-child-in-parent): New function.
1872 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1874 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1875 windows only when its window parent is the current child.
1877 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1879 * src/clfswm-util.lisp (manage-current-window)
1880 (unmanage-current-window): New functions: Allow to force to manage
1881 or unmanage a window by its parent frame.
1883 * src/bindings-second-mode.lisp (#\o): binded to
1884 set-open-in-new-frame-in-parent-frame-nw-hook and
1885 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1887 * src/clfswm-util.lisp (with-current-window): New macro.
1889 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1890 exposure and enter-window handle event.
1892 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1893 children for the current child after the move/resize.
1895 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1897 * src/xlib-util.lisp (resize-window): Take care of window size
1900 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1901 move/resize unmanaged windows.
1903 * src/xlib-util.lisp (move-window, resize-window): New functions.
1905 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1907 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1908 user choose what window type the current frame must handle.
1909 (display-current-window-info): New function.
1910 (current-frame-manage-all-window-type)
1911 (current-frame-manage-only-normal-window-type)
1912 (current-frame-manage-no-window-type): New functions.
1914 * src/clfswm-internal.lisp (managed-window-p): New function.
1916 * src/package.lisp (frame): Managed type: new frame
1917 parameter. This allow to choose what window type a frame must
1920 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1922 * src/clfswm-nw-hooks.lisp
1923 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1925 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1928 * src/tools.lisp (ensure-printable): Return always a string even
1931 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
1933 * src/config.lisp (*default-nw-hook*): New variable to change the
1934 default new window hook.
1936 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1938 * clfswm.asd (clfswm): Add a dependency from
1939 clfswm-second-mode.lisp to clfswm.lisp.
1941 * src/clfswm-util.lisp (identify-key): Show the documentation for
1942 the function bound on a key.
1943 (with-movement): Move with-movement,
1944 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
1945 to clfswm-util.lisp.
1947 * src/clfswm-menu.lisp: New menu system that let user change keys
1948 or functions associated to keys.
1950 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
1952 * src/clfswm-internal.lisp (show-all-children): Display-child is
1953 the first child by default. Solve a bug with father-p.
1955 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
1957 * src/clfswm-internal.lisp (add-frame): Add frame return the
1959 (show-all-children): Move the size computation outside the
1962 * src/bindings-second-mode.lisp (with-movement): Redisplay only
1965 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1966 only the current child.
1968 * src/clfswm-internal.lisp (show-all-children): New display-child
1969 parameter to display only the desired child and its children.
1970 (select-next/previous-child): Only display the current child.
1972 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
1974 * src/clfswm.lisp (init-display): Move the default frame creation
1975 on the default init hook.
1977 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1978 the main mode (for example: "1" on an azerty keyboard).
1980 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
1982 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1983 keysyms. Revert to old grabbing method for the main mode.
1985 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
1987 * src/clfswm.lisp (init-display): Add key handling on no focus
1988 window and on frame windows.
1990 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1992 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1993 all keys by default and replay just what is needed. No change for
1996 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1997 (find-key-from-code): Test for shift and not shift presence.
1999 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
2001 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
2002 new key parameter to have less flickering.
2004 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
2006 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
2007 layout only one time and revert to no-layout to freely handle
2010 * src/clfswm-nw-hooks.lisp
2011 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
2012 with new created window.
2014 * src/clfswm-layout.lisp (register-layout): Now register
2015 automatically a once layout to set the layout only one time and
2016 revert to no-layout to freely handle frames.
2018 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
2020 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
2021 nw-hook: Open the next window in the current frame and leave the
2022 focus to the current child.
2024 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
2026 * src/bindings-second-mode.lisp: Add keys definitions to
2027 bind-or-jump in the second mode.
2029 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
2030 macro for bind-or-jump-(1|2|3...).
2032 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
2033 arguments to function. This allow to do things like:
2034 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
2035 are passed to my-function on key press.
2037 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
2039 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
2041 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
2043 * src/clfswm-internal.lisp (child-fullname): New function
2045 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
2046 docstring in info-mode-menu. An item can be
2047 '((key function) (key function)) or with docstring
2048 '((key function "documentation 1") (key function "bla bla") (key function))
2050 * src/tools.lisp (ensure-n-elems): New function.
2052 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
2053 resize a frame or the window's father.
2055 * src/clfswm.lisp (init-display): Remove tile-space-layout by
2056 default on the root frame.
2058 * src/clfswm-util.lisp (move/resize-frame): Add standard event
2059 hooks handlers (map-request, configure-notify...)
2061 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
2064 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
2066 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
2067 or the window's father.
2069 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
2070 event only if there is a geometry change.
2071 (mouse-focus-move/resize-generic): Generic function to move or
2072 resize a frame or a window father frame.
2074 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
2076 * src/clfswm-internal.lisp (show-all-children): Return t if there
2077 is a geometry change.
2079 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
2081 * src/bindings.lisp (Up/Down): Swap select previous/next level.
2083 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
2085 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
2087 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
2088 (with-all-*): Reverse the child list to manage the first child last (like in
2091 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
2092 root window only if true.
2094 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
2095 root window only if *create-frame-on-root* is true.
2097 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
2100 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
2102 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
2103 the current child (even if it's a window).
2105 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
2107 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
2108 (mouse-click-to-focus-and-resize): New functions.
2110 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
2111 (*-px->fl): Convert pixel coordinates to float.
2113 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
2115 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
2117 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
2120 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
2121 and hide-all-children.
2122 (raise-if-needed): New function.
2123 (show-child): Use a first-p parameter to raise windows only when they are
2126 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
2128 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
2131 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
2133 * src/clfswm-info.lisp (keys-from-list): new function.
2135 * src/*: rename 'childs' in 'children'.
2137 * src/*: rename 'group' in 'frame'.
2139 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
2141 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
2143 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
2145 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
2147 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
2149 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
2150 Bind control+o to open the next window in a new group in the root group
2151 (as open in next window in a new workspace in 0801 version).
2153 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
2155 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
2158 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
2160 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
2161 instead of Tab for select-previous-child.
2163 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
2165 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
2168 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
2170 * clfswm-util.lisp (identify-key): Display the documentation
2171 associated to keys when identifying a key.
2173 2008-03-10 Xavier Maillard <xma@gnu.org>
2175 * contrib/clfswm: Complete rewrite of the script. Detect error and
2176 act accordingly. Add command line arguments to configure the
2177 script execution. User can now choose different common lisp
2178 implementation (clisp and sbcl only), choose where to store the
2179 dumped image, where to find clfswm source.
2181 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
2183 * clfswm-internal.lisp (process-new-window): Beginning of new
2184 window hook: each group have a hook to tell what he wants to do
2185 with the new created window.
2187 2008-03-08 Xavier Maillard <xma@gnu.org>
2189 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
2190 call the resulting executable.
2192 * clfswm.lisp (read-conf-file): Check for the user config file in
2193 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
2194 prefered whenever possible.
2196 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
2198 * clfswm-layout.lisp (*-layout): Add an optional raise-p
2199 parameter in each layout.
2201 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2203 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
2205 (copy/move-current-child-by-name/number): new functions
2206 (focus-group-by-name/number): new functions
2207 (delete-group-by-name/number): new functions
2209 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2211 * ************************************************************ *
2212 *: Major update - No more reference to workspaces. The main *
2213 structure is a tree of groups or application windows. *
2214 * ************************************************************ *
2216 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
2218 * clfswm.lisp (read-conf-file): Read configuration in
2219 $HOME/.clfswmrc or in /etc/clfswmrc or in
2220 $XDG_CONFIG_HOME/clfswm/clfswmrc.
2221 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
2224 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
2226 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
2229 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
2231 * clfswm-internal.lisp (find-window-group): New function.
2233 * clfswm*: Change to make clfswm run with clisp/new-clx.
2235 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
2237 * clfswm-util.lisp (query-show-paren): Add show parent matching in
2239 (query-string): Bind control+k to delete end of line.
2241 * clfswm-second-mode.lisp (draw-second-mode-window): Display
2242 the action on mouse motion in second mode.
2244 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
2245 event but do not clear the root window.
2246 (handle-configure-request): Adjust unmanaged window from their
2249 * clfswm-internal.lisp (process-new-window): Adjust new window
2250 with the specified hints (max/min/base width/height).
2252 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
2254 * clfswm.lisp (handle-configure-request): Send an Configuration
2255 Notify event. This solve a bug with xterm and rxvt who takes some
2256 times to be mapped. Now there is no delay.
2258 * bindings-second-mode.lisp (define-shell): Run programs after
2259 living the second mode.
2261 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
2263 * clfswm-internal.lisp (process-new-window): Do not crop transient
2264 window to group size.
2265 (adapt-window-to-group): Do not crop transient window to group
2268 * clfswm.lisp (handle-configure-request): Adapt just the window to
2269 its group and don't take care of the configure request. Remove the
2270 bug with the Gimp outside the group and speed up the window
2272 (handle-exposure): Remove show-all-group on exposure event
2275 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
2277 * clfswm-util.lisp (circulate-group-up-copy-window)
2278 (circulate-group-down-copy-window)
2279 (circulate-workspace-up-copy-group)
2280 (circulate-workspace-down-copy-group): Prevent the copy of the
2281 same window in the same workspace.
2283 * bindings-second-mode.lisp (release-copy-selected-window)
2284 (release-copy-selected-group): Prevent the copy of the same window
2285 in the same workspace.
2287 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
2288 (generic-pager-move-window-on-next-line): Remove the copy
2290 (generic-pager-move-group-on-next-workspace)
2291 (generic-pager-move-group-on-previous-workspace): Prevent the copy
2292 of the same window in the same workspace.
2294 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
2295 (mouse-pager-copy-selected-group-release): Prevent the copy of the
2296 same window in the same workspace.
2298 * tools.lisp (setf/=): new macro to set a variable only when
2301 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
2302 x, y... only when necessary.
2304 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
2306 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
2307 new function and hook: force windows to stay in its group (solve a
2310 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
2312 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
2313 less flickering when moving/resizing groups.
2315 * clfswm-internal.lisp (hide-group): new function.
2316 (show-all-group): clear-all: new parameter.
2318 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
2320 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
2322 * clfswm*: Color change for the pager. Typo or better description
2323 in bindings definitions. Define bindings for a qwerty keyboard by
2324 default. dot-clfswmrc show examples to switch to an azerty
2326 License change to GPL v3.
2327 * config.lisp: new file - group all globals variables in this
2330 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
2332 * xlib-util.lisp (hide-window): Remove structure-notivy events
2333 when hidding a window.
2335 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
2337 * package.lisp (*sm-property-notify-hook*): Readded
2338 property-notify-hook in second mode.
2340 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
2342 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
2344 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
2346 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
2347 Tile the current workspace with the current window on one side and
2348 others on the other (this emulate the larswm, dwm, wmii way). See
2349 the default configuration file to enable this mode by default.
2351 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
2354 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
2356 * clfswm-pager.lisp (pager-draw-window-in-group): Add
2357 ensure-printable to print windows name even with non-ascii
2360 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
2362 * clfswm-pager.lisp (pager-explode-current-group): Create a new
2363 group for each window in group.
2364 (pager-implode-current-group): Move all windows in workspace to
2365 one group and remove other groups.
2367 * clfswm-pack.lisp (explode-group): Create a new group for each
2369 (implode-group): Move all windows in workspace to one group and
2370 remove other groups.
2372 * clfswm-util.lisp (identify-key): Remove local configuration
2373 variables and made them available for configuration from
2375 (query-string): idem.
2377 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
2379 * netwm-util.lisp: Start of NetWM compliance.
2380 Add a Netwm client list gestion.
2382 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
2384 * clfswm-internal.lisp (create-group-on-request): open a new group
2385 only when the current group is not empty.
2387 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
2388 bug with null workspace.
2390 * clfswm-pager.lisp (pager-handle-event): Add a hook
2391 system. This hooks can be changed in the user configuration file.
2393 * package.lisp: All colors and font variables are set in
2394 package.lisp and can be configured in the user configuration
2396 Note: If you have configured some less ugly colors (esp. for the
2397 pager) don't hesitate to let me know :)
2399 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
2400 system. This hooks can be changed in the user configuration file.
2402 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
2403 changed in the user configuration file (~/.clfswmrc)
2405 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
2407 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
2408 arrow action, open next window in new workspace/group.
2410 * bindings.lisp (stop-all-pending-actions): new binding.
2411 (open-next-window-in-new-group-once): Open the next windows in a
2412 new group (only once) or open all new windows in a new group (like
2413 others windows managers).
2415 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
2417 * clfswm.lisp (read-conf-file): New function to read a lisp
2418 configuration file at startup.
2419 (focus-group-under-mouse): Check if group isn't the current group
2420 ( prevent a bug with unclutter ).
2422 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
2424 * bindings.lisp (run-program-from-query-string): A program can be
2425 launch from a input query window.
2427 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
2429 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
2431 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
2433 * clfswm.lisp (process-new-window): One can now open the next
2434 window in a workspace called by its number.
2436 * clfswm-util.lisp (query-font-string): Minimal editing
2438 (eval-from-string): And an REPL in the window manager... :)
2440 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2442 * clfswm.lisp (process-new-window): One can now open the next
2443 window in a new workspace or a new group.
2445 * clfswm-pager.lisp (pager-mode): Display the next arrow action
2446 with the hidden windows.
2448 * clfswm.lisp (second-key-mode): Display the current workspace
2449 number and the next arrow action in the state window.
2451 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
2452 the pager mode and then redisplay only the current workspace.
2454 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
2456 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
2457 they can be focused with a keypress, sorted or renumbered.
2459 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2461 * clfswm-pager.lisp (pager-mode): Remove multiple silly
2462 pager-draw-display. This prevent a lot of flickering in the
2465 * clfswm.lisp: Remove all display-force-output and replace them
2466 with only one display-finish-output in the event loop.
2468 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
2470 * clfswm-pager.lisp (pager-center-group): New function - center a
2471 group at the middle of the screen.
2473 * clfswm-pack.lisp (center-group): New function - center a group
2474 at the middle of the screen.
2476 * clfswm.lisp (show-group): Add a cross line under the group.
2477 (show-group): Group are showned even if fullscreened.
2478 (init-display): Add an exposure event on the root window.
2480 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
2482 * package.lisp (*default-group*): Default group is the same size
2483 of a fullscreened group.
2485 * bindings*: Use shift to move, control+shift to copy.
2487 * *.lisp: Add comments for configuration or alternatives. So grep
2488 for CONFIG to see where you can configure clfswm. And grep for
2489 Alternative to use some commented code.
2491 * clfswm.lisp (second-key-mode): Use a single window to show the
2492 second mode. See for alternatives at the end of this file.
2494 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
2496 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
2497 macro of key and mouse definitions.
2498 (define-define-key/mouse): Use state instead of modifiers list
2499 this fix a bug when the modifiers list is not in the rigth order.
2501 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
2503 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
2505 * clfswm-info.lisp (info-mode): Add an info mode.
2507 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
2509 * clfswm.lisp (process-new-window): Change border size for
2511 (show-all-windows-in-workspace): Unhide all windows even when the
2512 current group is in fullscreen mode.
2514 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
2516 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
2517 redisplay the identify window after a terminal switch.
2519 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
2520 redisplay the pager after a terminal switch.
2522 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
2524 * clfswm-util.lisp (identify-key): Add a window to display
2525 the keys to identify on screen.
2527 * bindings.lisp, bindings-pager.lisp: Define same keys to
2528 move/copy groups/windows in second mode and in pager.
2530 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
2532 (show-all-windows-in-workspace): unhide window before adapting it
2535 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
2537 * clfswm.lisp (handle-event): Revert to an older version.
2539 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
2541 * clfswm-util.lisp (force-window-in-group)
2542 (force-window-center-in-group): New functions for transient windows.
2544 * clfswm-pager.lisp (pager-remove-current-workspace/group):
2545 bugfix: hide all windows before removing group or workspace.
2547 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
2549 * bindings-pager.lisp (mouse-pager-move-selected-group)
2550 (mouse-pager-copy-selected-group)
2551 (mouse-pager-move-selected-window)
2552 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
2553 (mouse-pager-rotate-window-down): New functions to have mouse in
2556 * clfswm-pager.lisp (pager-swap-window)
2557 (pager-copy-group-on-next/previous-workspace)
2558 (pager-copy-window-on-next/previous-line): New functions
2560 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
2562 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
2563 (pager-move-group-on-next/previous-workspace): new functions.
2565 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
2566 to its half size (new functions).
2568 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
2570 * clfswm-pager.lisp: workspaces, groups and windows can now be
2571 selectionned with the keyboard or the mouse.
2573 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
2575 * clfswm-pager.lisp (pager-select-workspace-right/left):
2576 workspaces can now be selectionned with the keyboard.
2578 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
2580 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
2581 new function to remove a previous defined key or mouse combination.
2583 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
2585 * clfswm.lisp (main): Check for access error in init-display.
2587 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
2588 keycode before grabbing.
2590 * bindings.lisp: Remove nlambda and use defun to keep the function
2591 documentation with clisp.
2592 (define-shell): new macro to define shell command for the second
2595 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
2597 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
2600 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
2602 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
2603 workspace circulation.
2605 * clfswm-util.lisp (absorb-orphan-window): new function.
2607 * clfswm-keys.lisp: Keysyms support.
2609 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
2611 * clfswm.lisp (show-group): Use one gc for all groups and not one
2614 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
2616 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
2618 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
2619 width and height outside group.
2621 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
2623 * clfswm.lisp: First public release.