1 2012-09-04 Philippe Brochard <pbrochard@common-lisp.net>
3 * src/clfswm-internal.lisp (show-all-children): Hide only children
4 hidden by normal windows or frames (but not :dialog,
6 (process-new-window): Remove borders for maxsize windows.
8 2012-08-31 Philippe Brochard <pbrochard@common-lisp.net>
10 * src/xlib-util.lisp (with-xlib-protect): Handle all Xlib errors
11 for better code protection.
13 2012-08-28 Philippe Brochard <pbrochard@common-lisp.net>
15 * src/clfswm-expose-mode.lisp (expose-query-key-press-hook): Add
16 an option to immediately select child if they can be directly
19 2012-08-25 Philippe Brochard <pbrochard@common-lisp.net>
21 * contrib/volume-mode.lisp: Add mouse buttons actions in volume
22 mode. Add a volume button toolbar module.
24 2012-08-24 Philippe Brochard <pbrochard@common-lisp.net>
26 * contrib/mpd.lisp: New toolbar modules (available only if
27 toolbar.lisp is loaded).
28 Add a small parameter for toolbar modules useful with vertical
31 2012-08-21 Philippe Brochard <pbrochard@common-lisp.net>
33 * contrib/reboot-halt.lisp: Add configuration command for system
36 * contrib/toolbar.lisp (toggle-toolbar-hide-state): New function.
38 2012-08-20 Philippe Brochard <pbrochard@common-lisp.net>
40 * src/clfswm-internal.lisp (add-in-never-managed-window-list): New
43 2012-08-20 Philipp Kroos <philipp.kroos@t-online.de>
45 * src/clfswm-placement.lisp (here-placement): Evaluates to current
48 2012-08-20 Philipp Kroos <philipp.kroos@t-online.de>
50 * contrib/toolbar.lisp: Add an expose-mode-button-module.
52 2012-08-19 Philippe Brochard <pbrochard@common-lisp.net>
54 * contrib/toolbar.lisp (remove-toolbar): New function.
56 2012-08-18 Philippe Brochard <pbrochard@common-lisp.net>
58 * contrib/toolbar.lisp: Add configurable colors in toolbar
61 2012-08-16 Philippe Brochard <pbrochard@common-lisp.net>
63 * src/tools.lisp: Factorize system usage information collection.
64 (start-system-poll): Use a lock file instead of a local variable.
66 * contrib/toolbar.lisp: Add memory, cpu and battery usage module
67 with a poll methode. More responsive but up to date every 10s by
70 2012-08-15 Philippe Brochard <pbrochard@common-lisp.net>
72 * contrib/toolbar.lisp: Add a clickable label module for toolbar.
73 Add a clickable entry to open the CLFSWM main menu.
74 Add memory, cpu and battery usage module.
76 * src/clfswm-menu.lisp (open-menu): Prevent to reopen an opened
77 menu. Fixe a but with negative selected-item.
79 2012-08-14 Philippe Brochard <pbrochard@common-lisp.net>
81 * src/clfswm-util.lisp (eval-from-query-string): Show a notify
82 window when updating symobls list for REPL completion.
83 (show-current-root): New function and configuration menu to
84 display a message on the current root.
86 * contrib/toolbar.lisp: Add arguments in toolbar modules.
88 * src/xlib-util.lisp (event-hook-name): Intern hook name symbol
91 2012-08-13 Philippe Brochard <pbrochard@common-lisp.net>
93 * contrib/toolbar.lisp (toolbar-module-text): Print a formatted
94 text at module position centered in toolbar.
96 * src/xlib-util.lisp (optimize-event-hook): Remove unused event
99 2012-08-12 Philippe Brochard <pbrochard@common-lisp.net>
101 * contrib/toolbar.lisp: End of toolbar framework.
102 (list-toolbar-modules): Add a list toolbar modules function.
104 2012-08-03 Philippe Brochard <pbrochard@common-lisp.net>
106 * src/clfswm-internal.lisp (show-child): Show unmanaged windows
107 on (maybe) current child in all roots.
109 * src/clfswm-util.lisp (find-child-under-mouse-in-child-tree):
110 Handle children from all roots instead of from *root-frame*.
112 2012-07-23 Philippe Brochard <pbrochard@common-lisp.net>
114 * src/clfswm-expose-mode.lisp: New expose mode based on standard
117 2012-06-27 Philippe Brochard <pbrochard@common-lisp.net>
119 * src/clfswm-util.lisp (eval-from-query-string): Add completion
120 for eval for query string.
122 2012-06-26 Philippe Brochard <pbrochard@common-lisp.net>
124 * src/clfswm-query.lisp: Add completion for shell commands.
126 2012-06-18 Philippe Brochard <pbrochard@common-lisp.net>
128 * src/clfswm-placement.lisp: Each child can have its own border
129 size. New binding to change the child border size on the fly.
131 2012-06-08 Philippe Brochard <pbrochard@common-lisp.net>
133 * src/tools.lisp (process-timers): Call get-internal-real-time
134 only once for all times.
136 2012-06-07 Philippe Brochard <pbrochard@common-lisp.net>
138 * contrib/toolbar.lisp (define-toolbar-hooks): Add auto-hide
140 (define-toolbar-hooks): Add auto-hide toolbar (show/hide on mouse
143 2012-06-06 Philippe Brochard <pbrochard@common-lisp.net>
145 * src/xlib-util.lisp (handle-event): Add an additional hook event
146 system to handle events in contrib code.
148 2012-06-03 Philippe Brochard <pbrochard@common-lisp.net>
150 * src/clfswm-placement.lisp: Add an optional border size in all
153 2012-05-30 Philippe Brochard <pbrochard@common-lisp.net>
155 * contrib/toolbar.lisp (clock): Add a clock module.
157 2012-05-28 Philippe Brochard <pbrochard@common-lisp.net>
159 * contrib/toolbar.lisp: begining of toolbar support.
161 2012-05-24 Philippe Brochard <pbrochard@common-lisp.net>
163 * src/clfswm-internal.lisp (rotate-root-geometry): Do not use
164 rotatef but a simpler algorithm.
166 2012-05-19 Philippe Brochard <pbrochard@common-lisp.net>
168 * src/clfswm-placement.lisp: Adjust width and height in child and
169 root placement to prevent too big child size.
171 2012-05-18 Philippe Brochard <pbrochard@common-lisp.net>
173 * src/clfswm-placement.lisp: New root placement possibility.
175 * src/clfswm-util.lisp (change-current-root-geometry): New
178 2012-05-17 Philippe Brochard <pbrochard@common-lisp.net>
180 * src/clfswm-util.lisp (exchange-root-geometry-with-mouse): New
183 2012-05-16 Philippe Brochard <pbrochard@common-lisp.net>
185 * src/menu-def.lisp: New root menu.
187 2012-05-15 Philippe Brochard <pbrochard@common-lisp.net>
189 * src/clfswm-circulate-mode.lisp (rotate-root-geometry-next)
190 (rotate-root-geometry-previous): New second mode binding to change
193 2012-05-13 Philippe Brochard <pbrochard@common-lisp.net>
195 * src/clfswm-internal.lisp: Remove the *current-child* variable
196 and use a setfable function (current-child) instead.
197 (current-child-setter): Store root current child before apllying
198 current child change.
200 2012-05-09 Philippe Brochard <pbrochard@common-lisp.net>
202 * src/clfswm-internal.lisp: Use xdpyinfo/xinerama informations
203 instead of xrandr informations.
205 2012-05-06 Philippe Brochard <pbrochard@common-lisp.net>
207 * src/clfswm-internal.lisp : Use only one list for root
209 (*root*): Root management API simplification.
211 2012-04-30 Philippe Brochard <pbrochard@common-lisp.net>
213 * src/clfswm-internal.lisp: Big change to replace *current-root*
214 variable to support multiple root.
216 2012-04-18 Philippe Brochard <pbrochard@common-lisp.net>
218 * src/tools.lisp (add-new-hook, add-hook): New macro. Do not
219 duplicate hooks by default. Use add-new-hook if you want to
222 2012-04-16 Philippe Brochard <pbrochard@common-lisp.net>
224 * src/clfswm-corner.lisp (wait-window-in-query-tree): Add a limit
225 of try to wait the command window.
227 2012-02-25 Philippe Brochard <pbrochard@common-lisp.net>
229 * src/clfswm-util.lisp (place-frames-from-xrandr)
230 (swap-frame-geometry, rotate-frame-geometry): New helper functions
231 for multiple physical screen.
232 (jump-to-slot, add-frame-in-parent-frame): Change *current-root*
235 2012-01-18 Philippe Brochard <pbrochard@common-lisp.net>
237 * src/*.lisp: Use create-symbol and create-symbol-in-package
238 instead of the shorter symb. (Thanks Aad Versteden).
240 * src/bindings-second-mode.lisp (set-default-second-keys): New
241 key binding to set window and frame transparency.
243 * src/bindings.lisp (set-default-main-mouse): New mouse binding to
244 set window and frame transparency.
246 * src/clfswm-keys.lisp (define-keys): New macro to ease multiple
247 keys definitions. (Thanks Valentin Plechinger for the request).
249 * src/*.lisp: Add full transparency support with xcompmgr.
251 2012-01-14 Philippe Brochard <pbrochard@common-lisp.net>
253 * src/*.lisp: Add transparency support.
255 2012-01-09 Ales Guzik <ales.guzik@gmail.com>
257 * src/clfswm-layout.lisp (tile-layout-mix): New layout to
258 automatically choose between vertival and horizontal tile layout.
259 (tile-space-layout): Fix to have space between screen border and
260 frame the same as between frames.
262 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
264 * load.lisp: Support clisp 2.49+ module system to load CLX.
266 2012-01-04 Ales Guzik <ales.guzik@gmail.com>
268 * src/clfswm-layout.lisp (update-layout-managed-children-keep-position):
269 Fix an inattention error.
271 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
273 * src/xlib-util.lisp (with-xlib-protect): Protect from
274 xlib:lookup-error. This prevent an error in clisp/new-clx when
275 sometimes an xlib:colormap is expected instead of an xlib:window.
277 2012-01-03 Philippe Brochard <pbrochard@common-lisp.net>
279 * src/xlib-util.lisp (handle-event): Fix a clisp/new-clx error
280 when sometimes window slot of event-slots is a pixmap instead of a
283 2011-12-26 Philippe Brochard <pbrochard@common-lisp.net>
285 * src/clfswm-query.lisp: Fill the history list with a non-nil
288 2011-12-25 Philippe Brochard <pbrochard@common-lisp.net>
290 * src/package.lisp (make-x-drawable): Drawable wrapper to prevent
291 type error in some CLX versions.
292 Replace xlib:drawable-* functions with x-drawable-* equivalents
294 2011-12-14 Philippe Brochard <pbrochard@common-lisp.net>
296 * src/clfswm-util.lisp (um-create-xdg-section-list): Add at least
297 the 'Utility menu entry.
299 * src/config.lisp (*xdg-section-list*): moved to config.lisp.
301 * src/clfswm-util.lisp (update-menus): Set a default value for
302 searching .desktop files when XDG_DATA_DIRS is not set.
304 2011-10-15 Philippe Brochard <pbrochard@common-lisp.net>
306 * src/clfswm-internal.lisp (place-window-from-hints): Use
307 with-placement macro to place unmanaged windows in an arbitrary
310 2011-06-16 Philippe Brochard <pbrochard@common-lisp.net>
312 * src/clfswm-internal.lisp (clean-windows-in-all-frames): Prevent
313 current root and current child being equal to child.
315 2011-06-13 Philippe Brochard <pbrochard@common-lisp.net>
317 * src/keysyms.lisp: Repeat Page_Down/Up keysym definitions at the
318 end of the file to change keysyms priority.
320 2011-06-13 Sylvain HENRY <hsyl20@gmail.com>
322 * *.*: Minor spelling fix.
324 2011-06-12 Philippe Brochard <pbrochard@common-lisp.net>
326 * src/clfswm.lisp (:unmap-notify, :destroy-notify): Show all
327 children just after the xlib tree cleanup -> reduce the
328 flickering when a window is deleted or destroyed.
330 * src/clfswm-internal.lisp (process-existing-windows): Do not
331 process the notify window.
333 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
335 * *: **** Release 1106 ****
337 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
339 * src/clfswm-internal.lisp (clean-windows-in-all-frames): New
340 function to prevent xlib error when a window is deleted.
342 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
344 * src/clfswm-internal.lisp
345 (delete-child-and-children-in-all-frames): Delete or destroy
346 children before displaying all children.
348 2011-06-05 Philippe Brochard <pbrochard@common-lisp.net>
350 * src/clfswm-util.lisp (add-frame-in-parent-frame): New function
353 2011-06-04 Philippe Brochard <pbrochard@common-lisp.net>
355 * src/clfswm.lisp (main-unprotected): Destroy all frames windows
356 before closing the display (not really needed).
358 2011-06-02 Philippe Brochard <pbrochard@common-lisp.net>
360 * src/clfswm-layout.lisp (inc-tile-layout-size)
361 (dec-tile-layout-size, inc-slow-tile-layout-size)
362 (dec-slow-tile-layout-size): New functions and bindings.
364 2011-06-01 Philippe Brochard <pbrochard@common-lisp.net>
366 * src/clfswm-expose-mode.lisp (define-expose-letter-keys): Add
367 0..1 and A..Z keys to select a child in exposé mode.
369 * src/clfswm-internal.lisp (display-frame-info): Remove hidden
370 infos in frames windows.
372 * src/clfswm-util.lisp (ask-close/kill-current-window): Menu
375 2011-05-30 Philippe Brochard <pbrochard@common-lisp.net>
377 * src/clfswm-internal.lisp (get-parent-layout): Minor fullscreen
380 2011-05-29 Philippe Brochard <pbrochard@common-lisp.net>
382 * src/clfswm-internal.lisp
383 (delete-child-and-children-in-all-frames): Show all children
384 before deleting/destroying a windows, so prevent a flickering.
385 (get-parent-layout): Return the fullscreen size when the current
388 2011-05-28 Philippe Brochard <pbrochard@common-lisp.net>
390 * src/clfswm-internal.lisp (get-parent-layout): Handle correctly
393 * src/clfswm-util.lisp (delete-focus-window-generic): Do not hide
394 child before removing, so prevent a flickering.
396 * src/clfswm-internal.lisp (show-all-children): Rectangular
397 optimization to display only needed children.
398 (show-all-children): Remove flickering on
399 select-next/previous-brother.
401 2011-05-17 Philippe Brochard <pbrochard@common-lisp.net>
403 * src/clfswm-util.lisp (copy-focus-window, cut-focus-window): New
404 functions and ask-close/kill-current-window menu and bindings
407 2011-05-16 Philippe Brochard <pbrochard@common-lisp.net>
409 * src/clfswm-util.lisp (ask-close/kill-current-window): Add an
410 *ask-close/kill-placement* placement window variable.
412 2011-05-09 Philippe Brochard <pbrochard@common-lisp.net>
414 * contrib/osd.lisp (funcall-button-from-code): Display osd
415 documention for buttons and fix some redefining warnings.
417 2011-05-07 Philippe Brochard <pbrochard@common-lisp.net>
419 * src/clfswm-nw-hooks.lisp (make-permanent-nw-hook-frame): New
420 function. Prevent to add or delete a new window hook for this
423 * src/clfswm-layout.lisp (update-layout-managed-children-position):
426 2011-05-06 Philippe Brochard <pbrochard@common-lisp.net>
428 * src/bindings-second-mode.lisp (set-default-second-keys):
429 select-brother-spatial-move-* binding update.
431 * src/clfswm-layout.lisp (tile-left|right|top|bottom-layout): Ask
432 to keep children positions or not.
434 * src/clfswm-internal.lisp (fixe-real-size): Takes care of border
437 * src/clfswm-layout.lisp (update-layout-managed-children): Fix a
438 bug by using the parent frame instead of the current child.
440 * src/clfswm-circulate-mode.lisp
441 (select-brother-generic-spatial-move+right/left/up/down): New
442 function to select a brother from another in a spatial move.
444 2011-04-19 Philippe Brochard <pbrochard@common-lisp.net>
446 * src/clfswm-pack.lisp (move-frame-constrained)
447 (resize-frame-constrained): Use pixels instead of floating
450 2011-04-18 Philippe Brochard <pbrochard@common-lisp.net>
452 * src/clfswm-pack.lisp (resize-frame-constrained): Takes care of
454 (implode-frame, implode-current-frame): New functions. Absorb all
455 frames subchildren in frame. Explode frame opposite.
457 2011-04-17 Philippe Brochard <pbrochard@common-lisp.net>
459 * src/clfswm-pack.lisp (move-frame-constrained)
460 (resize-frame-constrained): New function. Move and resize frame
461 with the mouse constrained by other frame brothers.
463 2011-04-14 Philippe Brochard <pbrochard@common-lisp.net>
465 * src/clfswm-util.lisp (with-movement-select-next-brother)
466 (with-movement-select-previous-brother)
467 (with-movement-select-next-child): Use a simple method (do not
468 enter in the circulate mode) to allow to circulate in all children
471 * src/clfswm-menu.lisp (open-menu): Save info hash table keys
472 instead of deleting newly created keys.
474 2011-03-21 Philippe Brochard <pbrochard@common-lisp.net>
476 * src/clfswm-internal.lisp (x-px->fl, y-px->fl): Takes care of
479 2011-03-20 Philippe Brochard <pbrochard@common-lisp.net>
481 * src/clfswm-info.lisp (show-config-variable): call
482 produce-conf-var-doc.
484 2011-03-18 Philippe Brochard <pbrochard@common-lisp.net>
486 * src/clfswm-autodoc.lisp (produce-conf-var-doc-html): Produce a
487 documentation for all configurable variables in CLFSWM -
490 * src/clfswm-internal.lisp (leave-frame): Hide all children except
493 2011-03-16 Philippe Brochard <pbrochard@common-lisp.net>
495 * src/clfswm-autodoc.lisp (produce-all-docs): Produce a
496 documentation for all configurable variables in CLFSWM.
498 * src/clfswm-layout.lisp (set-gimp-layout): Display a notify
499 window with the help on the GIMP layout.
501 2011-03-12 Philippe Brochard <pbrochard@common-lisp.net>
503 * src/menu-def.lisp: Menu update to prevent cursor keys clash.
505 * clfswm.asd: Change compilation order to prevent undefined
508 * src/clfswm-internal.lisp (show-child(frame)): Handle properly
509 the show-root-frame-p parameter.
511 2011-03-11 Philippe Brochard <pbrochard@common-lisp.net>
513 * src/clfswm-util.lisp (move-frame, resize-frame): Do not move or
514 resize a frame when it's the current root.
516 2011-03-10 Philippe Brochard <pbrochard@common-lisp.net>
518 * src/clfswm-internal.lisp (show-all-children): Handle properly
519 duplicated child in multipe frames.
521 2011-03-09 Philippe Brochard <pbrochard@common-lisp.net>
523 * contrib/volume-mode.lisp (set-default-volume-keys): Add more
524 keybindings (up/down, right/left) to raise/lower the volume.
526 * src/clfswm-layout.lisp: Add a variable border size for frames
529 2011-03-08 Philippe Brochard <pbrochard@common-lisp.net>
531 * src/clfswm-util.lisp (cut-current-child, remove-current-child)
532 (delete-current-child): Hide the current child before doing the
535 * src/clfswm-internal.lisp (show-all-children): Hide windows not
536 in the current root before displaying those in current root.
537 Remove all hide-all unnecessary calls.
539 * src/clfswm-configuration.lisp (save-variables-in-conf-file):
540 Save only variables with a different value than their original
543 2011-03-07 Philippe Brochard <pbrochard@common-lisp.net>
545 * src/clfswm-info.lisp (show-config-variable): Use the new
548 * src/clfswm-autodoc.lisp (produce-configuration-variables): Use
549 the new defconfig method.
551 * src/clfswm-configuration.lisp (create-configuration-menu):
552 Change the config system with a more lispy one and a less string
553 based one: (defconfig name value group doc).
556 2011-03-06 Philippe Brochard <pbrochard@common-lisp.net>
558 * src/clfswm-internal.lisp (show-all-children): Simplify the
560 (show-child): Display an unmanaged window whe it's the current
562 (show-all-children): add the ability to display all child from
563 *root-frame* and hide all those who are not in *current-root*.
564 -> remove hide-all-children when needed.
566 * src/xlib-util.lisp (move-window,resize-window): Add a
567 *color-move-window* border when moving or resizing a window.
569 2011-03-04 Philippe Brochard <pbrochard@common-lisp.net>
571 * src/clfswm-internal.lisp (show-all-children): Perform only one
572 recusion on the clfswm tree: calculate geometry and place child in
575 2011-03-03 Philippe Brochard <pbrochard@common-lisp.net>
577 * src/clfswm-internal.lisp (show-all-children): Rethink of display
578 child order to prevent very annoying flickering.
580 2011-02-27 Philippe Brochard <pbrochard@common-lisp.net>
582 * src/clfswm-util.lisp (query-yes-or-no): New function.
584 * src/clfswm-configuration.lisp (reset-all-config-variables): New
585 function and menu entry.
586 (query-conf-value): Add the ability to leave the field blank to
587 reset the variable to its default value.
589 2011-02-26 Philippe Brochard <pbrochard@common-lisp.net>
591 * src/clfswm-configuration.lisp
592 (add-all-configuration-default-value): Add a default value to
593 configurable variables.
595 2011-02-23 Philippe Brochard <pbrochard@common-lisp.net>
597 * src/clfswm.lisp (main-unprotected): Create the configuration
598 menu only once at startup.
600 2011-02-22 Desmond O. Chang <dochang@gmail.com>
602 * contrib/amixer.lisp: Add a volume mode inspired by the emms
603 volume package. Alsa mixer interface.
605 * contrib/volume-mode.lisp: Add a volume mode inspired by the emms
608 2011-02-22 Desmond O. Chang <dochang@gmail.com>
610 * src/clfswm.lisp (main): Use ASDF:SYSTEM-SOURCE-DIRECTORY instead
611 of *LOAD-TRUENAME*. *LOAD-TRUENAME* is only bound during a call to
612 LOAD. If one eval CLFSWM:MAIN in repl, BASE-DIR will be an empty
613 string. Use ASDF:SYSTEM-SOURCE-DIRECTORY to fix it.
615 2011-02-16 Philippe Brochard <pbrochard@common-lisp.net>
617 * src/clfswm.lisp (main-unprotected): Add a close hook. And close
618 the notify window, the virtual keyboard and the clfswm terminal by
621 2011-02-15 Philippe Brochard <pbrochard@common-lisp.net>
623 * src/clfswm.lisp (main-unprotected): Destroy the notify window
624 before closing the display. This fix a bug when resetting/reloading
627 2011-02-12 Philippe Brochard <pbrochard@common-lisp.net>
629 * src/xlib-util.lisp (equal-wm-class-fun, equal-wm-name-fun)
630 (raise-window-fun, raise-and-focus-window-fun): New functions.
632 * src/config.lisp (*clfswm-terminal-cmd*): Switch from xterm to
634 (*never-managed-window-list*): Structure change to be more
635 flexible. Let the choice to focus, raise and do nothing on never
638 2011-02-09 Philippe Brochard <pbrochard@common-lisp.net>
640 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Take
641 care of never managed windows to move or resize them if the raise
644 * src/clfswm-internal.lisp (in-frame, in-window, in-child): New
647 2011-02-08 Philippe Brochard <pbrochard@common-lisp.net>
649 * src/clfswm.lisp (main-mode): Raise or not unmanaged windows
650 following request in *never-managed-window-list*.
652 2011-02-05 Philippe Brochard <pbrochard@common-lisp.net>
654 * *: **** Release 1102 ****
656 2011-02-05 Desmond O. Chang <dochang@gmail.com>
658 * src/keysyms.lisp: Add extended keysyms from stumpwm.
660 2011-02-01 Desmond O. Chang <dochang@gmail.com>
662 * src/clfswm-util.lisp (run-or-raise): New function (thanks to
665 * src/clfswm-internal.lisp (with-all-*): add a nil block.
667 2011-01-28 Desmond O. Chang <dochang@gmail.com>
669 * src/clfswm-util.lisp (xdg-config-home): XDG_CONFIG_HOME should
670 be $HOME/.config by default.
672 2010-12-29 Philippe Brochard <pbrochard@common-lisp.net>
674 * contrib/osd.lisp (display-doc): Add another method where a
675 CLFSWM native window is used to display the key documentation.
677 2010-12-27 Philippe Brochard <pbrochard@common-lisp.net>
679 * src/xlib-util.lisp (with-xlib-protect): Force to revert to the
682 2010-12-25 Philippe Brochard <pbrochard@common-lisp.net>
684 * src/clfswm-second-mode.lisp (second-key-mode): Call the second
685 mode leave function only when the generic mode was ended.
687 2010-12-08 Philippe Brochard <pbrochard@common-lisp.net>
689 * src/clfswm-second-mode.lisp (sm-leave-function): Do not use
690 *second-mode-program* anymore.
692 2010-12-07 Philippe Brochard <pbrochard@common-lisp.net>
694 * src/clfswm-second-mode.lisp (*second-mode-leave-function*): New
695 variable bound to a function executed (when not null) on second
698 2010-11-14 Philippe Brochard <pbrochard@common-lisp.net>
700 * src/clfswm-util.lisp (find-child-under-mouse): Do not find
703 2010-11-13 Philippe Brochard <pbrochard@common-lisp.net>
705 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
706 Do not display the accel window for unmanaged windows.
708 2010-11-11 Philippe Brochard <pbrochard@common-lisp.net>
710 * src/clfswm-internal.lisp (set-current-root): Handle
711 window-parent in set-current-root.
713 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
714 focus the parent child when the current root is a window.
716 2010-11-09 Philippe Brochard <pbrochard@common-lisp.net>
718 * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
719 New function an bindings.
721 * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
724 2010-11-07 Philippe Brochard <pbrochard@common-lisp.net>
726 * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
727 function to let the user choose to keep child position with
730 * src/clfswm-internal.lisp (remove-frame-data-slot): New
733 2010-11-05 Philippe Brochard <pbrochard@common-lisp.net>
735 * src/clfswm-internal.lisp (frame-select-next-child)
736 (frame-select-previous-child): New functions and bindings. Select
737 the next/previous child in the current frame.
739 2010-10-31 Philippe Brochard <pbrochard@common-lisp.net>
741 * src/clfswm-query.lisp (query-mode-complet): New function: Handle
742 completion in query-mode.
744 2010-10-30 Philippe Brochard <pbrochard@common-lisp.net>
746 * src/clfswm-query.lisp (query-print-string): Handle long lines
749 2010-10-27 Philippe Brochard <pbrochard@common-lisp.net>
751 * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
752 all characters are printable.
754 2010-10-25 Philippe Brochard <pbrochard@common-lisp.net>
756 * contrib/server/server.lisp: Load clfswm client code in the main
757 program and let the user start it with a --client command line
760 * src/package.lisp (*main-entrance-hook*): New hook executed after
761 loading configuration file and before opening the display.
763 2010-10-23 Philippe Brochard <pbrochard@common-lisp.net>
765 * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
767 * src/clfswm-internal.lisp (show-child): Show window only if not
770 * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
771 change modifiers after binding definition.
773 2010-10-21 Philippe Brochard <pbrochard@common-lisp.net>
775 * contrib/osd.lisp: New file: OSD (On Screen Display) for
778 * src/clfswm-menu.lisp (open-menu): Modularise function.
780 2010-10-13 Philippe Brochard <pbrochard@common-lisp.net>
782 * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
783 key binding in main and second mode.
785 2010-10-10 Philippe Brochard <pbrochard@common-lisp.net>
787 * src/clfswm-util.lisp (open-notify-window): Convert hello-window
788 functions to a more generic Notify-window system.
790 * src/tools.lisp (add-timer): Add an id to identify the timer.
792 2010-10-09 Philippe Brochard <pbrochard@common-lisp.net>
794 * src/tools.lisp (erase-timer): New function.
796 * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
797 the hello window. Add Configuration variables.
799 2010-10-08 Philippe Brochard <pbrochard@common-lisp.net>
801 * src/clfswm-util.lisp (): Add an Hello window at startup.
803 * src/tools.lisp (process-timers): Add a timer system.
805 2010-10-07 Philippe Brochard <pbrochard@common-lisp.net>
807 * src/clfswm-query.lisp (add-in-query-string): Handle correctly
810 2010-10-06 Philippe Brochard <pbrochard@common-lisp.net>
812 * src/clfswm-query.lisp (query-print-string): Change cursor color
813 and show parenthesis matching with colors (on match and on
816 2010-10-05 Philippe Brochard <pbrochard@common-lisp.net>
818 * src/clfswm-internal.lisp (show-all-children): Do not raise a
819 child when its parent is hidden.
821 2010-10-02 Philippe Brochard <pbrochard@common-lisp.net>
823 * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
824 possibility to circulate over subchild of the current child.
826 * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
827 (expose-windows-generic): Add an escape-body function to return to
828 the original state on escape key.
830 * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
831 to bind the current child from the configuration file.
833 2010-10-01 Philippe Brochard <pbrochard@common-lisp.net>
835 * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
836 window hook: the frame absorb all new windows that match
837 nw-absorb-test frame data slot.
839 2010-09-30 Philippe Brochard <pbrochard@common-lisp.net>
841 * src/clfswm-expose-mode.lisp (expose-create-window): Show window
842 title in accel window.
844 2010-09-29 Philippe Brochard <pbrochard@common-lisp.net>
846 * configure: Use the Xavier Maillard clfswm script in contrib to
847 build an executable in the standard way.
849 2010-09-26 Philippe Brochard <pbrochard@common-lisp.net>
851 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
852 New functions. Add a window on each child in the expose mode to
855 * src/clfswm-internal.lisp (child-x, child-y, child-width)
856 (child-height): New methods to get real child coordinates.
858 2010-09-25 Philippe Brochard <pbrochard@common-lisp.net>
860 * src/clfswm-layout.lisp (*-layout): Use child-position.
862 * src/clfswm-internal.lisp (child-position): New function.
864 * src/clfswm-expose-mode.lisp (expose-windows-mode)
865 (expose-all-windows-mode): Use a generic mode.
867 * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
868 with handle-event-fun symbols instead of inspecting clfswm
869 internals symbols on each mode change.
871 * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
872 a separate clfswm-expose-mode.lisp file.
874 * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
875 screen size instead of hardcoded test coordinates.
877 2010-09-24 Philippe Brochard <pbrochard@common-lisp.net>
879 * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
880 (speed-mouse-right, speed-mouse-up, speed-mouse-down)
881 (speed-mouse-undo, speed-mouse-first-history): New functions to
882 quickly move the mouse. Implemented for the second mode.
884 2010-09-16 Philippe Brochard <pbrochard@common-lisp.net>
886 * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
887 write permission on $clfswm_asd_path. So anybody can start clfswm
888 even if there is no write permission on the source directory.
890 2010-09-12 Philippe Brochard <pbrochard@common-lisp.net>
892 * contrib/clfswm: Add support to cmucl, ccl and ecl.
894 2010-09-11 Philippe Brochard <pbrochard@common-lisp.net>
896 * src/clfswm-util.lisp (set-hide-unmanaged-window)
897 (set-show-unmanaged-window, set-default-hide-unmanaged-window):
898 New functions and menu entry.
899 (set-globally-hide-unmanaged-window)
900 (set-globally-show-unmanaged-window): New functions and menu
903 * src/clfswm-internal.lisp (hide-unmanager-window-p): New
905 (show-child): Add a data slot on frame to hide or not unmanaged
908 * src/clfswm-corner.lisp (present-clfswm-terminal)
909 (present-virtual-keyboard): Use a function (generic-present-body)
910 instead of a macro (generate-present-body).
912 * src/clfswm-util.lisp (update-menus): List all directories and
913 subdirectories in $XDG_DATA_DIRS/applications.
915 2010-09-10 Philippe Brochard <pbrochard@common-lisp.net>
917 * src/clfswm-corner.lisp (generate-present-body): New macro.
918 (present-clfswm-terminal, present-virtual-keyboard): Use
919 generate-present-body.
921 2010-09-09 Philippe Brochard <pbrochard@common-lisp.net>
923 * src/clfswm-util.lisp (update-menus): Follow XDG specifications
924 instead of the non-portable Debian update-menu.
926 2010-09-07 Philippe Brochard <pbrochard@common-lisp.net>
928 * src/clfswm.lisp (error-handler): New function do handle
929 asynchronous errors and ignore them.
930 (open-display): Install the new error-handler on display.
932 2010-09-05 Philippe Brochard <pbrochard@common-lisp.net>
934 * src/xlib-util.lisp (with-xlib-protect): Add a
935 with-simple-restart on top of body execution.
937 2010-09-04 Philippe Brochard <pbrochard@common-lisp.net>
939 * src/clfswm.lisp (main-loop): Protect all xlib functions with an
942 * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
943 handle-event. Add a with-simple-restart to prevent a
944 clisp/new-lisp infinite loop.
946 2010-08-30 Philippe Brochard <pbrochard@common-lisp.net>
948 * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
949 clfswm terminal working even on xterm title changes.
951 2010-08-29 Philippe Brochard <pbrochard@common-lisp.net>
953 * src/clfswm-util.lisp (run-other-window-manager): Update for
956 * src/tools.lisp (do-execute): New parameter io to change the
959 * src/clfswm-util.lisp (hide-current-child): Prevent from removing
962 * src/clfswm-internal.lisp (child-member): New predicate.
963 (child-remove): New function.
965 * src/*.lisp: Use child-member and child-remove everywhere it's
968 2010-08-28 Philippe Brochard <pbrochard@common-lisp.net>
970 * src/clfswm.lisp (main-loop): Ensure that all events have been
971 processed after a process-event.
973 * src/clfswm-internal.lisp (is-in-current-child-p): New function.
975 2010-08-27 Philippe Brochard <pbrochard@common-lisp.net>
977 * src/clfswm.lisp (main-mode:configure-request): Raise the window
978 only when present on the current child and focus it accordingly.
980 2010-08-26 Philippe Brochard <pbrochard@common-lisp.net>
982 * src/clfswm-circulate-mode.lisp (circulate-loop-function):
983 Use is-a-key-pressed-p.
985 * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
987 * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
988 returned by xlib:keysym->keycodes.
990 * src/*.lisp: Use the new child-equal-p to compare children. This
991 prevent a bug with sbcl/cmucl when the standard equal function
992 does not work with xlib:window.
994 * src/clfswm-internal.lisp (child-equal-p): New predicate.
996 2010-08-25 Philippe Brochard <pbrochard@common-lisp.net>
998 * src/clfswm-generic-mode.lisp (generic-mode): Use an
999 xlib:event-listen before processing event with
1000 xlib:process-event. This prevent a bug with CLX threaded
1001 implementation like sbcl.
1003 * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
1004 processing event with xlib:process-event. This prevent a bug with
1005 CLX threaded implementation like sbcl.
1007 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1009 * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
1011 * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
1014 * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
1015 (find-parent-frame, find-frame-window, find-frame-by-name)
1016 (find-frame-by-number): Use with-find-in-all-frames to search in
1017 frames in the right order.
1019 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
1020 unwanted flickering with unmanaged windows.
1022 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
1024 * src/package.lisp: Remove event handler hooks as they're not
1025 needed anymore (To replace them: use closure and define-handler).
1027 * src/xlib-util.lisp (move-window, resize-window)
1028 (wait-mouse-button-release): Use a generic mode.
1030 * src/*.lisp: Replace the case to handle event with a more (tricky)
1031 lispy method which bind a function to each keywords associated
1034 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
1036 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
1037 menu entry between delete-current-child and remove-current-child.
1038 ie: Delete a child and its children in all frames by default.
1040 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
1042 * src/package.lisp: Add a placement configuration group.
1044 * src/binding*.lisp: Bind control+g to escape the current action
1047 * src/clfswm-internal.lisp
1048 (delete-child-and-children-in-all-frames): New function and
1049 binding: Second mode - Control+Delete delete the current child and
1050 its children in all frames (ie: close the current child and its
1053 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
1055 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
1056 the frame window and the frame gc. Close a very annoying bug when
1057 cuting/pasting a frame or moving a child over frames with the
1060 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1061 all children in *current-root* after moving/resizing a frame.
1063 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
1065 * src/clfswm-util.lisp (delete-focus-window)
1066 (destroy-focus-window): Remove child in parent frame before
1069 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1071 * src/clfswm-util.lisp (identify-key): Add a timeout in
1073 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
1074 of the window passed by xlib:process-event.
1076 * src/xlib-util.lisp (move-window, resize-window)
1077 (wait-mouse-button-release): Add a timeout in xlib:process-event.
1079 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1081 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
1082 to launch an other window manager and to return to clfswm.
1084 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
1086 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
1089 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
1091 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
1094 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
1095 parameter and a loop timeout.
1097 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
1099 * src/clfswm.lisp (main): Add an alternate configuration filename
1102 * load.lisp: Add a debuging code example.
1104 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
1106 * src/clfswm-configuration.lisp (create-configuration-menu): New
1107 menu to configure all clfswm variables while clfswm is running.
1109 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
1111 * src/clfswm-util.lisp (save-configuration-variables): New
1112 function to save all configuration variables in clfswmrc.
1114 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
1116 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
1118 (set-default-info-keys): Add cursor key support in info mode.
1120 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
1122 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
1125 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
1126 prevent reading the configuration file (this may be useful to
1127 produce the original documentation without user modifications
1128 with the rc configuration file).
1130 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
1132 * src/bindings-second-mode.lisp (set-default-second-keys):
1133 Simplification of Escape key to close/kill/remove the focus window
1134 and unhide all windows.
1136 * src/bindings.lisp (set-default-main-keys): Simplification of
1137 Escape key to close/kill/remove the focus window and unhide all
1140 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
1141 focus and unhide all windows capabilities.
1143 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1145 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
1147 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
1149 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
1150 Keep child order and don't make unnecessary child movement.
1151 (one-column-layout, one-line-layout): New layouts.
1153 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
1155 * *: **** Release 0906 ****
1157 * contrib/cd-player.lisp: New file to handle the CD player.
1159 * contrib/xmms.lisp: New file to handle the xmms player.
1161 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1163 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
1164 Maximize windows in their frame - Leave frames to their actual
1167 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
1168 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
1170 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
1172 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
1174 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
1176 * contrib/mpd.lisp: Use a standard menu.
1178 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
1180 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
1182 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
1184 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
1186 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
1189 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
1191 * src/config.lisp (get-fullscreen-size): One pixel adjustment
1194 * src/clfswm-placement.lisp (*-child-placement): One pixel
1197 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
1199 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
1200 Ensure that all characters are printable.
1202 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
1205 * src/clfswm-placement.lisp (*-child-placement): Adjust
1206 coordinates to one pixel in the current child.
1208 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1210 * src/clfswm-query.lisp (query-enter-function): Assign font before
1211 width and height calculation.
1213 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1215 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
1216 bannish the pointer in an arbitrary place.
1218 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
1219 place the info window in an arbitrary place.
1221 * src/clfswm-query.lisp (query-enter-function): Use with-placement
1222 macro to place the query window in an arbitrary place.
1224 * src/clfswm-placement.lisp: New file. Allow to place info windows
1225 or query windows on an arbitrary place. Allow to bannish the
1226 pointer on an arbitrary place.
1228 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
1230 * src/clfswm-circulate-mode.lisp (reorder-child)
1231 (reorder-brother): Unfocus windows before reordering children or
1234 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1236 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
1237 the parent is a frame.
1239 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
1240 motion with a default modifier.
1242 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
1245 * src/clfswm-info.lisp (info-mode): Handle motion with a default
1247 (info-mode): Optimization in loop function.
1249 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1251 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
1252 root-frame correctly.
1254 * clfswm.asd: Dependency fix for clfswm-generic-mode.
1256 * src/clfswm-circulate-mode.lisp (reorder-child)
1257 (reorder-brother): Handle empty frames.
1258 (reorder-brother): Redisplay only the parent frame of the current
1261 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
1262 parent frame of the current frame.
1264 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
1266 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
1267 Maximize/Unmaximize the current frame in its parent frame.
1269 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
1270 windows and frames in their parent frame.
1272 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1274 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
1276 * src/clfswm-circulate-mode.lisp (reorder-child)
1277 (reorder-brother): Reinitialise on circulate type change
1278 child to brother or brother to child.
1280 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
1281 calls xlib:display-finish-output on each map-request. So speed up
1284 * src/xlib-util.lisp (map-window): New function. Call
1285 xlib:display-finish-output on each map request.
1287 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1289 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
1290 Optimisation when drawing second mode window.
1292 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1294 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
1297 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1299 * src/clfswm-util.lisp (run-program-from-query-string): Launch
1300 command only with a return validation.
1302 2009-04-22 Xavier Maillard <xma@gnu.org>
1304 * src/clfswm-query.lisp (query-string): Use a generic mode.
1306 2009-04-19 Xavier Maillard <xma@gnu.org>
1308 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
1310 2009-04-18 Xavier Maillard <xma@gnu.org>
1312 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
1313 to define all other modes.
1315 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1317 * src/package.lisp (): Use *default-font-string* for all
1320 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
1322 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
1324 * src/xlib-util.lisp (null-size-window-p): Better check of null
1327 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
1329 * src/clfswm.lisp (handle-map-request): Add a fix to manage
1330 correctly fullscreen windows (SDL particularly).
1332 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
1334 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
1335 a segfault with clisp/new-clx.
1337 * src/clfswm.lisp (handle-motion-notify): Add a needed window
1340 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
1341 needed window argument.
1343 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
1345 * src/xlib-util.lisp (wait-no-key-or-button-press)
1346 (wait-a-key-or-button-press): Check buttons press/release correctly"
1348 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
1350 * src/menu-def.lisp: Add children navigation menu in the movement
1351 menu (select next/previous child/brother/level).
1353 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
1355 * *: Rename 'sister' frame to 'brother' frame.
1357 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
1358 alias in a real modifier.
1360 * src/package.lisp (*modifier-alias*): New list of modifier alias
1361 For example: :alt is :mod-1, :numlock is :mod-2...
1363 * src/tools.lisp (remove-hook): New function.
1365 * src/clfswm-keys.lisp (with-capslock, without-capslock)
1366 (with-numlock, without-cnumlock): New functions.
1368 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
1370 * src/clfswm-info.lisp: Use the *binding-hook* to create info
1371 keys and mouse bindings.
1373 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
1374 second keys and mouse bindings.
1376 * src/bindings.lisp: Use the *binding-hook* to create main keys
1379 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1381 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
1384 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
1386 * src/menu-def.lisp: Use a menu instead of a function for the
1389 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
1391 * src/clfswm-util.lisp (show-standard-menu): Display the standard
1392 menu from the 'update-menus' command.
1394 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
1396 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
1397 it's already grabbed.
1399 * src/clfswm-internal.lisp (display-frame-info): Use configurable
1400 colors and fix a bug with background.
1401 (display-frame-info): Set window background when displaying info.
1403 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1405 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
1406 warning with clisp/new-clx.
1408 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
1410 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
1413 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1415 * *: **** Release 0809 ****
1417 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1419 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
1421 (ensure-unique-number): New function and menu entry.
1423 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
1425 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
1426 hook: open the next window in a named frame.
1427 (numbered-frame-nw-hook): New new window hook: open the next
1428 window in a numbered frame.
1430 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
1431 cases. So query-string can be called even in the main mode.
1433 * src/clfswm-internal.lisp (show-all-children): Do not raise a
1434 child by default => far less flickering.
1436 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
1438 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
1440 * src/menu-def.lisp: Change key binding for the CLFSWM menu
1443 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
1444 is nil. (workaround on some CLX implementation).
1446 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
1448 * src/menu-def.lisp: Add a menu to set a focus policy for all
1451 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
1452 (all-frames-set-*-focus-policy): Set a focus policy for all
1455 * src/clfswm.lisp (handle-enter-notify): sloppy-select
1456 mode. Select a child and its parents on mouse over.
1458 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
1460 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
1461 policy -> Sloppy focus only for windows in the current frame.
1462 (main-unprotected): Exit clfswm on init error (ie: when another
1463 window manager is running).
1465 * src/clfswm-util.lisp (reset-clfswm): New function.
1467 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
1469 * src/clfswm-menu.lisp (init-menu): New function.
1471 * src/clfswm-util.lisp (reload-clfswm): New function to reload
1473 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
1475 * src/clfswm.lisp (main, main-unprotected): Handle error in a
1476 superior main function. Now CLFSWM can't break the X session. It
1477 just reinitialize the display and run a new main loop.
1479 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
1480 *vt-keyboard-on* global to avoid warnings when loading clfswm.
1482 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
1483 (help-on-gimp-layout): Describe how to use the GIMP layout.
1485 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
1487 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
1488 main-window-right-layout. Change the keybinding for (shift)alt+tab
1489 to not select windows in the main window lisst.
1490 Bind F8 to add a window in the main window list.
1491 Bind F9 to remove a window in the main window list.
1492 Change the focus policy to :sloppy.
1493 (set-previous-layout): Restore the previous layout, keybinding and
1496 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
1498 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
1500 * src/clfswm-layout.lisp (main-window-left-layout)
1501 (main-window-bottom-layout, main-window-top-layout): New
1503 Factorize layouts in menu.
1505 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
1507 * src/clfswm-layout.lisp (main-window-right-layout): A possible
1508 GIMP layout: one or more main windows on one side of the
1509 frame. Others on the other size.
1511 * src/clfswm-util.lisp
1512 (current-frame-set-click/sloppy-focus-policy): Each frame can have
1513 a different focus policy (one of :click or :sloppy).
1514 The default focus policy is set with *default-focus-policy*.
1516 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
1518 * src/clfswm-info.lisp (show-config-variable): New function.
1520 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
1522 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
1524 * src/clfswm-info.lisp: Colored help for key binding and corners
1527 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
1529 * src/clfswm-util.lisp (delete-focus-window)
1530 (destroy-focus-window): Remove chid only in
1531 handle-unmap/destroy-notify. Focus *current-root* only when
1532 closing/killing the current child.
1534 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
1535 functions or corners.
1537 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1539 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
1540 action: Hide/Unhide a terminal on mouse corner action. (By default
1541 right mouse button on the top left corner).
1543 * src/config.lisp (*never-managed-window-list*): New config
1546 * src/clfswm-internal.lisp (never-managed-window-p): New function:
1547 Handle never managed window in a more simple way.
1549 * src/clfswm-corner.lisp: New file and new and more simple method
1550 to define corners actions.
1552 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
1554 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
1556 * src/clfswm-layout.lisp (fast-layout-switch)
1557 (define-fast-layout-switch): New functions: Switch between two
1560 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
1561 really in the second mode. So leave-second-mode can be used even
1564 * src/clfswm-util.lisp (switch-to-last-child): New function:
1565 Store the current child and switch to the previous one.
1567 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1569 * src/clfswm-util.lisp (display-current-window-info): Display the
1571 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
1572 (top right by default). By default 'xvkbd' is used.
1574 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1576 * src/xlib-util.lisp (move-window, resize-window): Compress motion
1579 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
1581 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
1584 * src/clfswm-info.lisp (info-mode): Compress motion events.
1586 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
1588 * src/clfswm-internal.lisp (show-all-children): Compute geometry
1589 and selection first and then show only necessary children.
1590 (show-child): remove unneeded display-p parameter.
1592 * src/config.lisp (get-fullscreen-size): Place the frame border
1593 outside the screen (this prevent the loose of 2 pixels per
1596 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
1598 * src/clfswm-internal.lisp (focus-child): Algorithm change to
1599 raise only the selected child.
1601 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
1603 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
1604 Raise only viewable children.
1606 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
1608 * src/clfswm-internal.lisp (show-all-children): Always raise all
1609 displayed children. Remove all references to raise-p.
1611 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1613 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
1616 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
1617 second mode binding on raise/lower child in its frame.
1619 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
1620 behaviour to the new raise/lower property.
1621 Call clear-nw-hook before the rest of the hook.
1623 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
1624 (mouse-click-to-focus-and-resize-window): Stop button event. This
1625 prevent a keyboard/pointer freeze.
1627 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1629 * src/clfswm-internal.lisp (frame-lower-child)
1630 (frame-raise-child): New functions to raise/lower a child in its
1633 * src/clfswm-util.lisp (have-to-present-windows)
1634 (have-to-present-all-windows): New functions to have an MaxOS
1635 expose like on mouse click in screen corner.
1637 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
1639 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
1641 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
1642 child from a choice in all frames with hidden children.
1644 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
1646 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
1648 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
1649 (unhide-all-children): New functions.
1651 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
1654 * src/clfswm-util.lisp (hide/show-frame-window): new function and
1657 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
1659 * src/clfswm-util.lisp (rename-current-child): Do not display the
1660 frame info for a window.
1662 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
1664 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
1665 frame window for the removed child and its children.
1667 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
1669 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
1672 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
1674 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
1675 the ROX pinboard (ie: leave it lowered in the root window as
1678 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
1679 (tile-left-layout, tile-right-layout, tile-top-layout)
1680 (tile-bottom-layout): Use all the frame space when there is only
1683 * src/clfswm-internal.lisp (place-window-from-hints): Center
1684 unmanaged windows in the root screen.
1686 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
1689 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1691 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
1692 typo in managed types.
1694 * src/clfswm-internal.lisp (show-child): Always display frame info
1695 even if the frame is hidden.
1697 * src/xlib-util.lisp (resize-window): Use a better algorithme to
1700 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1702 * src/clfswm-util.lisp (with-movement): Display frame info for all
1703 frames in current root.
1705 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1707 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
1709 * src/bindings-second-mode.lisp (define-second-key #\a): New
1710 binding on 'add-default-frame'.
1712 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1713 message to follow the autodocumentation process.
1715 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1717 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1718 "Space" to jump to a child. "B" to bind a slot on the current
1721 * src/bindings-second-mode.lisp: Use "Tab" instead of
1724 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
1726 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1727 unmanaged (hidden) windows.
1729 * src/clfswm-internal.lisp (place-window-from-hints): Give a
1730 minimal size for windows.
1731 (with-all-windows-frames-and-parent): New function.
1733 * src/config.lisp (*default-window-width/height*): New parameters.
1735 * src/clfswm-internal.lisp (place-window-from-hints): Center
1736 windows in the screen instead of in their frame.
1738 * src/bindings-second-mode.lisp (tile-space-current-frame): New
1741 * src/clfswm-layout.lisp (register-layout): Intern the once name
1742 in the right package.
1744 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1746 * doc/dot-clfswmrc: Update to follow the new clfswm way.
1748 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
1750 * src/clfswm-internal.lisp (set-current-child)
1751 (adapt-child-to-parent, show-child, hide-child): Handle the case
1752 where child is not a frame or a window.
1754 * src/clfswm-util.lisp
1755 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1756 Check if child is a frame.
1758 * src/clfswm-internal.lisp (managed-window-p): Handle the case
1759 where frame is null.
1760 (place-frame): Check if frame and parent are frames.
1762 * src/clfswm-info.lisp (info-mode): display all frame info before
1765 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1766 info before leaving.
1768 * src/clfswm-internal.lisp (display-all-frame-info): New function.
1770 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
1772 * src/tools.lisp (getenv): Implemented for ECL.
1773 (urun-prog): Implemented for ECL.
1775 * src/clfswm-util.lisp (identify-key): Use a double buffer to
1778 * src/clfswm-query.lisp (query-string): Use a double buffer to
1781 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1784 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1787 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
1789 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1791 * src/menu-def.lisp: New file: move all menu definition in
1794 * src/clfswm-layout.lisp (register-layout): Use a function instead
1797 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
1799 * src/clfswm-autodoc.lisp (produce-menu-doc,
1800 (produce-menu-doc-html): New functions.
1801 (produce-doc-*): Moved to clfswm-autodoc.lisp.
1803 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1804 paste a child on one of its own children. (this prevent a
1806 (move-child-to): Rename move/copy-current-child-by to
1808 (mouse-move-window-over-frame): New function to move the window
1809 under the mouse cursor to another frame.
1811 * src/clfswm-internal.lisp (find-child-in-parent): New function.
1813 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1815 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1816 windows only when its window parent is the current child.
1818 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1820 * src/clfswm-util.lisp (manage-current-window)
1821 (unmanage-current-window): New functions: Allow to force to manage
1822 or unmanage a window by its parent frame.
1824 * src/bindings-second-mode.lisp (#\o): binded to
1825 set-open-in-new-frame-in-parent-frame-nw-hook and
1826 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1828 * src/clfswm-util.lisp (with-current-window): New macro.
1830 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1831 exposure and enter-window handle event.
1833 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1834 children for the current child after the move/resize.
1836 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1838 * src/xlib-util.lisp (resize-window): Take care of window size
1841 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1842 move/resize unmanaged windows.
1844 * src/xlib-util.lisp (move-window, resize-window): New functions.
1846 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1848 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1849 user choose what window type the current frame must handle.
1850 (display-current-window-info): New function.
1851 (current-frame-manage-all-window-type)
1852 (current-frame-manage-only-normal-window-type)
1853 (current-frame-manage-no-window-type): New functions.
1855 * src/clfswm-internal.lisp (managed-window-p): New function.
1857 * src/package.lisp (frame): Managed type: new frame
1858 parameter. This allow to choose what window type a frame must
1861 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1863 * src/clfswm-nw-hooks.lisp
1864 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1866 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1869 * src/tools.lisp (ensure-printable): Return always a string even
1872 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
1874 * src/config.lisp (*default-nw-hook*): New variable to change the
1875 default new window hook.
1877 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1879 * clfswm.asd (clfswm): Add a dependency from
1880 clfswm-second-mode.lisp to clfswm.lisp.
1882 * src/clfswm-util.lisp (identify-key): Show the documentation for
1883 the function bound on a key.
1884 (with-movement): Move with-movement,
1885 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
1886 to clfswm-util.lisp.
1888 * src/clfswm-menu.lisp: New menu system that let user change keys
1889 or functions associated to keys.
1891 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
1893 * src/clfswm-internal.lisp (show-all-children): Display-child is
1894 the first child by default. Solve a bug with father-p.
1896 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
1898 * src/clfswm-internal.lisp (add-frame): Add frame return the
1900 (show-all-children): Move the size computation outside the
1903 * src/bindings-second-mode.lisp (with-movement): Redisplay only
1906 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1907 only the current child.
1909 * src/clfswm-internal.lisp (show-all-children): New display-child
1910 parameter to display only the desired child and its children.
1911 (select-next/previous-child): Only display the current child.
1913 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
1915 * src/clfswm.lisp (init-display): Move the default frame creation
1916 on the default init hook.
1918 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1919 the main mode (for example: "1" on an azerty keyboard).
1921 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
1923 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1924 keysyms. Revert to old grabbing method for the main mode.
1926 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
1928 * src/clfswm.lisp (init-display): Add key handling on no focus
1929 window and on frame windows.
1931 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1933 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1934 all keys by default and replay just what is needed. No change for
1937 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1938 (find-key-from-code): Test for shift and not shift presence.
1940 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
1942 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1943 new key parameter to have less flickering.
1945 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
1947 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1948 layout only one time and revert to no-layout to freely handle
1951 * src/clfswm-nw-hooks.lisp
1952 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1953 with new created window.
1955 * src/clfswm-layout.lisp (register-layout): Now register
1956 automatically a once layout to set the layout only one time and
1957 revert to no-layout to freely handle frames.
1959 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1961 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1962 nw-hook: Open the next window in the current frame and leave the
1963 focus to the current child.
1965 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
1967 * src/bindings-second-mode.lisp: Add keys definitions to
1968 bind-or-jump in the second mode.
1970 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
1971 macro for bind-or-jump-(1|2|3...).
1973 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
1974 arguments to function. This allow to do things like:
1975 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
1976 are passed to my-function on key press.
1978 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
1980 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
1982 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
1984 * src/clfswm-internal.lisp (child-fullname): New function
1986 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
1987 docstring in info-mode-menu. An item can be
1988 '((key function) (key function)) or with docstring
1989 '((key function "documentation 1") (key function "bla bla") (key function))
1991 * src/tools.lisp (ensure-n-elems): New function.
1993 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
1994 resize a frame or the window's father.
1996 * src/clfswm.lisp (init-display): Remove tile-space-layout by
1997 default on the root frame.
1999 * src/clfswm-util.lisp (move/resize-frame): Add standard event
2000 hooks handlers (map-request, configure-notify...)
2002 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
2005 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
2007 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
2008 or the window's father.
2010 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
2011 event only if there is a geometry change.
2012 (mouse-focus-move/resize-generic): Generic function to move or
2013 resize a frame or a window father frame.
2015 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
2017 * src/clfswm-internal.lisp (show-all-children): Return t if there
2018 is a geometry change.
2020 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
2022 * src/bindings.lisp (Up/Down): Swap select previous/next level.
2024 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
2026 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
2028 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
2029 (with-all-*): Reverse the child list to manage the first child last (like in
2032 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
2033 root window only if true.
2035 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
2036 root window only if *create-frame-on-root* is true.
2038 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
2041 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
2043 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
2044 the current child (even if it's a window).
2046 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
2048 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
2049 (mouse-click-to-focus-and-resize): New functions.
2051 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
2052 (*-px->fl): Convert pixel coordinates to float.
2054 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
2056 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
2058 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
2061 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
2062 and hide-all-children.
2063 (raise-if-needed): New function.
2064 (show-child): Use a first-p parameter to raise windows only when they are
2067 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
2069 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
2072 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
2074 * src/clfswm-info.lisp (keys-from-list): new function.
2076 * src/*: rename 'childs' in 'children'.
2078 * src/*: rename 'group' in 'frame'.
2080 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
2082 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
2084 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
2086 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
2088 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
2090 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
2091 Bind control+o to open the next window in a new group in the root group
2092 (as open in next window in a new workspace in 0801 version).
2094 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
2096 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
2099 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
2101 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
2102 instead of Tab for select-previous-child.
2104 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
2106 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
2109 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
2111 * clfswm-util.lisp (identify-key): Display the documentation
2112 associated to keys when identifying a key.
2114 2008-03-10 Xavier Maillard <xma@gnu.org>
2116 * contrib/clfswm: Complete rewrite of the script. Detect error and
2117 act accordingly. Add command line arguments to configure the
2118 script execution. User can now choose different common lisp
2119 implementation (clisp and sbcl only), choose where to store the
2120 dumped image, where to find clfswm source.
2122 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
2124 * clfswm-internal.lisp (process-new-window): Beginning of new
2125 window hook: each group have a hook to tell what he wants to do
2126 with the new created window.
2128 2008-03-08 Xavier Maillard <xma@gnu.org>
2130 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
2131 call the resulting executable.
2133 * clfswm.lisp (read-conf-file): Check for the user config file in
2134 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
2135 prefered whenever possible.
2137 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
2139 * clfswm-layout.lisp (*-layout): Add an optional raise-p
2140 parameter in each layout.
2142 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2144 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
2146 (copy/move-current-child-by-name/number): new functions
2147 (focus-group-by-name/number): new functions
2148 (delete-group-by-name/number): new functions
2150 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2152 * ************************************************************ *
2153 *: Major update - No more reference to workspaces. The main *
2154 structure is a tree of groups or application windows. *
2155 * ************************************************************ *
2157 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
2159 * clfswm.lisp (read-conf-file): Read configuration in
2160 $HOME/.clfswmrc or in /etc/clfswmrc or in
2161 $XDG_CONFIG_HOME/clfswm/clfswmrc.
2162 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
2165 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
2167 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
2170 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
2172 * clfswm-internal.lisp (find-window-group): New function.
2174 * clfswm*: Change to make clfswm run with clisp/new-clx.
2176 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
2178 * clfswm-util.lisp (query-show-paren): Add show parent matching in
2180 (query-string): Bind control+k to delete end of line.
2182 * clfswm-second-mode.lisp (draw-second-mode-window): Display
2183 the action on mouse motion in second mode.
2185 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
2186 event but do not clear the root window.
2187 (handle-configure-request): Adjust unmanaged window from their
2190 * clfswm-internal.lisp (process-new-window): Adjust new window
2191 with the specified hints (max/min/base width/height).
2193 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
2195 * clfswm.lisp (handle-configure-request): Send an Configuration
2196 Notify event. This solve a bug with xterm and rxvt who takes some
2197 times to be mapped. Now there is no delay.
2199 * bindings-second-mode.lisp (define-shell): Run programs after
2200 living the second mode.
2202 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
2204 * clfswm-internal.lisp (process-new-window): Do not crop transient
2205 window to group size.
2206 (adapt-window-to-group): Do not crop transient window to group
2209 * clfswm.lisp (handle-configure-request): Adapt just the window to
2210 its group and don't take care of the configure request. Remove the
2211 bug with the Gimp outside the group and speed up the window
2213 (handle-exposure): Remove show-all-group on exposure event
2216 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
2218 * clfswm-util.lisp (circulate-group-up-copy-window)
2219 (circulate-group-down-copy-window)
2220 (circulate-workspace-up-copy-group)
2221 (circulate-workspace-down-copy-group): Prevent the copy of the
2222 same window in the same workspace.
2224 * bindings-second-mode.lisp (release-copy-selected-window)
2225 (release-copy-selected-group): Prevent the copy of the same window
2226 in the same workspace.
2228 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
2229 (generic-pager-move-window-on-next-line): Remove the copy
2231 (generic-pager-move-group-on-next-workspace)
2232 (generic-pager-move-group-on-previous-workspace): Prevent the copy
2233 of the same window in the same workspace.
2235 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
2236 (mouse-pager-copy-selected-group-release): Prevent the copy of the
2237 same window in the same workspace.
2239 * tools.lisp (setf/=): new macro to set a variable only when
2242 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
2243 x, y... only when necessary.
2245 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
2247 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
2248 new function and hook: force windows to stay in its group (solve a
2251 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
2253 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
2254 less flickering when moving/resizing groups.
2256 * clfswm-internal.lisp (hide-group): new function.
2257 (show-all-group): clear-all: new parameter.
2259 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
2261 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
2263 * clfswm*: Color change for the pager. Typo or better description
2264 in bindings definitions. Define bindings for a qwerty keyboard by
2265 default. dot-clfswmrc show examples to switch to an azerty
2267 License change to GPL v3.
2268 * config.lisp: new file - group all globals variables in this
2271 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
2273 * xlib-util.lisp (hide-window): Remove structure-notivy events
2274 when hidding a window.
2276 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
2278 * package.lisp (*sm-property-notify-hook*): Readded
2279 property-notify-hook in second mode.
2281 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
2283 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
2285 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
2287 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
2288 Tile the current workspace with the current window on one side and
2289 others on the other (this emulate the larswm, dwm, wmii way). See
2290 the default configuration file to enable this mode by default.
2292 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
2295 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
2297 * clfswm-pager.lisp (pager-draw-window-in-group): Add
2298 ensure-printable to print windows name even with non-ascii
2301 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
2303 * clfswm-pager.lisp (pager-explode-current-group): Create a new
2304 group for each window in group.
2305 (pager-implode-current-group): Move all windows in workspace to
2306 one group and remove other groups.
2308 * clfswm-pack.lisp (explode-group): Create a new group for each
2310 (implode-group): Move all windows in workspace to one group and
2311 remove other groups.
2313 * clfswm-util.lisp (identify-key): Remove local configuration
2314 variables and made them available for configuration from
2316 (query-string): idem.
2318 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
2320 * netwm-util.lisp: Start of NetWM compliance.
2321 Add a Netwm client list gestion.
2323 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
2325 * clfswm-internal.lisp (create-group-on-request): open a new group
2326 only when the current group is not empty.
2328 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
2329 bug with null workspace.
2331 * clfswm-pager.lisp (pager-handle-event): Add a hook
2332 system. This hooks can be changed in the user configuration file.
2334 * package.lisp: All colors and font variables are set in
2335 package.lisp and can be configured in the user configuration
2337 Note: If you have configured some less ugly colors (esp. for the
2338 pager) don't hesitate to let me know :)
2340 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
2341 system. This hooks can be changed in the user configuration file.
2343 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
2344 changed in the user configuration file (~/.clfswmrc)
2346 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
2348 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
2349 arrow action, open next window in new workspace/group.
2351 * bindings.lisp (stop-all-pending-actions): new binding.
2352 (open-next-window-in-new-group-once): Open the next windows in a
2353 new group (only once) or open all new windows in a new group (like
2354 others windows managers).
2356 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
2358 * clfswm.lisp (read-conf-file): New function to read a lisp
2359 configuration file at startup.
2360 (focus-group-under-mouse): Check if group isn't the current group
2361 ( prevent a bug with unclutter ).
2363 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
2365 * bindings.lisp (run-program-from-query-string): A program can be
2366 launch from a input query window.
2368 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
2370 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
2372 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
2374 * clfswm.lisp (process-new-window): One can now open the next
2375 window in a workspace called by its number.
2377 * clfswm-util.lisp (query-font-string): Minimal editing
2379 (eval-from-string): And an REPL in the window manager... :)
2381 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2383 * clfswm.lisp (process-new-window): One can now open the next
2384 window in a new workspace or a new group.
2386 * clfswm-pager.lisp (pager-mode): Display the next arrow action
2387 with the hidden windows.
2389 * clfswm.lisp (second-key-mode): Display the current workspace
2390 number and the next arrow action in the state window.
2392 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
2393 the pager mode and then redisplay only the current workspace.
2395 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
2397 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
2398 they can be focused with a keypress, sorted or renumbered.
2400 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2402 * clfswm-pager.lisp (pager-mode): Remove multiple silly
2403 pager-draw-display. This prevent a lot of flickering in the
2406 * clfswm.lisp: Remove all display-force-output and replace them
2407 with only one display-finish-output in the event loop.
2409 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
2411 * clfswm-pager.lisp (pager-center-group): New function - center a
2412 group at the middle of the screen.
2414 * clfswm-pack.lisp (center-group): New function - center a group
2415 at the middle of the screen.
2417 * clfswm.lisp (show-group): Add a cross line under the group.
2418 (show-group): Group are showned even if fullscreened.
2419 (init-display): Add an exposure event on the root window.
2421 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
2423 * package.lisp (*default-group*): Default group is the same size
2424 of a fullscreened group.
2426 * bindings*: Use shift to move, control+shift to copy.
2428 * *.lisp: Add comments for configuration or alternatives. So grep
2429 for CONFIG to see where you can configure clfswm. And grep for
2430 Alternative to use some commented code.
2432 * clfswm.lisp (second-key-mode): Use a single window to show the
2433 second mode. See for alternatives at the end of this file.
2435 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
2437 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
2438 macro of key and mouse definitions.
2439 (define-define-key/mouse): Use state instead of modifiers list
2440 this fix a bug when the modifiers list is not in the rigth order.
2442 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
2444 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
2446 * clfswm-info.lisp (info-mode): Add an info mode.
2448 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
2450 * clfswm.lisp (process-new-window): Change border size for
2452 (show-all-windows-in-workspace): Unhide all windows even when the
2453 current group is in fullscreen mode.
2455 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
2457 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
2458 redisplay the identify window after a terminal switch.
2460 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
2461 redisplay the pager after a terminal switch.
2463 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
2465 * clfswm-util.lisp (identify-key): Add a window to display
2466 the keys to identify on screen.
2468 * bindings.lisp, bindings-pager.lisp: Define same keys to
2469 move/copy groups/windows in second mode and in pager.
2471 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
2473 (show-all-windows-in-workspace): unhide window before adapting it
2476 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
2478 * clfswm.lisp (handle-event): Revert to an older version.
2480 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
2482 * clfswm-util.lisp (force-window-in-group)
2483 (force-window-center-in-group): New functions for transient windows.
2485 * clfswm-pager.lisp (pager-remove-current-workspace/group):
2486 bugfix: hide all windows before removing group or workspace.
2488 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
2490 * bindings-pager.lisp (mouse-pager-move-selected-group)
2491 (mouse-pager-copy-selected-group)
2492 (mouse-pager-move-selected-window)
2493 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
2494 (mouse-pager-rotate-window-down): New functions to have mouse in
2497 * clfswm-pager.lisp (pager-swap-window)
2498 (pager-copy-group-on-next/previous-workspace)
2499 (pager-copy-window-on-next/previous-line): New functions
2501 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
2503 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
2504 (pager-move-group-on-next/previous-workspace): new functions.
2506 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
2507 to its half size (new functions).
2509 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
2511 * clfswm-pager.lisp: workspaces, groups and windows can now be
2512 selectionned with the keyboard or the mouse.
2514 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
2516 * clfswm-pager.lisp (pager-select-workspace-right/left):
2517 workspaces can now be selectionned with the keyboard.
2519 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
2521 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
2522 new function to remove a previous defined key or mouse combination.
2524 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
2526 * clfswm.lisp (main): Check for access error in init-display.
2528 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
2529 keycode before grabbing.
2531 * bindings.lisp: Remove nlambda and use defun to keep the function
2532 documentation with clisp.
2533 (define-shell): new macro to define shell command for the second
2536 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
2538 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
2541 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
2543 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
2544 workspace circulation.
2546 * clfswm-util.lisp (absorb-orphan-window): new function.
2548 * clfswm-keys.lisp: Keysyms support.
2550 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
2552 * clfswm.lisp (show-group): Use one gc for all groups and not one
2555 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
2557 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
2559 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
2560 width and height outside group.
2562 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
2564 * clfswm.lisp: First public release.