1 2012-05-17 Philippe Brochard <pbrochard@common-lisp.net>
3 * src/clfswm-util.lisp (exchange-root-geometry-with-mouse): New
6 2012-05-16 Philippe Brochard <pbrochard@common-lisp.net>
8 * src/menu-def.lisp: New root menu.
10 2012-05-15 Philippe Brochard <pbrochard@common-lisp.net>
12 * src/clfswm-circulate-mode.lisp (rotate-root-geometry-next)
13 (rotate-root-geometry-previous): New second mode binding to change
16 2012-05-13 Philippe Brochard <pbrochard@common-lisp.net>
18 * src/clfswm-internal.lisp: Remove the *current-child* variable
19 and use a setfable function (current-child) instead.
20 (current-child-setter): Store root current child before apllying
23 2012-05-09 Philippe Brochard <pbrochard@common-lisp.net>
25 * src/clfswm-internal.lisp: Use xdpyinfo/xinerama informations
26 instead of xrandr informations.
28 2012-05-06 Philippe Brochard <pbrochard@common-lisp.net>
30 * src/clfswm-internal.lisp : Use only one list for root
32 (*root*): Root management API simplification.
34 2012-04-30 Philippe Brochard <pbrochard@common-lisp.net>
36 * src/clfswm-internal.lisp: Big change to replace *current-root*
37 variable to support multiple root.
39 2012-04-18 Philippe Brochard <pbrochard@common-lisp.net>
41 * src/tools.lisp (add-new-hook, add-hook): New macro. Do not
42 duplicate hooks by default. Use add-new-hook if you want to
45 2012-04-16 Philippe Brochard <pbrochard@common-lisp.net>
47 * src/clfswm-corner.lisp (wait-window-in-query-tree): Add a limit
48 of try to wait the command window.
50 2012-02-25 Philippe Brochard <pbrochard@common-lisp.net>
52 * src/clfswm-util.lisp (place-frames-from-xrandr)
53 (swap-frame-geometry, rotate-frame-geometry): New helper functions
54 for multiple physical screen.
55 (jump-to-slot, add-frame-in-parent-frame): Change *current-root*
58 2012-01-18 Philippe Brochard <pbrochard@common-lisp.net>
60 * src/*.lisp: Use create-symbol and create-symbol-in-package
61 instead of the shorter symb. (Thanks Aad Versteden).
63 * src/bindings-second-mode.lisp (set-default-second-keys): New
64 key binding to set window and frame transparency.
66 * src/bindings.lisp (set-default-main-mouse): New mouse binding to
67 set window and frame transparency.
69 * src/clfswm-keys.lisp (define-keys): New macro to ease multiple
70 keys definitions. (Thanks Valentin Plechinger for the request).
72 * src/*.lisp: Add full transparency support with xcompmgr.
74 2012-01-14 Philippe Brochard <pbrochard@common-lisp.net>
76 * src/*.lisp: Add transparency support.
78 2012-01-09 Ales Guzik <ales.guzik@gmail.com>
80 * src/clfswm-layout.lisp (tile-layout-mix): New layout to
81 automatically choose between vertival and horizontal tile layout.
82 (tile-space-layout): Fix to have space between screen border and
83 frame the same as between frames.
85 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
87 * load.lisp: Support clisp 2.49+ module system to load CLX.
89 2012-01-04 Ales Guzik <ales.guzik@gmail.com>
91 * src/clfswm-layout.lisp (update-layout-managed-children-keep-position):
92 Fix an inattention error.
94 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
96 * src/xlib-util.lisp (with-xlib-protect): Protect from
97 xlib:lookup-error. This prevent an error in clisp/new-clx when
98 sometimes an xlib:colormap is expected instead of an xlib:window.
100 2012-01-03 Philippe Brochard <pbrochard@common-lisp.net>
102 * src/xlib-util.lisp (handle-event): Fix a clisp/new-clx error
103 when sometimes window slot of event-slots is a pixmap instead of a
106 2011-12-26 Philippe Brochard <pbrochard@common-lisp.net>
108 * src/clfswm-query.lisp: Fill the history list with a non-nil
111 2011-12-25 Philippe Brochard <pbrochard@common-lisp.net>
113 * src/package.lisp (make-x-drawable): Drawable wrapper to prevent
114 type error in some CLX versions.
115 Replace xlib:drawable-* functions with x-drawable-* equivalents
117 2011-12-14 Philippe Brochard <pbrochard@common-lisp.net>
119 * src/clfswm-util.lisp (um-create-xdg-section-list): Add at least
120 the 'Utility menu entry.
122 * src/config.lisp (*xdg-section-list*): moved to config.lisp.
124 * src/clfswm-util.lisp (update-menus): Set a default value for
125 searching .desktop files when XDG_DATA_DIRS is not set.
127 2011-10-15 Philippe Brochard <pbrochard@common-lisp.net>
129 * src/clfswm-internal.lisp (place-window-from-hints): Use
130 with-placement macro to place unmanaged windows in an arbitrary
133 2011-06-16 Philippe Brochard <pbrochard@common-lisp.net>
135 * src/clfswm-internal.lisp (clean-windows-in-all-frames): Prevent
136 current root and current child being equal to child.
138 2011-06-13 Philippe Brochard <pbrochard@common-lisp.net>
140 * src/keysyms.lisp: Repeat Page_Down/Up keysym definitions at the
141 end of the file to change keysyms priority.
143 2011-06-13 Sylvain HENRY <hsyl20@gmail.com>
145 * *.*: Minor spelling fix.
147 2011-06-12 Philippe Brochard <pbrochard@common-lisp.net>
149 * src/clfswm.lisp (:unmap-notify, :destroy-notify): Show all
150 children just after the xlib tree cleanup -> reduce the
151 flickering when a window is deleted or destroyed.
153 * src/clfswm-internal.lisp (process-existing-windows): Do not
154 process the notify window.
156 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
158 * *: **** Release 1106 ****
160 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
162 * src/clfswm-internal.lisp (clean-windows-in-all-frames): New
163 function to prevent xlib error when a window is deleted.
165 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
167 * src/clfswm-internal.lisp
168 (delete-child-and-children-in-all-frames): Delete or destroy
169 children before displaying all children.
171 2011-06-05 Philippe Brochard <pbrochard@common-lisp.net>
173 * src/clfswm-util.lisp (add-frame-in-parent-frame): New function
176 2011-06-04 Philippe Brochard <pbrochard@common-lisp.net>
178 * src/clfswm.lisp (main-unprotected): Destroy all frames windows
179 before closing the display (not really needed).
181 2011-06-02 Philippe Brochard <pbrochard@common-lisp.net>
183 * src/clfswm-layout.lisp (inc-tile-layout-size)
184 (dec-tile-layout-size, inc-slow-tile-layout-size)
185 (dec-slow-tile-layout-size): New functions and bindings.
187 2011-06-01 Philippe Brochard <pbrochard@common-lisp.net>
189 * src/clfswm-expose-mode.lisp (define-expose-letter-keys): Add
190 0..1 and A..Z keys to select a child in exposé mode.
192 * src/clfswm-internal.lisp (display-frame-info): Remove hidden
193 infos in frames windows.
195 * src/clfswm-util.lisp (ask-close/kill-current-window): Menu
198 2011-05-30 Philippe Brochard <pbrochard@common-lisp.net>
200 * src/clfswm-internal.lisp (get-parent-layout): Minor fullscreen
203 2011-05-29 Philippe Brochard <pbrochard@common-lisp.net>
205 * src/clfswm-internal.lisp
206 (delete-child-and-children-in-all-frames): Show all children
207 before deleting/destroying a windows, so prevent a flickering.
208 (get-parent-layout): Return the fullscreen size when the current
211 2011-05-28 Philippe Brochard <pbrochard@common-lisp.net>
213 * src/clfswm-internal.lisp (get-parent-layout): Handle correctly
216 * src/clfswm-util.lisp (delete-focus-window-generic): Do not hide
217 child before removing, so prevent a flickering.
219 * src/clfswm-internal.lisp (show-all-children): Rectangular
220 optimization to display only needed children.
221 (show-all-children): Remove flickering on
222 select-next/previous-brother.
224 2011-05-17 Philippe Brochard <pbrochard@common-lisp.net>
226 * src/clfswm-util.lisp (copy-focus-window, cut-focus-window): New
227 functions and ask-close/kill-current-window menu and bindings
230 2011-05-16 Philippe Brochard <pbrochard@common-lisp.net>
232 * src/clfswm-util.lisp (ask-close/kill-current-window): Add an
233 *ask-close/kill-placement* placement window variable.
235 2011-05-09 Philippe Brochard <pbrochard@common-lisp.net>
237 * contrib/osd.lisp (funcall-button-from-code): Display osd
238 documention for buttons and fix some redefining warnings.
240 2011-05-07 Philippe Brochard <pbrochard@common-lisp.net>
242 * src/clfswm-nw-hooks.lisp (make-permanent-nw-hook-frame): New
243 function. Prevent to add or delete a new window hook for this
246 * src/clfswm-layout.lisp (update-layout-managed-children-position):
249 2011-05-06 Philippe Brochard <pbrochard@common-lisp.net>
251 * src/bindings-second-mode.lisp (set-default-second-keys):
252 select-brother-spatial-move-* binding update.
254 * src/clfswm-layout.lisp (tile-left|right|top|bottom-layout): Ask
255 to keep children positions or not.
257 * src/clfswm-internal.lisp (fixe-real-size): Takes care of border
260 * src/clfswm-layout.lisp (update-layout-managed-children): Fix a
261 bug by using the parent frame instead of the current child.
263 * src/clfswm-circulate-mode.lisp
264 (select-brother-generic-spatial-move+right/left/up/down): New
265 function to select a brother from another in a spatial move.
267 2011-04-19 Philippe Brochard <pbrochard@common-lisp.net>
269 * src/clfswm-pack.lisp (move-frame-constrained)
270 (resize-frame-constrained): Use pixels instead of floating
273 2011-04-18 Philippe Brochard <pbrochard@common-lisp.net>
275 * src/clfswm-pack.lisp (resize-frame-constrained): Takes care of
277 (implode-frame, implode-current-frame): New functions. Absorb all
278 frames subchildren in frame. Explode frame opposite.
280 2011-04-17 Philippe Brochard <pbrochard@common-lisp.net>
282 * src/clfswm-pack.lisp (move-frame-constrained)
283 (resize-frame-constrained): New function. Move and resize frame
284 with the mouse constrained by other frame brothers.
286 2011-04-14 Philippe Brochard <pbrochard@common-lisp.net>
288 * src/clfswm-util.lisp (with-movement-select-next-brother)
289 (with-movement-select-previous-brother)
290 (with-movement-select-next-child): Use a simple method (do not
291 enter in the circulate mode) to allow to circulate in all children
294 * src/clfswm-menu.lisp (open-menu): Save info hash table keys
295 instead of deleting newly created keys.
297 2011-03-21 Philippe Brochard <pbrochard@common-lisp.net>
299 * src/clfswm-internal.lisp (x-px->fl, y-px->fl): Takes care of
302 2011-03-20 Philippe Brochard <pbrochard@common-lisp.net>
304 * src/clfswm-info.lisp (show-config-variable): call
305 produce-conf-var-doc.
307 2011-03-18 Philippe Brochard <pbrochard@common-lisp.net>
309 * src/clfswm-autodoc.lisp (produce-conf-var-doc-html): Produce a
310 documentation for all configurable variables in CLFSWM -
313 * src/clfswm-internal.lisp (leave-frame): Hide all children except
316 2011-03-16 Philippe Brochard <pbrochard@common-lisp.net>
318 * src/clfswm-autodoc.lisp (produce-all-docs): Produce a
319 documentation for all configurable variables in CLFSWM.
321 * src/clfswm-layout.lisp (set-gimp-layout): Display a notify
322 window with the help on the GIMP layout.
324 2011-03-12 Philippe Brochard <pbrochard@common-lisp.net>
326 * src/menu-def.lisp: Menu update to prevent cursor keys clash.
328 * clfswm.asd: Change compilation order to prevent undefined
331 * src/clfswm-internal.lisp (show-child(frame)): Handle properly
332 the show-root-frame-p parameter.
334 2011-03-11 Philippe Brochard <pbrochard@common-lisp.net>
336 * src/clfswm-util.lisp (move-frame, resize-frame): Do not move or
337 resize a frame when it's the current root.
339 2011-03-10 Philippe Brochard <pbrochard@common-lisp.net>
341 * src/clfswm-internal.lisp (show-all-children): Handle properly
342 duplicated child in multipe frames.
344 2011-03-09 Philippe Brochard <pbrochard@common-lisp.net>
346 * contrib/volume-mode.lisp (set-default-volume-keys): Add more
347 keybindings (up/down, right/left) to raise/lower the volume.
349 * src/clfswm-layout.lisp: Add a variable border size for frames
352 2011-03-08 Philippe Brochard <pbrochard@common-lisp.net>
354 * src/clfswm-util.lisp (cut-current-child, remove-current-child)
355 (delete-current-child): Hide the current child before doing the
358 * src/clfswm-internal.lisp (show-all-children): Hide windows not
359 in the current root before displaying those in current root.
360 Remove all hide-all unnecessary calls.
362 * src/clfswm-configuration.lisp (save-variables-in-conf-file):
363 Save only variables with a different value than their original
366 2011-03-07 Philippe Brochard <pbrochard@common-lisp.net>
368 * src/clfswm-info.lisp (show-config-variable): Use the new
371 * src/clfswm-autodoc.lisp (produce-configuration-variables): Use
372 the new defconfig method.
374 * src/clfswm-configuration.lisp (create-configuration-menu):
375 Change the config system with a more lispy one and a less string
376 based one: (defconfig name value group doc).
379 2011-03-06 Philippe Brochard <pbrochard@common-lisp.net>
381 * src/clfswm-internal.lisp (show-all-children): Simplify the
383 (show-child): Display an unmanaged window whe it's the current
385 (show-all-children): add the ability to display all child from
386 *root-frame* and hide all those who are not in *current-root*.
387 -> remove hide-all-children when needed.
389 * src/xlib-util.lisp (move-window,resize-window): Add a
390 *color-move-window* border when moving or resizing a window.
392 2011-03-04 Philippe Brochard <pbrochard@common-lisp.net>
394 * src/clfswm-internal.lisp (show-all-children): Perform only one
395 recusion on the clfswm tree: calculate geometry and place child in
398 2011-03-03 Philippe Brochard <pbrochard@common-lisp.net>
400 * src/clfswm-internal.lisp (show-all-children): Rethink of display
401 child order to prevent very annoying flickering.
403 2011-02-27 Philippe Brochard <pbrochard@common-lisp.net>
405 * src/clfswm-util.lisp (query-yes-or-no): New function.
407 * src/clfswm-configuration.lisp (reset-all-config-variables): New
408 function and menu entry.
409 (query-conf-value): Add the ability to leave the field blank to
410 reset the variable to its default value.
412 2011-02-26 Philippe Brochard <pbrochard@common-lisp.net>
414 * src/clfswm-configuration.lisp
415 (add-all-configuration-default-value): Add a default value to
416 configurable variables.
418 2011-02-23 Philippe Brochard <pbrochard@common-lisp.net>
420 * src/clfswm.lisp (main-unprotected): Create the configuration
421 menu only once at startup.
423 2011-02-22 Desmond O. Chang <dochang@gmail.com>
425 * contrib/amixer.lisp: Add a volume mode inspired by the emms
426 volume package. Alsa mixer interface.
428 * contrib/volume-mode.lisp: Add a volume mode inspired by the emms
431 2011-02-22 Desmond O. Chang <dochang@gmail.com>
433 * src/clfswm.lisp (main): Use ASDF:SYSTEM-SOURCE-DIRECTORY instead
434 of *LOAD-TRUENAME*. *LOAD-TRUENAME* is only bound during a call to
435 LOAD. If one eval CLFSWM:MAIN in repl, BASE-DIR will be an empty
436 string. Use ASDF:SYSTEM-SOURCE-DIRECTORY to fix it.
438 2011-02-16 Philippe Brochard <pbrochard@common-lisp.net>
440 * src/clfswm.lisp (main-unprotected): Add a close hook. And close
441 the notify window, the virtual keyboard and the clfswm terminal by
444 2011-02-15 Philippe Brochard <pbrochard@common-lisp.net>
446 * src/clfswm.lisp (main-unprotected): Destroy the notify window
447 before closing the display. This fix a bug when resetting/reloading
450 2011-02-12 Philippe Brochard <pbrochard@common-lisp.net>
452 * src/xlib-util.lisp (equal-wm-class-fun, equal-wm-name-fun)
453 (raise-window-fun, raise-and-focus-window-fun): New functions.
455 * src/config.lisp (*clfswm-terminal-cmd*): Switch from xterm to
457 (*never-managed-window-list*): Structure change to be more
458 flexible. Let the choice to focus, raise and do nothing on never
461 2011-02-09 Philippe Brochard <pbrochard@common-lisp.net>
463 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Take
464 care of never managed windows to move or resize them if the raise
467 * src/clfswm-internal.lisp (in-frame, in-window, in-child): New
470 2011-02-08 Philippe Brochard <pbrochard@common-lisp.net>
472 * src/clfswm.lisp (main-mode): Raise or not unmanaged windows
473 following request in *never-managed-window-list*.
475 2011-02-05 Philippe Brochard <pbrochard@common-lisp.net>
477 * *: **** Release 1102 ****
479 2011-02-05 Desmond O. Chang <dochang@gmail.com>
481 * src/keysyms.lisp: Add extended keysyms from stumpwm.
483 2011-02-01 Desmond O. Chang <dochang@gmail.com>
485 * src/clfswm-util.lisp (run-or-raise): New function (thanks to
488 * src/clfswm-internal.lisp (with-all-*): add a nil block.
490 2011-01-28 Desmond O. Chang <dochang@gmail.com>
492 * src/clfswm-util.lisp (xdg-config-home): XDG_CONFIG_HOME should
493 be $HOME/.config by default.
495 2010-12-29 Philippe Brochard <pbrochard@common-lisp.net>
497 * contrib/osd.lisp (display-doc): Add another method where a
498 CLFSWM native window is used to display the key documentation.
500 2010-12-27 Philippe Brochard <pbrochard@common-lisp.net>
502 * src/xlib-util.lisp (with-xlib-protect): Force to revert to the
505 2010-12-25 Philippe Brochard <pbrochard@common-lisp.net>
507 * src/clfswm-second-mode.lisp (second-key-mode): Call the second
508 mode leave function only when the generic mode was ended.
510 2010-12-08 Philippe Brochard <pbrochard@common-lisp.net>
512 * src/clfswm-second-mode.lisp (sm-leave-function): Do not use
513 *second-mode-program* anymore.
515 2010-12-07 Philippe Brochard <pbrochard@common-lisp.net>
517 * src/clfswm-second-mode.lisp (*second-mode-leave-function*): New
518 variable bound to a function executed (when not null) on second
521 2010-11-14 Philippe Brochard <pbrochard@common-lisp.net>
523 * src/clfswm-util.lisp (find-child-under-mouse): Do not find
526 2010-11-13 Philippe Brochard <pbrochard@common-lisp.net>
528 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
529 Do not display the accel window for unmanaged windows.
531 2010-11-11 Philippe Brochard <pbrochard@common-lisp.net>
533 * src/clfswm-internal.lisp (set-current-root): Handle
534 window-parent in set-current-root.
536 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
537 focus the parent child when the current root is a window.
539 2010-11-09 Philippe Brochard <pbrochard@common-lisp.net>
541 * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
542 New function an bindings.
544 * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
547 2010-11-07 Philippe Brochard <pbrochard@common-lisp.net>
549 * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
550 function to let the user choose to keep child position with
553 * src/clfswm-internal.lisp (remove-frame-data-slot): New
556 2010-11-05 Philippe Brochard <pbrochard@common-lisp.net>
558 * src/clfswm-internal.lisp (frame-select-next-child)
559 (frame-select-previous-child): New functions and bindings. Select
560 the next/previous child in the current frame.
562 2010-10-31 Philippe Brochard <pbrochard@common-lisp.net>
564 * src/clfswm-query.lisp (query-mode-complet): New function: Handle
565 completion in query-mode.
567 2010-10-30 Philippe Brochard <pbrochard@common-lisp.net>
569 * src/clfswm-query.lisp (query-print-string): Handle long lines
572 2010-10-27 Philippe Brochard <pbrochard@common-lisp.net>
574 * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
575 all characters are printable.
577 2010-10-25 Philippe Brochard <pbrochard@common-lisp.net>
579 * contrib/server/server.lisp: Load clfswm client code in the main
580 program and let the user start it with a --client command line
583 * src/package.lisp (*main-entrance-hook*): New hook executed after
584 loading configuration file and before opening the display.
586 2010-10-23 Philippe Brochard <pbrochard@common-lisp.net>
588 * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
590 * src/clfswm-internal.lisp (show-child): Show window only if not
593 * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
594 change modifiers after binding definition.
596 2010-10-21 Philippe Brochard <pbrochard@common-lisp.net>
598 * contrib/osd.lisp: New file: OSD (On Screen Display) for
601 * src/clfswm-menu.lisp (open-menu): Modularise function.
603 2010-10-13 Philippe Brochard <pbrochard@common-lisp.net>
605 * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
606 key binding in main and second mode.
608 2010-10-10 Philippe Brochard <pbrochard@common-lisp.net>
610 * src/clfswm-util.lisp (open-notify-window): Convert hello-window
611 functions to a more generic Notify-window system.
613 * src/tools.lisp (add-timer): Add an id to identify the timer.
615 2010-10-09 Philippe Brochard <pbrochard@common-lisp.net>
617 * src/tools.lisp (erase-timer): New function.
619 * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
620 the hello window. Add Configuration variables.
622 2010-10-08 Philippe Brochard <pbrochard@common-lisp.net>
624 * src/clfswm-util.lisp (): Add an Hello window at startup.
626 * src/tools.lisp (process-timers): Add a timer system.
628 2010-10-07 Philippe Brochard <pbrochard@common-lisp.net>
630 * src/clfswm-query.lisp (add-in-query-string): Handle correctly
633 2010-10-06 Philippe Brochard <pbrochard@common-lisp.net>
635 * src/clfswm-query.lisp (query-print-string): Change cursor color
636 and show parenthesis matching with colors (on match and on
639 2010-10-05 Philippe Brochard <pbrochard@common-lisp.net>
641 * src/clfswm-internal.lisp (show-all-children): Do not raise a
642 child when its parent is hidden.
644 2010-10-02 Philippe Brochard <pbrochard@common-lisp.net>
646 * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
647 possibility to circulate over subchild of the current child.
649 * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
650 (expose-windows-generic): Add an escape-body function to return to
651 the original state on escape key.
653 * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
654 to bind the current child from the configuration file.
656 2010-10-01 Philippe Brochard <pbrochard@common-lisp.net>
658 * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
659 window hook: the frame absorb all new windows that match
660 nw-absorb-test frame data slot.
662 2010-09-30 Philippe Brochard <pbrochard@common-lisp.net>
664 * src/clfswm-expose-mode.lisp (expose-create-window): Show window
665 title in accel window.
667 2010-09-29 Philippe Brochard <pbrochard@common-lisp.net>
669 * configure: Use the Xavier Maillard clfswm script in contrib to
670 build an executable in the standard way.
672 2010-09-26 Philippe Brochard <pbrochard@common-lisp.net>
674 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
675 New functions. Add a window on each child in the expose mode to
678 * src/clfswm-internal.lisp (child-x, child-y, child-width)
679 (child-height): New methods to get real child coordinates.
681 2010-09-25 Philippe Brochard <pbrochard@common-lisp.net>
683 * src/clfswm-layout.lisp (*-layout): Use child-position.
685 * src/clfswm-internal.lisp (child-position): New function.
687 * src/clfswm-expose-mode.lisp (expose-windows-mode)
688 (expose-all-windows-mode): Use a generic mode.
690 * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
691 with handle-event-fun symbols instead of inspecting clfswm
692 internals symbols on each mode change.
694 * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
695 a separate clfswm-expose-mode.lisp file.
697 * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
698 screen size instead of hardcoded test coordinates.
700 2010-09-24 Philippe Brochard <pbrochard@common-lisp.net>
702 * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
703 (speed-mouse-right, speed-mouse-up, speed-mouse-down)
704 (speed-mouse-undo, speed-mouse-first-history): New functions to
705 quickly move the mouse. Implemented for the second mode.
707 2010-09-16 Philippe Brochard <pbrochard@common-lisp.net>
709 * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
710 write permission on $clfswm_asd_path. So anybody can start clfswm
711 even if there is no write permission on the source directory.
713 2010-09-12 Philippe Brochard <pbrochard@common-lisp.net>
715 * contrib/clfswm: Add support to cmucl, ccl and ecl.
717 2010-09-11 Philippe Brochard <pbrochard@common-lisp.net>
719 * src/clfswm-util.lisp (set-hide-unmanaged-window)
720 (set-show-unmanaged-window, set-default-hide-unmanaged-window):
721 New functions and menu entry.
722 (set-globally-hide-unmanaged-window)
723 (set-globally-show-unmanaged-window): New functions and menu
726 * src/clfswm-internal.lisp (hide-unmanager-window-p): New
728 (show-child): Add a data slot on frame to hide or not unmanaged
731 * src/clfswm-corner.lisp (present-clfswm-terminal)
732 (present-virtual-keyboard): Use a function (generic-present-body)
733 instead of a macro (generate-present-body).
735 * src/clfswm-util.lisp (update-menus): List all directories and
736 subdirectories in $XDG_DATA_DIRS/applications.
738 2010-09-10 Philippe Brochard <pbrochard@common-lisp.net>
740 * src/clfswm-corner.lisp (generate-present-body): New macro.
741 (present-clfswm-terminal, present-virtual-keyboard): Use
742 generate-present-body.
744 2010-09-09 Philippe Brochard <pbrochard@common-lisp.net>
746 * src/clfswm-util.lisp (update-menus): Follow XDG specifications
747 instead of the non-portable Debian update-menu.
749 2010-09-07 Philippe Brochard <pbrochard@common-lisp.net>
751 * src/clfswm.lisp (error-handler): New function do handle
752 asynchronous errors and ignore them.
753 (open-display): Install the new error-handler on display.
755 2010-09-05 Philippe Brochard <pbrochard@common-lisp.net>
757 * src/xlib-util.lisp (with-xlib-protect): Add a
758 with-simple-restart on top of body execution.
760 2010-09-04 Philippe Brochard <pbrochard@common-lisp.net>
762 * src/clfswm.lisp (main-loop): Protect all xlib functions with an
765 * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
766 handle-event. Add a with-simple-restart to prevent a
767 clisp/new-lisp infinite loop.
769 2010-08-30 Philippe Brochard <pbrochard@common-lisp.net>
771 * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
772 clfswm terminal working even on xterm title changes.
774 2010-08-29 Philippe Brochard <pbrochard@common-lisp.net>
776 * src/clfswm-util.lisp (run-other-window-manager): Update for
779 * src/tools.lisp (do-execute): New parameter io to change the
782 * src/clfswm-util.lisp (hide-current-child): Prevent from removing
785 * src/clfswm-internal.lisp (child-member): New predicate.
786 (child-remove): New function.
788 * src/*.lisp: Use child-member and child-remove everywhere it's
791 2010-08-28 Philippe Brochard <pbrochard@common-lisp.net>
793 * src/clfswm.lisp (main-loop): Ensure that all events have been
794 processed after a process-event.
796 * src/clfswm-internal.lisp (is-in-current-child-p): New function.
798 2010-08-27 Philippe Brochard <pbrochard@common-lisp.net>
800 * src/clfswm.lisp (main-mode:configure-request): Raise the window
801 only when present on the current child and focus it accordingly.
803 2010-08-26 Philippe Brochard <pbrochard@common-lisp.net>
805 * src/clfswm-circulate-mode.lisp (circulate-loop-function):
806 Use is-a-key-pressed-p.
808 * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
810 * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
811 returned by xlib:keysym->keycodes.
813 * src/*.lisp: Use the new child-equal-p to compare children. This
814 prevent a bug with sbcl/cmucl when the standard equal function
815 does not work with xlib:window.
817 * src/clfswm-internal.lisp (child-equal-p): New predicate.
819 2010-08-25 Philippe Brochard <pbrochard@common-lisp.net>
821 * src/clfswm-generic-mode.lisp (generic-mode): Use an
822 xlib:event-listen before processing event with
823 xlib:process-event. This prevent a bug with CLX threaded
824 implementation like sbcl.
826 * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
827 processing event with xlib:process-event. This prevent a bug with
828 CLX threaded implementation like sbcl.
830 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
832 * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
834 * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
837 * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
838 (find-parent-frame, find-frame-window, find-frame-by-name)
839 (find-frame-by-number): Use with-find-in-all-frames to search in
840 frames in the right order.
842 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
843 unwanted flickering with unmanaged windows.
845 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
847 * src/package.lisp: Remove event handler hooks as they're not
848 needed anymore (To replace them: use closure and define-handler).
850 * src/xlib-util.lisp (move-window, resize-window)
851 (wait-mouse-button-release): Use a generic mode.
853 * src/*.lisp: Replace the case to handle event with a more (tricky)
854 lispy method which bind a function to each keywords associated
857 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
859 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
860 menu entry between delete-current-child and remove-current-child.
861 ie: Delete a child and its children in all frames by default.
863 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
865 * src/package.lisp: Add a placement configuration group.
867 * src/binding*.lisp: Bind control+g to escape the current action
870 * src/clfswm-internal.lisp
871 (delete-child-and-children-in-all-frames): New function and
872 binding: Second mode - Control+Delete delete the current child and
873 its children in all frames (ie: close the current child and its
876 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
878 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
879 the frame window and the frame gc. Close a very annoying bug when
880 cuting/pasting a frame or moving a child over frames with the
883 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
884 all children in *current-root* after moving/resizing a frame.
886 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
888 * src/clfswm-util.lisp (delete-focus-window)
889 (destroy-focus-window): Remove child in parent frame before
892 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
894 * src/clfswm-util.lisp (identify-key): Add a timeout in
896 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
897 of the window passed by xlib:process-event.
899 * src/xlib-util.lisp (move-window, resize-window)
900 (wait-mouse-button-release): Add a timeout in xlib:process-event.
902 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
904 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
905 to launch an other window manager and to return to clfswm.
907 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
909 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
912 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
914 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
917 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
918 parameter and a loop timeout.
920 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
922 * src/clfswm.lisp (main): Add an alternate configuration filename
925 * load.lisp: Add a debuging code example.
927 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
929 * src/clfswm-configuration.lisp (create-configuration-menu): New
930 menu to configure all clfswm variables while clfswm is running.
932 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
934 * src/clfswm-util.lisp (save-configuration-variables): New
935 function to save all configuration variables in clfswmrc.
937 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
939 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
941 (set-default-info-keys): Add cursor key support in info mode.
943 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
945 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
948 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
949 prevent reading the configuration file (this may be useful to
950 produce the original documentation without user modifications
951 with the rc configuration file).
953 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
955 * src/bindings-second-mode.lisp (set-default-second-keys):
956 Simplification of Escape key to close/kill/remove the focus window
957 and unhide all windows.
959 * src/bindings.lisp (set-default-main-keys): Simplification of
960 Escape key to close/kill/remove the focus window and unhide all
963 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
964 focus and unhide all windows capabilities.
966 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
968 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
970 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
972 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
973 Keep child order and don't make unnecessary child movement.
974 (one-column-layout, one-line-layout): New layouts.
976 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
978 * *: **** Release 0906 ****
980 * contrib/cd-player.lisp: New file to handle the CD player.
982 * contrib/xmms.lisp: New file to handle the xmms player.
984 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
986 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
987 Maximize windows in their frame - Leave frames to their actual
990 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
991 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
993 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
995 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
997 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
999 * contrib/mpd.lisp: Use a standard menu.
1001 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
1003 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
1005 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
1007 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
1009 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
1012 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
1014 * src/config.lisp (get-fullscreen-size): One pixel adjustment
1017 * src/clfswm-placement.lisp (*-child-placement): One pixel
1020 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
1022 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
1023 Ensure that all characters are printable.
1025 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
1028 * src/clfswm-placement.lisp (*-child-placement): Adjust
1029 coordinates to one pixel in the current child.
1031 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1033 * src/clfswm-query.lisp (query-enter-function): Assign font before
1034 width and height calculation.
1036 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1038 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
1039 bannish the pointer in an arbitrary place.
1041 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
1042 place the info window in an arbitrary place.
1044 * src/clfswm-query.lisp (query-enter-function): Use with-placement
1045 macro to place the query window in an arbitrary place.
1047 * src/clfswm-placement.lisp: New file. Allow to place info windows
1048 or query windows on an arbitrary place. Allow to bannish the
1049 pointer on an arbitrary place.
1051 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
1053 * src/clfswm-circulate-mode.lisp (reorder-child)
1054 (reorder-brother): Unfocus windows before reordering children or
1057 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1059 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
1060 the parent is a frame.
1062 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
1063 motion with a default modifier.
1065 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
1068 * src/clfswm-info.lisp (info-mode): Handle motion with a default
1070 (info-mode): Optimization in loop function.
1072 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1074 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
1075 root-frame correctly.
1077 * clfswm.asd: Dependency fix for clfswm-generic-mode.
1079 * src/clfswm-circulate-mode.lisp (reorder-child)
1080 (reorder-brother): Handle empty frames.
1081 (reorder-brother): Redisplay only the parent frame of the current
1084 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
1085 parent frame of the current frame.
1087 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
1089 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
1090 Maximize/Unmaximize the current frame in its parent frame.
1092 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
1093 windows and frames in their parent frame.
1095 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1097 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
1099 * src/clfswm-circulate-mode.lisp (reorder-child)
1100 (reorder-brother): Reinitialise on circulate type change
1101 child to brother or brother to child.
1103 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
1104 calls xlib:display-finish-output on each map-request. So speed up
1107 * src/xlib-util.lisp (map-window): New function. Call
1108 xlib:display-finish-output on each map request.
1110 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1112 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
1113 Optimisation when drawing second mode window.
1115 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1117 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
1120 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1122 * src/clfswm-util.lisp (run-program-from-query-string): Launch
1123 command only with a return validation.
1125 2009-04-22 Xavier Maillard <xma@gnu.org>
1127 * src/clfswm-query.lisp (query-string): Use a generic mode.
1129 2009-04-19 Xavier Maillard <xma@gnu.org>
1131 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
1133 2009-04-18 Xavier Maillard <xma@gnu.org>
1135 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
1136 to define all other modes.
1138 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1140 * src/package.lisp (): Use *default-font-string* for all
1143 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
1145 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
1147 * src/xlib-util.lisp (null-size-window-p): Better check of null
1150 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
1152 * src/clfswm.lisp (handle-map-request): Add a fix to manage
1153 correctly fullscreen windows (SDL particularly).
1155 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
1157 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
1158 a segfault with clisp/new-clx.
1160 * src/clfswm.lisp (handle-motion-notify): Add a needed window
1163 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
1164 needed window argument.
1166 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
1168 * src/xlib-util.lisp (wait-no-key-or-button-press)
1169 (wait-a-key-or-button-press): Check buttons press/release correctly"
1171 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
1173 * src/menu-def.lisp: Add children navigation menu in the movement
1174 menu (select next/previous child/brother/level).
1176 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
1178 * *: Rename 'sister' frame to 'brother' frame.
1180 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
1181 alias in a real modifier.
1183 * src/package.lisp (*modifier-alias*): New list of modifier alias
1184 For example: :alt is :mod-1, :numlock is :mod-2...
1186 * src/tools.lisp (remove-hook): New function.
1188 * src/clfswm-keys.lisp (with-capslock, without-capslock)
1189 (with-numlock, without-cnumlock): New functions.
1191 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
1193 * src/clfswm-info.lisp: Use the *binding-hook* to create info
1194 keys and mouse bindings.
1196 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
1197 second keys and mouse bindings.
1199 * src/bindings.lisp: Use the *binding-hook* to create main keys
1202 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1204 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
1207 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
1209 * src/menu-def.lisp: Use a menu instead of a function for the
1212 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
1214 * src/clfswm-util.lisp (show-standard-menu): Display the standard
1215 menu from the 'update-menus' command.
1217 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
1219 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
1220 it's already grabbed.
1222 * src/clfswm-internal.lisp (display-frame-info): Use configurable
1223 colors and fix a bug with background.
1224 (display-frame-info): Set window background when displaying info.
1226 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1228 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
1229 warning with clisp/new-clx.
1231 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
1233 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
1236 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1238 * *: **** Release 0809 ****
1240 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1242 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
1244 (ensure-unique-number): New function and menu entry.
1246 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
1248 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
1249 hook: open the next window in a named frame.
1250 (numbered-frame-nw-hook): New new window hook: open the next
1251 window in a numbered frame.
1253 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
1254 cases. So query-string can be called even in the main mode.
1256 * src/clfswm-internal.lisp (show-all-children): Do not raise a
1257 child by default => far less flickering.
1259 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
1261 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
1263 * src/menu-def.lisp: Change key binding for the CLFSWM menu
1266 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
1267 is nil. (workaround on some CLX implementation).
1269 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
1271 * src/menu-def.lisp: Add a menu to set a focus policy for all
1274 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
1275 (all-frames-set-*-focus-policy): Set a focus policy for all
1278 * src/clfswm.lisp (handle-enter-notify): sloppy-select
1279 mode. Select a child and its parents on mouse over.
1281 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
1283 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
1284 policy -> Sloppy focus only for windows in the current frame.
1285 (main-unprotected): Exit clfswm on init error (ie: when another
1286 window manager is running).
1288 * src/clfswm-util.lisp (reset-clfswm): New function.
1290 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
1292 * src/clfswm-menu.lisp (init-menu): New function.
1294 * src/clfswm-util.lisp (reload-clfswm): New function to reload
1296 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
1298 * src/clfswm.lisp (main, main-unprotected): Handle error in a
1299 superior main function. Now CLFSWM can't break the X session. It
1300 just reinitialize the display and run a new main loop.
1302 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
1303 *vt-keyboard-on* global to avoid warnings when loading clfswm.
1305 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
1306 (help-on-gimp-layout): Describe how to use the GIMP layout.
1308 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
1310 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
1311 main-window-right-layout. Change the keybinding for (shift)alt+tab
1312 to not select windows in the main window lisst.
1313 Bind F8 to add a window in the main window list.
1314 Bind F9 to remove a window in the main window list.
1315 Change the focus policy to :sloppy.
1316 (set-previous-layout): Restore the previous layout, keybinding and
1319 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
1321 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
1323 * src/clfswm-layout.lisp (main-window-left-layout)
1324 (main-window-bottom-layout, main-window-top-layout): New
1326 Factorize layouts in menu.
1328 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
1330 * src/clfswm-layout.lisp (main-window-right-layout): A possible
1331 GIMP layout: one or more main windows on one side of the
1332 frame. Others on the other size.
1334 * src/clfswm-util.lisp
1335 (current-frame-set-click/sloppy-focus-policy): Each frame can have
1336 a different focus policy (one of :click or :sloppy).
1337 The default focus policy is set with *default-focus-policy*.
1339 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
1341 * src/clfswm-info.lisp (show-config-variable): New function.
1343 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
1345 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
1347 * src/clfswm-info.lisp: Colored help for key binding and corners
1350 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
1352 * src/clfswm-util.lisp (delete-focus-window)
1353 (destroy-focus-window): Remove chid only in
1354 handle-unmap/destroy-notify. Focus *current-root* only when
1355 closing/killing the current child.
1357 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
1358 functions or corners.
1360 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1362 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
1363 action: Hide/Unhide a terminal on mouse corner action. (By default
1364 right mouse button on the top left corner).
1366 * src/config.lisp (*never-managed-window-list*): New config
1369 * src/clfswm-internal.lisp (never-managed-window-p): New function:
1370 Handle never managed window in a more simple way.
1372 * src/clfswm-corner.lisp: New file and new and more simple method
1373 to define corners actions.
1375 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
1377 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
1379 * src/clfswm-layout.lisp (fast-layout-switch)
1380 (define-fast-layout-switch): New functions: Switch between two
1383 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
1384 really in the second mode. So leave-second-mode can be used even
1387 * src/clfswm-util.lisp (switch-to-last-child): New function:
1388 Store the current child and switch to the previous one.
1390 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1392 * src/clfswm-util.lisp (display-current-window-info): Display the
1394 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
1395 (top right by default). By default 'xvkbd' is used.
1397 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1399 * src/xlib-util.lisp (move-window, resize-window): Compress motion
1402 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
1404 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
1407 * src/clfswm-info.lisp (info-mode): Compress motion events.
1409 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
1411 * src/clfswm-internal.lisp (show-all-children): Compute geometry
1412 and selection first and then show only necessary children.
1413 (show-child): remove unneeded display-p parameter.
1415 * src/config.lisp (get-fullscreen-size): Place the frame border
1416 outside the screen (this prevent the loose of 2 pixels per
1419 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
1421 * src/clfswm-internal.lisp (focus-child): Algorithm change to
1422 raise only the selected child.
1424 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
1426 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
1427 Raise only viewable children.
1429 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
1431 * src/clfswm-internal.lisp (show-all-children): Always raise all
1432 displayed children. Remove all references to raise-p.
1434 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1436 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
1439 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
1440 second mode binding on raise/lower child in its frame.
1442 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
1443 behaviour to the new raise/lower property.
1444 Call clear-nw-hook before the rest of the hook.
1446 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
1447 (mouse-click-to-focus-and-resize-window): Stop button event. This
1448 prevent a keyboard/pointer freeze.
1450 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1452 * src/clfswm-internal.lisp (frame-lower-child)
1453 (frame-raise-child): New functions to raise/lower a child in its
1456 * src/clfswm-util.lisp (have-to-present-windows)
1457 (have-to-present-all-windows): New functions to have an MaxOS
1458 expose like on mouse click in screen corner.
1460 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
1462 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
1464 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
1465 child from a choice in all frames with hidden children.
1467 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
1469 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
1471 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
1472 (unhide-all-children): New functions.
1474 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
1477 * src/clfswm-util.lisp (hide/show-frame-window): new function and
1480 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
1482 * src/clfswm-util.lisp (rename-current-child): Do not display the
1483 frame info for a window.
1485 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
1487 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
1488 frame window for the removed child and its children.
1490 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
1492 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
1495 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
1497 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
1498 the ROX pinboard (ie: leave it lowered in the root window as
1501 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
1502 (tile-left-layout, tile-right-layout, tile-top-layout)
1503 (tile-bottom-layout): Use all the frame space when there is only
1506 * src/clfswm-internal.lisp (place-window-from-hints): Center
1507 unmanaged windows in the root screen.
1509 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
1512 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1514 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
1515 typo in managed types.
1517 * src/clfswm-internal.lisp (show-child): Always display frame info
1518 even if the frame is hidden.
1520 * src/xlib-util.lisp (resize-window): Use a better algorithme to
1523 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1525 * src/clfswm-util.lisp (with-movement): Display frame info for all
1526 frames in current root.
1528 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1530 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
1532 * src/bindings-second-mode.lisp (define-second-key #\a): New
1533 binding on 'add-default-frame'.
1535 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1536 message to follow the autodocumentation process.
1538 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1540 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1541 "Space" to jump to a child. "B" to bind a slot on the current
1544 * src/bindings-second-mode.lisp: Use "Tab" instead of
1547 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
1549 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1550 unmanaged (hidden) windows.
1552 * src/clfswm-internal.lisp (place-window-from-hints): Give a
1553 minimal size for windows.
1554 (with-all-windows-frames-and-parent): New function.
1556 * src/config.lisp (*default-window-width/height*): New parameters.
1558 * src/clfswm-internal.lisp (place-window-from-hints): Center
1559 windows in the screen instead of in their frame.
1561 * src/bindings-second-mode.lisp (tile-space-current-frame): New
1564 * src/clfswm-layout.lisp (register-layout): Intern the once name
1565 in the right package.
1567 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1569 * doc/dot-clfswmrc: Update to follow the new clfswm way.
1571 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
1573 * src/clfswm-internal.lisp (set-current-child)
1574 (adapt-child-to-parent, show-child, hide-child): Handle the case
1575 where child is not a frame or a window.
1577 * src/clfswm-util.lisp
1578 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1579 Check if child is a frame.
1581 * src/clfswm-internal.lisp (managed-window-p): Handle the case
1582 where frame is null.
1583 (place-frame): Check if frame and parent are frames.
1585 * src/clfswm-info.lisp (info-mode): display all frame info before
1588 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1589 info before leaving.
1591 * src/clfswm-internal.lisp (display-all-frame-info): New function.
1593 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
1595 * src/tools.lisp (getenv): Implemented for ECL.
1596 (urun-prog): Implemented for ECL.
1598 * src/clfswm-util.lisp (identify-key): Use a double buffer to
1601 * src/clfswm-query.lisp (query-string): Use a double buffer to
1604 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1607 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1610 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
1612 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1614 * src/menu-def.lisp: New file: move all menu definition in
1617 * src/clfswm-layout.lisp (register-layout): Use a function instead
1620 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
1622 * src/clfswm-autodoc.lisp (produce-menu-doc,
1623 (produce-menu-doc-html): New functions.
1624 (produce-doc-*): Moved to clfswm-autodoc.lisp.
1626 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1627 paste a child on one of its own children. (this prevent a
1629 (move-child-to): Rename move/copy-current-child-by to
1631 (mouse-move-window-over-frame): New function to move the window
1632 under the mouse cursor to another frame.
1634 * src/clfswm-internal.lisp (find-child-in-parent): New function.
1636 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1638 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1639 windows only when its window parent is the current child.
1641 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1643 * src/clfswm-util.lisp (manage-current-window)
1644 (unmanage-current-window): New functions: Allow to force to manage
1645 or unmanage a window by its parent frame.
1647 * src/bindings-second-mode.lisp (#\o): binded to
1648 set-open-in-new-frame-in-parent-frame-nw-hook and
1649 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1651 * src/clfswm-util.lisp (with-current-window): New macro.
1653 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1654 exposure and enter-window handle event.
1656 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1657 children for the current child after the move/resize.
1659 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1661 * src/xlib-util.lisp (resize-window): Take care of window size
1664 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1665 move/resize unmanaged windows.
1667 * src/xlib-util.lisp (move-window, resize-window): New functions.
1669 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1671 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1672 user choose what window type the current frame must handle.
1673 (display-current-window-info): New function.
1674 (current-frame-manage-all-window-type)
1675 (current-frame-manage-only-normal-window-type)
1676 (current-frame-manage-no-window-type): New functions.
1678 * src/clfswm-internal.lisp (managed-window-p): New function.
1680 * src/package.lisp (frame): Managed type: new frame
1681 parameter. This allow to choose what window type a frame must
1684 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1686 * src/clfswm-nw-hooks.lisp
1687 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1689 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1692 * src/tools.lisp (ensure-printable): Return always a string even
1695 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
1697 * src/config.lisp (*default-nw-hook*): New variable to change the
1698 default new window hook.
1700 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1702 * clfswm.asd (clfswm): Add a dependency from
1703 clfswm-second-mode.lisp to clfswm.lisp.
1705 * src/clfswm-util.lisp (identify-key): Show the documentation for
1706 the function bound on a key.
1707 (with-movement): Move with-movement,
1708 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
1709 to clfswm-util.lisp.
1711 * src/clfswm-menu.lisp: New menu system that let user change keys
1712 or functions associated to keys.
1714 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
1716 * src/clfswm-internal.lisp (show-all-children): Display-child is
1717 the first child by default. Solve a bug with father-p.
1719 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
1721 * src/clfswm-internal.lisp (add-frame): Add frame return the
1723 (show-all-children): Move the size computation outside the
1726 * src/bindings-second-mode.lisp (with-movement): Redisplay only
1729 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1730 only the current child.
1732 * src/clfswm-internal.lisp (show-all-children): New display-child
1733 parameter to display only the desired child and its children.
1734 (select-next/previous-child): Only display the current child.
1736 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
1738 * src/clfswm.lisp (init-display): Move the default frame creation
1739 on the default init hook.
1741 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1742 the main mode (for example: "1" on an azerty keyboard).
1744 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
1746 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1747 keysyms. Revert to old grabbing method for the main mode.
1749 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
1751 * src/clfswm.lisp (init-display): Add key handling on no focus
1752 window and on frame windows.
1754 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1756 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1757 all keys by default and replay just what is needed. No change for
1760 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1761 (find-key-from-code): Test for shift and not shift presence.
1763 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
1765 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1766 new key parameter to have less flickering.
1768 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
1770 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1771 layout only one time and revert to no-layout to freely handle
1774 * src/clfswm-nw-hooks.lisp
1775 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1776 with new created window.
1778 * src/clfswm-layout.lisp (register-layout): Now register
1779 automatically a once layout to set the layout only one time and
1780 revert to no-layout to freely handle frames.
1782 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1784 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1785 nw-hook: Open the next window in the current frame and leave the
1786 focus to the current child.
1788 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
1790 * src/bindings-second-mode.lisp: Add keys definitions to
1791 bind-or-jump in the second mode.
1793 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
1794 macro for bind-or-jump-(1|2|3...).
1796 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
1797 arguments to function. This allow to do things like:
1798 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
1799 are passed to my-function on key press.
1801 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
1803 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
1805 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
1807 * src/clfswm-internal.lisp (child-fullname): New function
1809 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
1810 docstring in info-mode-menu. An item can be
1811 '((key function) (key function)) or with docstring
1812 '((key function "documentation 1") (key function "bla bla") (key function))
1814 * src/tools.lisp (ensure-n-elems): New function.
1816 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
1817 resize a frame or the window's father.
1819 * src/clfswm.lisp (init-display): Remove tile-space-layout by
1820 default on the root frame.
1822 * src/clfswm-util.lisp (move/resize-frame): Add standard event
1823 hooks handlers (map-request, configure-notify...)
1825 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
1828 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1830 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
1831 or the window's father.
1833 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
1834 event only if there is a geometry change.
1835 (mouse-focus-move/resize-generic): Generic function to move or
1836 resize a frame or a window father frame.
1838 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1840 * src/clfswm-internal.lisp (show-all-children): Return t if there
1841 is a geometry change.
1843 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
1845 * src/bindings.lisp (Up/Down): Swap select previous/next level.
1847 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
1849 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
1851 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
1852 (with-all-*): Reverse the child list to manage the first child last (like in
1855 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
1856 root window only if true.
1858 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
1859 root window only if *create-frame-on-root* is true.
1861 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
1864 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
1866 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
1867 the current child (even if it's a window).
1869 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
1871 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
1872 (mouse-click-to-focus-and-resize): New functions.
1874 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
1875 (*-px->fl): Convert pixel coordinates to float.
1877 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
1879 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
1881 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
1884 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
1885 and hide-all-children.
1886 (raise-if-needed): New function.
1887 (show-child): Use a first-p parameter to raise windows only when they are
1890 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
1892 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
1895 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
1897 * src/clfswm-info.lisp (keys-from-list): new function.
1899 * src/*: rename 'childs' in 'children'.
1901 * src/*: rename 'group' in 'frame'.
1903 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
1905 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
1907 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
1909 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
1911 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
1913 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
1914 Bind control+o to open the next window in a new group in the root group
1915 (as open in next window in a new workspace in 0801 version).
1917 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
1919 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
1922 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
1924 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
1925 instead of Tab for select-previous-child.
1927 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
1929 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
1932 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
1934 * clfswm-util.lisp (identify-key): Display the documentation
1935 associated to keys when identifying a key.
1937 2008-03-10 Xavier Maillard <xma@gnu.org>
1939 * contrib/clfswm: Complete rewrite of the script. Detect error and
1940 act accordingly. Add command line arguments to configure the
1941 script execution. User can now choose different common lisp
1942 implementation (clisp and sbcl only), choose where to store the
1943 dumped image, where to find clfswm source.
1945 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
1947 * clfswm-internal.lisp (process-new-window): Beginning of new
1948 window hook: each group have a hook to tell what he wants to do
1949 with the new created window.
1951 2008-03-08 Xavier Maillard <xma@gnu.org>
1953 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
1954 call the resulting executable.
1956 * clfswm.lisp (read-conf-file): Check for the user config file in
1957 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
1958 prefered whenever possible.
1960 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
1962 * clfswm-layout.lisp (*-layout): Add an optional raise-p
1963 parameter in each layout.
1965 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
1967 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
1969 (copy/move-current-child-by-name/number): new functions
1970 (focus-group-by-name/number): new functions
1971 (delete-group-by-name/number): new functions
1973 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
1975 * ************************************************************ *
1976 *: Major update - No more reference to workspaces. The main *
1977 structure is a tree of groups or application windows. *
1978 * ************************************************************ *
1980 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
1982 * clfswm.lisp (read-conf-file): Read configuration in
1983 $HOME/.clfswmrc or in /etc/clfswmrc or in
1984 $XDG_CONFIG_HOME/clfswm/clfswmrc.
1985 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
1988 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
1990 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
1993 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
1995 * clfswm-internal.lisp (find-window-group): New function.
1997 * clfswm*: Change to make clfswm run with clisp/new-clx.
1999 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
2001 * clfswm-util.lisp (query-show-paren): Add show parent matching in
2003 (query-string): Bind control+k to delete end of line.
2005 * clfswm-second-mode.lisp (draw-second-mode-window): Display
2006 the action on mouse motion in second mode.
2008 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
2009 event but do not clear the root window.
2010 (handle-configure-request): Adjust unmanaged window from their
2013 * clfswm-internal.lisp (process-new-window): Adjust new window
2014 with the specified hints (max/min/base width/height).
2016 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
2018 * clfswm.lisp (handle-configure-request): Send an Configuration
2019 Notify event. This solve a bug with xterm and rxvt who takes some
2020 times to be mapped. Now there is no delay.
2022 * bindings-second-mode.lisp (define-shell): Run programs after
2023 living the second mode.
2025 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
2027 * clfswm-internal.lisp (process-new-window): Do not crop transient
2028 window to group size.
2029 (adapt-window-to-group): Do not crop transient window to group
2032 * clfswm.lisp (handle-configure-request): Adapt just the window to
2033 its group and don't take care of the configure request. Remove the
2034 bug with the Gimp outside the group and speed up the window
2036 (handle-exposure): Remove show-all-group on exposure event
2039 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
2041 * clfswm-util.lisp (circulate-group-up-copy-window)
2042 (circulate-group-down-copy-window)
2043 (circulate-workspace-up-copy-group)
2044 (circulate-workspace-down-copy-group): Prevent the copy of the
2045 same window in the same workspace.
2047 * bindings-second-mode.lisp (release-copy-selected-window)
2048 (release-copy-selected-group): Prevent the copy of the same window
2049 in the same workspace.
2051 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
2052 (generic-pager-move-window-on-next-line): Remove the copy
2054 (generic-pager-move-group-on-next-workspace)
2055 (generic-pager-move-group-on-previous-workspace): Prevent the copy
2056 of the same window in the same workspace.
2058 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
2059 (mouse-pager-copy-selected-group-release): Prevent the copy of the
2060 same window in the same workspace.
2062 * tools.lisp (setf/=): new macro to set a variable only when
2065 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
2066 x, y... only when necessary.
2068 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
2070 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
2071 new function and hook: force windows to stay in its group (solve a
2074 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
2076 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
2077 less flickering when moving/resizing groups.
2079 * clfswm-internal.lisp (hide-group): new function.
2080 (show-all-group): clear-all: new parameter.
2082 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
2084 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
2086 * clfswm*: Color change for the pager. Typo or better description
2087 in bindings definitions. Define bindings for a qwerty keyboard by
2088 default. dot-clfswmrc show examples to switch to an azerty
2090 License change to GPL v3.
2091 * config.lisp: new file - group all globals variables in this
2094 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
2096 * xlib-util.lisp (hide-window): Remove structure-notivy events
2097 when hidding a window.
2099 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
2101 * package.lisp (*sm-property-notify-hook*): Readded
2102 property-notify-hook in second mode.
2104 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
2106 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
2108 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
2110 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
2111 Tile the current workspace with the current window on one side and
2112 others on the other (this emulate the larswm, dwm, wmii way). See
2113 the default configuration file to enable this mode by default.
2115 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
2118 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
2120 * clfswm-pager.lisp (pager-draw-window-in-group): Add
2121 ensure-printable to print windows name even with non-ascii
2124 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
2126 * clfswm-pager.lisp (pager-explode-current-group): Create a new
2127 group for each window in group.
2128 (pager-implode-current-group): Move all windows in workspace to
2129 one group and remove other groups.
2131 * clfswm-pack.lisp (explode-group): Create a new group for each
2133 (implode-group): Move all windows in workspace to one group and
2134 remove other groups.
2136 * clfswm-util.lisp (identify-key): Remove local configuration
2137 variables and made them available for configuration from
2139 (query-string): idem.
2141 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
2143 * netwm-util.lisp: Start of NetWM compliance.
2144 Add a Netwm client list gestion.
2146 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
2148 * clfswm-internal.lisp (create-group-on-request): open a new group
2149 only when the current group is not empty.
2151 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
2152 bug with null workspace.
2154 * clfswm-pager.lisp (pager-handle-event): Add a hook
2155 system. This hooks can be changed in the user configuration file.
2157 * package.lisp: All colors and font variables are set in
2158 package.lisp and can be configured in the user configuration
2160 Note: If you have configured some less ugly colors (esp. for the
2161 pager) don't hesitate to let me know :)
2163 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
2164 system. This hooks can be changed in the user configuration file.
2166 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
2167 changed in the user configuration file (~/.clfswmrc)
2169 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
2171 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
2172 arrow action, open next window in new workspace/group.
2174 * bindings.lisp (stop-all-pending-actions): new binding.
2175 (open-next-window-in-new-group-once): Open the next windows in a
2176 new group (only once) or open all new windows in a new group (like
2177 others windows managers).
2179 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
2181 * clfswm.lisp (read-conf-file): New function to read a lisp
2182 configuration file at startup.
2183 (focus-group-under-mouse): Check if group isn't the current group
2184 ( prevent a bug with unclutter ).
2186 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
2188 * bindings.lisp (run-program-from-query-string): A program can be
2189 launch from a input query window.
2191 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
2193 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
2195 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
2197 * clfswm.lisp (process-new-window): One can now open the next
2198 window in a workspace called by its number.
2200 * clfswm-util.lisp (query-font-string): Minimal editing
2202 (eval-from-string): And an REPL in the window manager... :)
2204 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2206 * clfswm.lisp (process-new-window): One can now open the next
2207 window in a new workspace or a new group.
2209 * clfswm-pager.lisp (pager-mode): Display the next arrow action
2210 with the hidden windows.
2212 * clfswm.lisp (second-key-mode): Display the current workspace
2213 number and the next arrow action in the state window.
2215 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
2216 the pager mode and then redisplay only the current workspace.
2218 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
2220 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
2221 they can be focused with a keypress, sorted or renumbered.
2223 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2225 * clfswm-pager.lisp (pager-mode): Remove multiple silly
2226 pager-draw-display. This prevent a lot of flickering in the
2229 * clfswm.lisp: Remove all display-force-output and replace them
2230 with only one display-finish-output in the event loop.
2232 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
2234 * clfswm-pager.lisp (pager-center-group): New function - center a
2235 group at the middle of the screen.
2237 * clfswm-pack.lisp (center-group): New function - center a group
2238 at the middle of the screen.
2240 * clfswm.lisp (show-group): Add a cross line under the group.
2241 (show-group): Group are showned even if fullscreened.
2242 (init-display): Add an exposure event on the root window.
2244 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
2246 * package.lisp (*default-group*): Default group is the same size
2247 of a fullscreened group.
2249 * bindings*: Use shift to move, control+shift to copy.
2251 * *.lisp: Add comments for configuration or alternatives. So grep
2252 for CONFIG to see where you can configure clfswm. And grep for
2253 Alternative to use some commented code.
2255 * clfswm.lisp (second-key-mode): Use a single window to show the
2256 second mode. See for alternatives at the end of this file.
2258 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
2260 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
2261 macro of key and mouse definitions.
2262 (define-define-key/mouse): Use state instead of modifiers list
2263 this fix a bug when the modifiers list is not in the rigth order.
2265 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
2267 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
2269 * clfswm-info.lisp (info-mode): Add an info mode.
2271 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
2273 * clfswm.lisp (process-new-window): Change border size for
2275 (show-all-windows-in-workspace): Unhide all windows even when the
2276 current group is in fullscreen mode.
2278 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
2280 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
2281 redisplay the identify window after a terminal switch.
2283 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
2284 redisplay the pager after a terminal switch.
2286 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
2288 * clfswm-util.lisp (identify-key): Add a window to display
2289 the keys to identify on screen.
2291 * bindings.lisp, bindings-pager.lisp: Define same keys to
2292 move/copy groups/windows in second mode and in pager.
2294 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
2296 (show-all-windows-in-workspace): unhide window before adapting it
2299 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
2301 * clfswm.lisp (handle-event): Revert to an older version.
2303 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
2305 * clfswm-util.lisp (force-window-in-group)
2306 (force-window-center-in-group): New functions for transient windows.
2308 * clfswm-pager.lisp (pager-remove-current-workspace/group):
2309 bugfix: hide all windows before removing group or workspace.
2311 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
2313 * bindings-pager.lisp (mouse-pager-move-selected-group)
2314 (mouse-pager-copy-selected-group)
2315 (mouse-pager-move-selected-window)
2316 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
2317 (mouse-pager-rotate-window-down): New functions to have mouse in
2320 * clfswm-pager.lisp (pager-swap-window)
2321 (pager-copy-group-on-next/previous-workspace)
2322 (pager-copy-window-on-next/previous-line): New functions
2324 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
2326 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
2327 (pager-move-group-on-next/previous-workspace): new functions.
2329 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
2330 to its half size (new functions).
2332 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
2334 * clfswm-pager.lisp: workspaces, groups and windows can now be
2335 selectionned with the keyboard or the mouse.
2337 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
2339 * clfswm-pager.lisp (pager-select-workspace-right/left):
2340 workspaces can now be selectionned with the keyboard.
2342 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
2344 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
2345 new function to remove a previous defined key or mouse combination.
2347 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
2349 * clfswm.lisp (main): Check for access error in init-display.
2351 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
2352 keycode before grabbing.
2354 * bindings.lisp: Remove nlambda and use defun to keep the function
2355 documentation with clisp.
2356 (define-shell): new macro to define shell command for the second
2359 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
2361 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
2364 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
2366 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
2367 workspace circulation.
2369 * clfswm-util.lisp (absorb-orphan-window): new function.
2371 * clfswm-keys.lisp: Keysyms support.
2373 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
2375 * clfswm.lisp (show-group): Use one gc for all groups and not one
2378 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
2380 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
2382 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
2383 width and height outside group.
2385 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
2387 * clfswm.lisp: First public release.