1 2011-05-17 Philippe Brochard <pbrochard@common-lisp.net>
3 * src/clfswm-util.lisp (copy-focus-window, cut-focus-window): New
4 functions and ask-close/kill-current-window menu and bindings
7 2011-05-16 Philippe Brochard <pbrochard@common-lisp.net>
9 * src/clfswm-util.lisp (ask-close/kill-current-window): Add an
10 *ask-close/kill-placement* placement window variable.
12 2011-05-09 Philippe Brochard <pbrochard@common-lisp.net>
14 * contrib/osd.lisp (funcall-button-from-code): Display osd
15 documention for buttons and fix some redefining warnings.
17 2011-05-07 Philippe Brochard <pbrochard@common-lisp.net>
19 * src/clfswm-nw-hooks.lisp (make-permanent-nw-hook-frame): New
20 function. Prevent to add or delete a new window hook for this
23 * src/clfswm-layout.lisp (update-layout-managed-children-position):
26 2011-05-06 Philippe Brochard <pbrochard@common-lisp.net>
28 * src/bindings-second-mode.lisp (set-default-second-keys):
29 select-brother-spatial-move-* binding update.
31 * src/clfswm-layout.lisp (tile-left|right|top|bottom-layout): Ask
32 to keep children positions or not.
34 * src/clfswm-internal.lisp (fixe-real-size): Takes care of border
37 * src/clfswm-layout.lisp (update-layout-managed-children): Fix a
38 bug by using the parent frame instead of the current child.
40 * src/clfswm-circulate-mode.lisp
41 (select-brother-generic-spatial-move+right/left/up/down): New
42 function to select a brother from another in a spatial move.
44 2011-04-19 Philippe Brochard <pbrochard@common-lisp.net>
46 * src/clfswm-pack.lisp (move-frame-constrained)
47 (resize-frame-constrained): Use pixels instead of floating
50 2011-04-18 Philippe Brochard <pbrochard@common-lisp.net>
52 * src/clfswm-pack.lisp (resize-frame-constrained): Takes care of
54 (implode-frame, implode-current-frame): New functions. Absorb all
55 frames subchildren in frame. Explode frame opposite.
57 2011-04-17 Philippe Brochard <pbrochard@common-lisp.net>
59 * src/clfswm-pack.lisp (move-frame-constrained)
60 (resize-frame-constrained): New function. Move and resize frame
61 with the mouse constrained by other frame brothers.
63 2011-04-14 Philippe Brochard <pbrochard@common-lisp.net>
65 * src/clfswm-util.lisp (with-movement-select-next-brother)
66 (with-movement-select-previous-brother)
67 (with-movement-select-next-child): Use a simple method (do not
68 enter in the circulate mode) to allow to circulate in all children
71 * src/clfswm-menu.lisp (open-menu): Save info hash table keys
72 instead of deleting newly created keys.
74 2011-03-21 Philippe Brochard <pbrochard@common-lisp.net>
76 * src/clfswm-internal.lisp (x-px->fl, y-px->fl): Takes care of
79 2011-03-20 Philippe Brochard <pbrochard@common-lisp.net>
81 * src/clfswm-info.lisp (show-config-variable): call
84 2011-03-18 Philippe Brochard <pbrochard@common-lisp.net>
86 * src/clfswm-autodoc.lisp (produce-conf-var-doc-html): Produce a
87 documentation for all configurable variables in CLFSWM -
90 * src/clfswm-internal.lisp (leave-frame): Hide all children except
93 2011-03-16 Philippe Brochard <pbrochard@common-lisp.net>
95 * src/clfswm-autodoc.lisp (produce-all-docs): Produce a
96 documentation for all configurable variables in CLFSWM.
98 * src/clfswm-layout.lisp (set-gimp-layout): Display a notify
99 window with the help on the GIMP layout.
101 2011-03-12 Philippe Brochard <pbrochard@common-lisp.net>
103 * src/menu-def.lisp: Menu update to prevent cursor keys clash.
105 * clfswm.asd: Change compilation order to prevent undefined
108 * src/clfswm-internal.lisp (show-child(frame)): Handle properly
109 the show-root-frame-p parameter.
111 2011-03-11 Philippe Brochard <pbrochard@common-lisp.net>
113 * src/clfswm-util.lisp (move-frame, resize-frame): Do not move or
114 resize a frame when it's the current root.
116 2011-03-10 Philippe Brochard <pbrochard@common-lisp.net>
118 * src/clfswm-internal.lisp (show-all-children): Handle properly
119 duplicated child in multipe frames.
121 2011-03-09 Philippe Brochard <pbrochard@common-lisp.net>
123 * contrib/volume-mode.lisp (set-default-volume-keys): Add more
124 keybindings (up/down, right/left) to raise/lower the volume.
126 * src/clfswm-layout.lisp: Add a variable border size for frames
129 2011-03-08 Philippe Brochard <pbrochard@common-lisp.net>
131 * src/clfswm-util.lisp (cut-current-child, remove-current-child)
132 (delete-current-child): Hide the current child before doing the
135 * src/clfswm-internal.lisp (show-all-children): Hide windows not
136 in the current root before displaying those in current root.
137 Remove all hide-all unnecessary calls.
139 * src/clfswm-configuration.lisp (save-variables-in-conf-file):
140 Save only variables with a different value than there original
143 2011-03-07 Philippe Brochard <pbrochard@common-lisp.net>
145 * src/clfswm-info.lisp (show-config-variable): Use the new
148 * src/clfswm-autodoc.lisp (produce-configuration-variables): Use
149 the new defconfig method.
151 * src/clfswm-configuration.lisp (create-configuration-menu):
152 Change the config system with a more lispy one and a less string
153 based one: (defconfig name value group doc).
156 2011-03-06 Philippe Brochard <pbrochard@common-lisp.net>
158 * src/clfswm-internal.lisp (show-all-children): Simplify the
160 (show-child): Display an unmanaged window whe it's the current
162 (show-all-children): add the ability to display all child from
163 *root-frame* and hide all those who are not in *current-root*.
164 -> remove hide-all-children when needed.
166 * src/xlib-util.lisp (move-window,resize-window): Add a
167 *color-move-window* border when moving or resizing a window.
169 2011-03-04 Philippe Brochard <pbrochard@common-lisp.net>
171 * src/clfswm-internal.lisp (show-all-children): Perform only one
172 recusion on the clfswm tree: calculate geometry and place child in
175 2011-03-03 Philippe Brochard <pbrochard@common-lisp.net>
177 * src/clfswm-internal.lisp (show-all-children): Rethink of display
178 child order to prevent very annoying flickering.
180 2011-02-27 Philippe Brochard <pbrochard@common-lisp.net>
182 * src/clfswm-util.lisp (query-yes-or-no): New function.
184 * src/clfswm-configuration.lisp (reset-all-config-variables): New
185 function and menu entry.
186 (query-conf-value): Add the ability to leave the field blank to
187 reset the variable to its default value.
189 2011-02-26 Philippe Brochard <pbrochard@common-lisp.net>
191 * src/clfswm-configuration.lisp
192 (add-all-configuration-default-value): Add a default value to
193 configurable variables.
195 2011-02-23 Philippe Brochard <pbrochard@common-lisp.net>
197 * src/clfswm.lisp (main-unprotected): Create the configuration
198 menu only once at startup.
200 2011-02-22 Desmond O. Chang <dochang@gmail.com>
202 * contrib/amixer.lisp: Add a volume mode inspired by the emms
203 volume package. Alsa mixer interface.
205 * contrib/volume-mode.lisp: Add a volume mode inspired by the emms
208 2011-02-22 Desmond O. Chang <dochang@gmail.com>
210 * src/clfswm.lisp (main): Use ASDF:SYSTEM-SOURCE-DIRECTORY instead
211 of *LOAD-TRUENAME*. *LOAD-TRUENAME* is only bound during a call to
212 LOAD. If one eval CLFSWM:MAIN in repl, BASE-DIR will be an empty
213 string. Use ASDF:SYSTEM-SOURCE-DIRECTORY to fix it.
215 2011-02-16 Philippe Brochard <pbrochard@common-lisp.net>
217 * src/clfswm.lisp (main-unprotected): Add a close hook. And close
218 the notify window, the virtual keyboard and the clfswm terminal by
221 2011-02-15 Philippe Brochard <pbrochard@common-lisp.net>
223 * src/clfswm.lisp (main-unprotected): Destroy the notify window
224 before closing the display. This fix a bug when resetting/reloading
227 2011-02-12 Philippe Brochard <pbrochard@common-lisp.net>
229 * src/xlib-util.lisp (equal-wm-class-fun, equal-wm-name-fun)
230 (raise-window-fun, raise-and-focus-window-fun): New functions.
232 * src/config.lisp (*clfswm-terminal-cmd*): Switch from xterm to
234 (*never-managed-window-list*): Structure change to be more
235 flexible. Let the choice to focus, raise and do nothing on never
238 2011-02-09 Philippe Brochard <pbrochard@common-lisp.net>
240 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Take
241 care of never managed windows to move or resize them if the raise
244 * src/clfswm-internal.lisp (in-frame, in-window, in-child): New
247 2011-02-08 Philippe Brochard <pbrochard@common-lisp.net>
249 * src/clfswm.lisp (main-mode): Raise or not unmanaged windows
250 following request in *never-managed-window-list*.
252 2011-02-05 Philippe Brochard <pbrochard@common-lisp.net>
254 * *: **** Release 1102 ****
256 2011-02-05 Desmond O. Chang <dochang@gmail.com>
258 * src/keysyms.lisp: Add extended keysyms from stumpwm.
260 2011-02-01 Desmond O. Chang <dochang@gmail.com>
262 * src/clfswm-util.lisp (run-or-raise): New function (thanks to
265 * src/clfswm-internal.lisp (with-all-*): add a nil block.
267 2011-01-28 Desmond O. Chang <dochang@gmail.com>
269 * src/clfswm-util.lisp (xdg-config-home): XDG_CONFIG_HOME should
270 be $HOME/.config by default.
272 2010-12-29 Philippe Brochard <pbrochard@common-lisp.net>
274 * contrib/osd.lisp (display-doc): Add another method where a
275 CLFSWM native window is used to display the key documentation.
277 2010-12-27 Philippe Brochard <pbrochard@common-lisp.net>
279 * src/xlib-util.lisp (with-xlib-protect): Force to revert to the
282 2010-12-25 Philippe Brochard <pbrochard@common-lisp.net>
284 * src/clfswm-second-mode.lisp (second-key-mode): Call the second
285 mode leave function only when the generic mode was ended.
287 2010-12-08 Philippe Brochard <pbrochard@common-lisp.net>
289 * src/clfswm-second-mode.lisp (sm-leave-function): Do not use
290 *second-mode-program* anymore.
292 2010-12-07 Philippe Brochard <pbrochard@common-lisp.net>
294 * src/clfswm-second-mode.lisp (*second-mode-leave-function*): New
295 variable bound to a function executed (when not null) on second
298 2010-11-14 Philippe Brochard <pbrochard@common-lisp.net>
300 * src/clfswm-util.lisp (find-child-under-mouse): Do not find
303 2010-11-13 Philippe Brochard <pbrochard@common-lisp.net>
305 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
306 Do not display the accel window for unmanaged windows.
308 2010-11-11 Philippe Brochard <pbrochard@common-lisp.net>
310 * src/clfswm-internal.lisp (set-current-root): Handle
311 window-parent in set-current-root.
313 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
314 focus the parent child when the current root is a window.
316 2010-11-09 Philippe Brochard <pbrochard@common-lisp.net>
318 * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
319 New function an bindings.
321 * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
324 2010-11-07 Philippe Brochard <pbrochard@common-lisp.net>
326 * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
327 function to let the user choose to keep child position with
330 * src/clfswm-internal.lisp (remove-frame-data-slot): New
333 2010-11-05 Philippe Brochard <pbrochard@common-lisp.net>
335 * src/clfswm-internal.lisp (frame-select-next-child)
336 (frame-select-previous-child): New functions and bindings. Select
337 the next/previous child in the current frame.
339 2010-10-31 Philippe Brochard <pbrochard@common-lisp.net>
341 * src/clfswm-query.lisp (query-mode-complet): New function: Handle
342 completion in query-mode.
344 2010-10-30 Philippe Brochard <pbrochard@common-lisp.net>
346 * src/clfswm-query.lisp (query-print-string): Handle long lines
349 2010-10-27 Philippe Brochard <pbrochard@common-lisp.net>
351 * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
352 all characters are printable.
354 2010-10-25 Philippe Brochard <pbrochard@common-lisp.net>
356 * contrib/server/server.lisp: Load clfswm client code in the main
357 program and let the user start it with a --client command line
360 * src/package.lisp (*main-entrance-hook*): New hook executed after
361 loading configuration file and before opening the display.
363 2010-10-23 Philippe Brochard <pbrochard@common-lisp.net>
365 * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
367 * src/clfswm-internal.lisp (show-child): Show window only if not
370 * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
371 change modifiers after binding definition.
373 2010-10-21 Philippe Brochard <pbrochard@common-lisp.net>
375 * contrib/osd.lisp: New file: OSD (On Screen Display) for
378 * src/clfswm-menu.lisp (open-menu): Modularise function.
380 2010-10-13 Philippe Brochard <pbrochard@common-lisp.net>
382 * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
383 key binding in main and second mode.
385 2010-10-10 Philippe Brochard <pbrochard@common-lisp.net>
387 * src/clfswm-util.lisp (open-notify-window): Convert hello-window
388 functions to a more generic Notify-window system.
390 * src/tools.lisp (add-timer): Add an id to identify the timer.
392 2010-10-09 Philippe Brochard <pbrochard@common-lisp.net>
394 * src/tools.lisp (erase-timer): New function.
396 * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
397 the hello window. Add Configuration variables.
399 2010-10-08 Philippe Brochard <pbrochard@common-lisp.net>
401 * src/clfswm-util.lisp (): Add an Hello window at startup.
403 * src/tools.lisp (process-timers): Add a timer system.
405 2010-10-07 Philippe Brochard <pbrochard@common-lisp.net>
407 * src/clfswm-query.lisp (add-in-query-string): Handle correctly
410 2010-10-06 Philippe Brochard <pbrochard@common-lisp.net>
412 * src/clfswm-query.lisp (query-print-string): Change cursor color
413 and show parenthesis matching with colors (on match and on
416 2010-10-05 Philippe Brochard <pbrochard@common-lisp.net>
418 * src/clfswm-internal.lisp (show-all-children): Do not raise a
419 child when its parent is hidden.
421 2010-10-02 Philippe Brochard <pbrochard@common-lisp.net>
423 * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
424 possibility to circulate over subchild of the current child.
426 * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
427 (expose-windows-generic): Add an escape-body function to return to
428 the original state on escape key.
430 * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
431 to bind the current child from the configuration file.
433 2010-10-01 Philippe Brochard <pbrochard@common-lisp.net>
435 * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
436 window hook: the frame absorb all new windows that match
437 nw-absorb-test frame data slot.
439 2010-09-30 Philippe Brochard <pbrochard@common-lisp.net>
441 * src/clfswm-expose-mode.lisp (expose-create-window): Show window
442 title in accel window.
444 2010-09-29 Philippe Brochard <pbrochard@common-lisp.net>
446 * configure: Use the Xavier Maillard clfswm script in contrib to
447 build an executable in the standard way.
449 2010-09-26 Philippe Brochard <pbrochard@common-lisp.net>
451 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
452 New functions. Add a window on each child in the expose mode to
455 * src/clfswm-internal.lisp (child-x, child-y, child-width)
456 (child-height): New methods to get real child coordinates.
458 2010-09-25 Philippe Brochard <pbrochard@common-lisp.net>
460 * src/clfswm-layout.lisp (*-layout): Use child-position.
462 * src/clfswm-internal.lisp (child-position): New function.
464 * src/clfswm-expose-mode.lisp (expose-windows-mode)
465 (expose-all-windows-mode): Use a generic mode.
467 * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
468 with handle-event-fun symbols instead of inspecting clfswm
469 internals symbols on each mode change.
471 * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
472 a separate clfswm-expose-mode.lisp file.
474 * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
475 screen size instead of hardcoded test coordinates.
477 2010-09-24 Philippe Brochard <pbrochard@common-lisp.net>
479 * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
480 (speed-mouse-right, speed-mouse-up, speed-mouse-down)
481 (speed-mouse-undo, speed-mouse-first-history): New functions to
482 quickly move the mouse. Implemented for the second mode.
484 2010-09-16 Philippe Brochard <pbrochard@common-lisp.net>
486 * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
487 write permission on $clfswm_asd_path. So anybody can start clfswm
488 even if there is no write permission on the source directory.
490 2010-09-12 Philippe Brochard <pbrochard@common-lisp.net>
492 * contrib/clfswm: Add support to cmucl, ccl and ecl.
494 2010-09-11 Philippe Brochard <pbrochard@common-lisp.net>
496 * src/clfswm-util.lisp (set-hide-unmanaged-window)
497 (set-show-unmanaged-window, set-default-hide-unmanaged-window):
498 New functions and menu entry.
499 (set-globally-hide-unmanaged-window)
500 (set-globally-show-unmanaged-window): New functions and menu
503 * src/clfswm-internal.lisp (hide-unmanager-window-p): New
505 (show-child): Add a data slot on frame to hide or not unmanaged
508 * src/clfswm-corner.lisp (present-clfswm-terminal)
509 (present-virtual-keyboard): Use a function (generic-present-body)
510 instead of a macro (generate-present-body).
512 * src/clfswm-util.lisp (update-menus): List all directories and
513 subdirectories in $XDG_DATA_DIRS/applications.
515 2010-09-10 Philippe Brochard <pbrochard@common-lisp.net>
517 * src/clfswm-corner.lisp (generate-present-body): New macro.
518 (present-clfswm-terminal, present-virtual-keyboard): Use
519 generate-present-body.
521 2010-09-09 Philippe Brochard <pbrochard@common-lisp.net>
523 * src/clfswm-util.lisp (update-menus): Follow XDG specifications
524 instead of the non-portable Debian update-menu.
526 2010-09-07 Philippe Brochard <pbrochard@common-lisp.net>
528 * src/clfswm.lisp (error-handler): New function do handle
529 asynchronous errors and ignore them.
530 (open-display): Install the new error-handler on display.
532 2010-09-05 Philippe Brochard <pbrochard@common-lisp.net>
534 * src/xlib-util.lisp (with-xlib-protect): Add a
535 with-simple-restart on top of body execution.
537 2010-09-04 Philippe Brochard <pbrochard@common-lisp.net>
539 * src/clfswm.lisp (main-loop): Protect all xlib functions with an
542 * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
543 handle-event. Add a with-simple-restart to prevent a
544 clisp/new-lisp infinite loop.
546 2010-08-30 Philippe Brochard <pbrochard@common-lisp.net>
548 * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
549 clfswm terminal working even on xterm title changes.
551 2010-08-29 Philippe Brochard <pbrochard@common-lisp.net>
553 * src/clfswm-util.lisp (run-other-window-manager): Update for
556 * src/tools.lisp (do-execute): New parameter io to change the
559 * src/clfswm-util.lisp (hide-current-child): Prevent from removing
562 * src/clfswm-internal.lisp (child-member): New predicate.
563 (child-remove): New function.
565 * src/*.lisp: Use child-member and child-remove everywhere it's
568 2010-08-28 Philippe Brochard <pbrochard@common-lisp.net>
570 * src/clfswm.lisp (main-loop): Ensure that all events have been
571 processed after a process-event.
573 * src/clfswm-internal.lisp (is-in-current-child-p): New function.
575 2010-08-27 Philippe Brochard <pbrochard@common-lisp.net>
577 * src/clfswm.lisp (main-mode:configure-request): Raise the window
578 only when present on the current child and focus it accordingly.
580 2010-08-26 Philippe Brochard <pbrochard@common-lisp.net>
582 * src/clfswm-circulate-mode.lisp (circulate-loop-function):
583 Use is-a-key-pressed-p.
585 * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
587 * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
588 returned by xlib:keysym->keycodes.
590 * src/*.lisp: Use the new child-equal-p to compare children. This
591 prevent a bug with sbcl/cmucl when the standard equal function
592 does not work with xlib:window.
594 * src/clfswm-internal.lisp (child-equal-p): New predicate.
596 2010-08-25 Philippe Brochard <pbrochard@common-lisp.net>
598 * src/clfswm-generic-mode.lisp (generic-mode): Use an
599 xlib:event-listen before processing event with
600 xlib:process-event. This prevent a bug with CLX threaded
601 implementation like sbcl.
603 * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
604 processing event with xlib:process-event. This prevent a bug with
605 CLX threaded implementation like sbcl.
607 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
609 * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
611 * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
614 * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
615 (find-parent-frame, find-frame-window, find-frame-by-name)
616 (find-frame-by-number): Use with-find-in-all-frames to search in
617 frames in the right order.
619 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
620 unwanted flickering with unmanaged windows.
622 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
624 * src/package.lisp: Remove event handler hooks as they're not
625 needed anymore (To replace them: use closure and define-handler).
627 * src/xlib-util.lisp (move-window, resize-window)
628 (wait-mouse-button-release): Use a generic mode.
630 * src/*.lisp: Replace the case to handle event with a more (tricky)
631 lispy method which bind a function to each keywords associated
634 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
636 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
637 menu entry between delete-current-child and remove-current-child.
638 ie: Delete a child and its children in all frames by default.
640 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
642 * src/package.lisp: Add a placement configuration group.
644 * src/binding*.lisp: Bind control+g to escape the current action
647 * src/clfswm-internal.lisp
648 (delete-child-and-children-in-all-frames): New function and
649 binding: Second mode - Control+Delete delete the current child and
650 its children in all frames (ie: close the current child and its
653 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
655 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
656 the frame window and the frame gc. Close a very annoying bug when
657 cuting/pasting a frame or moving a child over frames with the
660 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
661 all children in *current-root* after moving/resizing a frame.
663 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
665 * src/clfswm-util.lisp (delete-focus-window)
666 (destroy-focus-window): Remove child in parent frame before
669 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
671 * src/clfswm-util.lisp (identify-key): Add a timeout in
673 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
674 of the window passed by xlib:process-event.
676 * src/xlib-util.lisp (move-window, resize-window)
677 (wait-mouse-button-release): Add a timeout in xlib:process-event.
679 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
681 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
682 to launch an other window manager and to return to clfswm.
684 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
686 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
689 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
691 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
694 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
695 parameter and a loop timeout.
697 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
699 * src/clfswm.lisp (main): Add an alternate configuration filename
702 * load.lisp: Add a debuging code example.
704 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
706 * src/clfswm-configuration.lisp (create-configuration-menu): New
707 menu to configure all clfswm variables while clfswm is running.
709 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
711 * src/clfswm-util.lisp (save-configuration-variables): New
712 function to save all configuration variables in clfswmrc.
714 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
716 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
718 (set-default-info-keys): Add cursor key support in info mode.
720 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
722 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
725 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
726 prevent reading the configuration file (this may be useful to
727 produce the original documentation without user modifications
728 with the rc configuration file).
730 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
732 * src/bindings-second-mode.lisp (set-default-second-keys):
733 Simplification of Escape key to close/kill/remove the focus window
734 and unhide all windows.
736 * src/bindings.lisp (set-default-main-keys): Simplification of
737 Escape key to close/kill/remove the focus window and unhide all
740 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
741 focus and unhide all windows capabilities.
743 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
745 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
747 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
749 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
750 Keep child order and don't make unnecessary child movement.
751 (one-column-layout, one-line-layout): New layouts.
753 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
755 * *: **** Release 0906 ****
757 * contrib/cd-player.lisp: New file to handle the CD player.
759 * contrib/xmms.lisp: New file to handle the xmms player.
761 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
763 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
764 Maximize windows in there frame - Leave frames to there actual
767 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
768 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
770 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
772 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
774 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
776 * contrib/mpd.lisp: Use a standard menu.
778 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
780 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
782 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
784 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
786 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
789 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
791 * src/config.lisp (get-fullscreen-size): One pixel adjustment
794 * src/clfswm-placement.lisp (*-child-placement): One pixel
797 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
799 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
800 Ensure that all characters are printable.
802 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
805 * src/clfswm-placement.lisp (*-child-placement): Adjust
806 coordinates to one pixel in the current child.
808 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
810 * src/clfswm-query.lisp (query-enter-function): Assign font before
811 width and height calculation.
813 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
815 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
816 bannish the pointer in an arbitrary place.
818 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
819 place the info window in an arbitrary place.
821 * src/clfswm-query.lisp (query-enter-function): Use with-placement
822 macro to place the query window in an arbitrary place.
824 * src/clfswm-placement.lisp: New file. Allow to place info windows
825 or query windows on an arbitrary place. Allow to bannish the
826 pointer on an arbitrary place.
828 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
830 * src/clfswm-circulate-mode.lisp (reorder-child)
831 (reorder-brother): Unfocus windows before reordering children or
834 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
836 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
837 the parent is a frame.
839 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
840 motion with a default modifier.
842 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
845 * src/clfswm-info.lisp (info-mode): Handle motion with a default
847 (info-mode): Optimization in loop function.
849 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
851 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
852 root-frame correctly.
854 * clfswm.asd: Dependency fix for clfswm-generic-mode.
856 * src/clfswm-circulate-mode.lisp (reorder-child)
857 (reorder-brother): Handle empty frames.
858 (reorder-brother): Redisplay only the parent frame of the current
861 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
862 parent frame of the current frame.
864 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
866 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
867 Maximize/Unmaximize the current frame in its parent frame.
869 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
870 windows and frames in there parent frame.
872 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
874 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
876 * src/clfswm-circulate-mode.lisp (reorder-child)
877 (reorder-brother): Reinitialise on circulate type change
878 child to brother or brother to child.
880 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
881 calls xlib:display-finish-output on each map-request. So speed up
884 * src/xlib-util.lisp (map-window): New function. Call
885 xlib:display-finish-output on each map request.
887 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
889 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
890 Optimisation when drawing second mode window.
892 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
894 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
897 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
899 * src/clfswm-util.lisp (run-program-from-query-string): Launch
900 command only with a return validation.
902 2009-04-22 Xavier Maillard <xma@gnu.org>
904 * src/clfswm-query.lisp (query-string): Use a generic mode.
906 2009-04-19 Xavier Maillard <xma@gnu.org>
908 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
910 2009-04-18 Xavier Maillard <xma@gnu.org>
912 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
913 to define all other modes.
915 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
917 * src/package.lisp (): Use *default-font-string* for all
920 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
922 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
924 * src/xlib-util.lisp (null-size-window-p): Better check of null
927 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
929 * src/clfswm.lisp (handle-map-request): Add a fix to manage
930 correctly fullscreen windows (SDL particularly).
932 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
934 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
935 a segfault with clisp/new-clx.
937 * src/clfswm.lisp (handle-motion-notify): Add a needed window
940 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
941 needed window argument.
943 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
945 * src/xlib-util.lisp (wait-no-key-or-button-press)
946 (wait-a-key-or-button-press): Check buttons press/release correctly"
948 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
950 * src/menu-def.lisp: Add children navigation menu in the movement
951 menu (select next/previous child/brother/level).
953 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
955 * *: Rename 'sister' frame to 'brother' frame.
957 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
958 alias in a real modifier.
960 * src/package.lisp (*modifier-alias*): New list of modifier alias
961 For example: :alt is :mod-1, :numlock is :mod-2...
963 * src/tools.lisp (remove-hook): New function.
965 * src/clfswm-keys.lisp (with-capslock, without-capslock)
966 (with-numlock, without-cnumlock): New functions.
968 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
970 * src/clfswm-info.lisp: Use the *binding-hook* to create info
971 keys and mouse bindings.
973 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
974 second keys and mouse bindings.
976 * src/bindings.lisp: Use the *binding-hook* to create main keys
979 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
981 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
984 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
986 * src/menu-def.lisp: Use a menu instead of a function for the
989 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
991 * src/clfswm-util.lisp (show-standard-menu): Display the standard
992 menu from the 'update-menus' command.
994 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
996 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
997 it's already grabbed.
999 * src/clfswm-internal.lisp (display-frame-info): Use configurable
1000 colors and fix a bug with background.
1001 (display-frame-info): Set window background when displaying info.
1003 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1005 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
1006 warning with clisp/new-clx.
1008 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
1010 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
1013 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1015 * *: **** Release 0809 ****
1017 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1019 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
1021 (ensure-unique-number): New function and menu entry.
1023 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
1025 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
1026 hook: open the next window in a named frame.
1027 (numbered-frame-nw-hook): New new window hook: open the next
1028 window in a numbered frame.
1030 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
1031 cases. So query-string can be called even in the main mode.
1033 * src/clfswm-internal.lisp (show-all-children): Do not raise a
1034 child by default => far less flickering.
1036 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
1038 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
1040 * src/menu-def.lisp: Change key binding for the CLFSWM menu
1043 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
1044 is nil. (workaround on some CLX implementation).
1046 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
1048 * src/menu-def.lisp: Add a menu to set a focus policy for all
1051 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
1052 (all-frames-set-*-focus-policy): Set a focus policy for all
1055 * src/clfswm.lisp (handle-enter-notify): sloppy-select
1056 mode. Select a child and its parents on mouse over.
1058 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
1060 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
1061 policy -> Sloppy focus only for windows in the current frame.
1062 (main-unprotected): Exit clfswm on init error (ie: when another
1063 window manager is running).
1065 * src/clfswm-util.lisp (reset-clfswm): New function.
1067 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
1069 * src/clfswm-menu.lisp (init-menu): New function.
1071 * src/clfswm-util.lisp (reload-clfswm): New function to reload
1073 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
1075 * src/clfswm.lisp (main, main-unprotected): Handle error in a
1076 superior main function. Now CLFSWM can't break the X session. It
1077 just reinitialize the display and run a new main loop.
1079 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
1080 *vt-keyboard-on* global to avoid warnings when loading clfswm.
1082 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
1083 (help-on-gimp-layout): Describe how to use the GIMP layout.
1085 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
1087 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
1088 main-window-right-layout. Change the keybinding for (shift)alt+tab
1089 to not select windows in the main window lisst.
1090 Bind F8 to add a window in the main window list.
1091 Bind F9 to remove a window in the main window list.
1092 Change the focus policy to :sloppy.
1093 (set-previous-layout): Restore the previous layout, keybinding and
1096 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
1098 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
1100 * src/clfswm-layout.lisp (main-window-left-layout)
1101 (main-window-bottom-layout, main-window-top-layout): New
1103 Factorize layouts in menu.
1105 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
1107 * src/clfswm-layout.lisp (main-window-right-layout): A possible
1108 GIMP layout: one or more main windows on one side of the
1109 frame. Others on the other size.
1111 * src/clfswm-util.lisp
1112 (current-frame-set-click/sloppy-focus-policy): Each frame can have
1113 a different focus policy (one of :click or :sloppy).
1114 The default focus policy is set with *default-focus-policy*.
1116 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
1118 * src/clfswm-info.lisp (show-config-variable): New function.
1120 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
1122 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
1124 * src/clfswm-info.lisp: Colored help for key binding and corners
1127 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
1129 * src/clfswm-util.lisp (delete-focus-window)
1130 (destroy-focus-window): Remove chid only in
1131 handle-unmap/destroy-notify. Focus *current-root* only when
1132 closing/killing the current child.
1134 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
1135 functions or corners.
1137 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1139 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
1140 action: Hide/Unhide a terminal on mouse corner action. (By default
1141 right mouse button on the top left corner).
1143 * src/config.lisp (*never-managed-window-list*): New config
1146 * src/clfswm-internal.lisp (never-managed-window-p): New function:
1147 Handle never managed window in a more simple way.
1149 * src/clfswm-corner.lisp: New file and new and more simple method
1150 to define corners actions.
1152 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
1154 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
1156 * src/clfswm-layout.lisp (fast-layout-switch)
1157 (define-fast-layout-switch): New functions: Switch between two
1160 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
1161 really in the second mode. So leave-second-mode can be used even
1164 * src/clfswm-util.lisp (switch-to-last-child): New function:
1165 Store the current child and switch to the previous one.
1167 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1169 * src/clfswm-util.lisp (display-current-window-info): Display the
1171 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
1172 (top right by default). By default 'xvkbd' is used.
1174 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1176 * src/xlib-util.lisp (move-window, resize-window): Compress motion
1179 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
1181 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
1184 * src/clfswm-info.lisp (info-mode): Compress motion events.
1186 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
1188 * src/clfswm-internal.lisp (show-all-children): Compute geometry
1189 and selection first and then show only necessary children.
1190 (show-child): remove unneeded display-p parameter.
1192 * src/config.lisp (get-fullscreen-size): Place the frame border
1193 outside the screen (this prevent the loose of 2 pixels per
1196 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
1198 * src/clfswm-internal.lisp (focus-child): Algorithm change to
1199 raise only the selected child.
1201 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
1203 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
1204 Raise only viewable children.
1206 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
1208 * src/clfswm-internal.lisp (show-all-children): Always raise all
1209 displayed children. Remove all references to raise-p.
1211 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1213 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
1216 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
1217 second mode binding on raise/lower child in its frame.
1219 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
1220 behaviour to the new raise/lower property.
1221 Call clear-nw-hook before the rest of the hook.
1223 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
1224 (mouse-click-to-focus-and-resize-window): Stop button event. This
1225 prevent a keyboard/pointer freeze.
1227 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1229 * src/clfswm-internal.lisp (frame-lower-child)
1230 (frame-raise-child): New functions to raise/lower a child in its
1233 * src/clfswm-util.lisp (have-to-present-windows)
1234 (have-to-present-all-windows): New functions to have an MaxOS
1235 expose like on mouse click in screen corner.
1237 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
1239 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
1241 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
1242 child from a choice in all frames with hidden children.
1244 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
1246 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
1248 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
1249 (unhide-all-children): New functions.
1251 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
1254 * src/clfswm-util.lisp (hide/show-frame-window): new function and
1257 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
1259 * src/clfswm-util.lisp (rename-current-child): Do not display the
1260 frame info for a window.
1262 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
1264 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
1265 frame window for the removed child and its children.
1267 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
1269 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
1272 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
1274 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
1275 the ROX pinboard (ie: leave it lowered in the root window as
1278 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
1279 (tile-left-layout, tile-right-layout, tile-top-layout)
1280 (tile-bottom-layout): Use all the frame space when there is only
1283 * src/clfswm-internal.lisp (place-window-from-hints): Center
1284 unmanaged windows in the root screen.
1286 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
1289 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1291 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
1292 typo in managed types.
1294 * src/clfswm-internal.lisp (show-child): Always display frame info
1295 even if the frame is hidden.
1297 * src/xlib-util.lisp (resize-window): Use a better algorithme to
1300 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1302 * src/clfswm-util.lisp (with-movement): Display frame info for all
1303 frames in current root.
1305 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1307 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
1309 * src/bindings-second-mode.lisp (define-second-key #\a): New
1310 binding on 'add-default-frame'.
1312 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1313 message to follow the autodocumentation process.
1315 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1317 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1318 "Space" to jump to a child. "B" to bind a slot on the current
1321 * src/bindings-second-mode.lisp: Use "Tab" instead of
1324 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
1326 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1327 unmanaged (hidden) windows.
1329 * src/clfswm-internal.lisp (place-window-from-hints): Give a
1330 minimal size for windows.
1331 (with-all-windows-frames-and-parent): New function.
1333 * src/config.lisp (*default-window-width/height*): New parameters.
1335 * src/clfswm-internal.lisp (place-window-from-hints): Center
1336 windows in the screen instead of in there frame.
1338 * src/bindings-second-mode.lisp (tile-space-current-frame): New
1341 * src/clfswm-layout.lisp (register-layout): Intern the once name
1342 in the right package.
1344 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1346 * doc/dot-clfswmrc: Update to follow the new clfswm way.
1348 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
1350 * src/clfswm-internal.lisp (set-current-child)
1351 (adapt-child-to-parent, show-child, hide-child): Handle the case
1352 where child is not a frame or a window.
1354 * src/clfswm-util.lisp
1355 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1356 Check if child is a frame.
1358 * src/clfswm-internal.lisp (managed-window-p): Handle the case
1359 where frame is null.
1360 (place-frame): Check if frame and parent are frames.
1362 * src/clfswm-info.lisp (info-mode): display all frame info before
1365 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1366 info before leaving.
1368 * src/clfswm-internal.lisp (display-all-frame-info): New function.
1370 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
1372 * src/tools.lisp (getenv): Implemented for ECL.
1373 (urun-prog): Implemented for ECL.
1375 * src/clfswm-util.lisp (identify-key): Use a double buffer to
1378 * src/clfswm-query.lisp (query-string): Use a double buffer to
1381 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1384 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1387 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
1389 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1391 * src/menu-def.lisp: New file: move all menu definition in
1394 * src/clfswm-layout.lisp (register-layout): Use a function instead
1397 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
1399 * src/clfswm-autodoc.lisp (produce-menu-doc,
1400 (produce-menu-doc-html): New functions.
1401 (produce-doc-*): Moved to clfswm-autodoc.lisp.
1403 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1404 paste a child on one of its own children. (this prevent a
1406 (move-child-to): Rename move/copy-current-child-by to
1408 (mouse-move-window-over-frame): New function to move the window
1409 under the mouse cursor to another frame.
1411 * src/clfswm-internal.lisp (find-child-in-parent): New function.
1413 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1415 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1416 windows only when its window parent is the current child.
1418 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1420 * src/clfswm-util.lisp (manage-current-window)
1421 (unmanage-current-window): New functions: Allow to force to manage
1422 or unmanage a window by its parent frame.
1424 * src/bindings-second-mode.lisp (#\o): binded to
1425 set-open-in-new-frame-in-parent-frame-nw-hook and
1426 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1428 * src/clfswm-util.lisp (with-current-window): New macro.
1430 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1431 exposure and enter-window handle event.
1433 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1434 children for the current child after the move/resize.
1436 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1438 * src/xlib-util.lisp (resize-window): Take care of window size
1441 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1442 move/resize unmanaged windows.
1444 * src/xlib-util.lisp (move-window, resize-window): New functions.
1446 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1448 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1449 user choose what window type the current frame must handle.
1450 (display-current-window-info): New function.
1451 (current-frame-manage-all-window-type)
1452 (current-frame-manage-only-normal-window-type)
1453 (current-frame-manage-no-window-type): New functions.
1455 * src/clfswm-internal.lisp (managed-window-p): New function.
1457 * src/package.lisp (frame): Managed type: new frame
1458 parameter. This allow to choose what window type a frame must
1461 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1463 * src/clfswm-nw-hooks.lisp
1464 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1466 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1469 * src/tools.lisp (ensure-printable): Return always a string even
1472 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
1474 * src/config.lisp (*default-nw-hook*): New variable to change the
1475 default new window hook.
1477 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1479 * clfswm.asd (clfswm): Add a dependency from
1480 clfswm-second-mode.lisp to clfswm.lisp.
1482 * src/clfswm-util.lisp (identify-key): Show the documentation for
1483 the function bound on a key.
1484 (with-movement): Move with-movement,
1485 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
1486 to clfswm-util.lisp.
1488 * src/clfswm-menu.lisp: New menu system that let user change keys
1489 or functions associated to keys.
1491 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
1493 * src/clfswm-internal.lisp (show-all-children): Display-child is
1494 the first child by default. Solve a bug with father-p.
1496 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
1498 * src/clfswm-internal.lisp (add-frame): Add frame return the
1500 (show-all-children): Move the size computation outside the
1503 * src/bindings-second-mode.lisp (with-movement): Redisplay only
1506 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1507 only the current child.
1509 * src/clfswm-internal.lisp (show-all-children): New display-child
1510 parameter to display only the desired child and its children.
1511 (select-next/previous-child): Only display the current child.
1513 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
1515 * src/clfswm.lisp (init-display): Move the default frame creation
1516 on the default init hook.
1518 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1519 the main mode (for example: "1" on an azerty keyboard).
1521 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
1523 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1524 keysyms. Revert to old grabbing method for the main mode.
1526 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
1528 * src/clfswm.lisp (init-display): Add key handling on no focus
1529 window and on frame windows.
1531 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1533 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1534 all keys by default and replay just what is needed. No change for
1537 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1538 (find-key-from-code): Test for shift and not shift presence.
1540 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
1542 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1543 new key parameter to have less flickering.
1545 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
1547 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1548 layout only one time and revert to no-layout to freely handle
1551 * src/clfswm-nw-hooks.lisp
1552 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1553 with new created window.
1555 * src/clfswm-layout.lisp (register-layout): Now register
1556 automatically a once layout to set the layout only one time and
1557 revert to no-layout to freely handle frames.
1559 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1561 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1562 nw-hook: Open the next window in the current frame and leave the
1563 focus to the current child.
1565 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
1567 * src/bindings-second-mode.lisp: Add keys definitions to
1568 bind-or-jump in the second mode.
1570 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
1571 macro for bind-or-jump-(1|2|3...).
1573 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
1574 arguments to function. This allow to do things like:
1575 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
1576 are passed to my-function on key press.
1578 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
1580 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
1582 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
1584 * src/clfswm-internal.lisp (child-fullname): New function
1586 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
1587 docstring in info-mode-menu. An item can be
1588 '((key function) (key function)) or with docstring
1589 '((key function "documentation 1") (key function "bla bla") (key function))
1591 * src/tools.lisp (ensure-n-elems): New function.
1593 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
1594 resize a frame or the window's father.
1596 * src/clfswm.lisp (init-display): Remove tile-space-layout by
1597 default on the root frame.
1599 * src/clfswm-util.lisp (move/resize-frame): Add standard event
1600 hooks handlers (map-request, configure-notify...)
1602 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
1605 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1607 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
1608 or the window's father.
1610 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
1611 event only if there is a geometry change.
1612 (mouse-focus-move/resize-generic): Generic function to move or
1613 resize a frame or a window father frame.
1615 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1617 * src/clfswm-internal.lisp (show-all-children): Return t if there
1618 is a geometry change.
1620 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
1622 * src/bindings.lisp (Up/Down): Swap select previous/next level.
1624 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
1626 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
1628 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
1629 (with-all-*): Reverse the child list to manage the first child last (like in
1632 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
1633 root window only if true.
1635 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
1636 root window only if *create-frame-on-root* is true.
1638 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
1641 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
1643 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
1644 the current child (even if it's a window).
1646 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
1648 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
1649 (mouse-click-to-focus-and-resize): New functions.
1651 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
1652 (*-px->fl): Convert pixel coordinates to float.
1654 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
1656 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
1658 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
1661 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
1662 and hide-all-children.
1663 (raise-if-needed): New function.
1664 (show-child): Use a first-p parameter to raise windows only when they are
1667 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
1669 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
1672 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
1674 * src/clfswm-info.lisp (keys-from-list): new function.
1676 * src/*: rename 'childs' in 'children'.
1678 * src/*: rename 'group' in 'frame'.
1680 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
1682 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
1684 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
1686 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
1688 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
1690 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
1691 Bind control+o to open the next window in a new group in the root group
1692 (as open in next window in a new workspace in 0801 version).
1694 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
1696 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
1699 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
1701 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
1702 instead of Tab for select-previous-child.
1704 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
1706 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
1709 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
1711 * clfswm-util.lisp (identify-key): Display the documentation
1712 associated to keys when identifying a key.
1714 2008-03-10 Xavier Maillard <xma@gnu.org>
1716 * contrib/clfswm: Complete rewrite of the script. Detect error and
1717 act accordingly. Add command line arguments to configure the
1718 script execution. User can now choose different common lisp
1719 implementation (clisp and sbcl only), choose where to store the
1720 dumped image, where to find clfswm source.
1722 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
1724 * clfswm-internal.lisp (process-new-window): Beginning of new
1725 window hook: each group have a hook to tell what he wants to do
1726 with the new created window.
1728 2008-03-08 Xavier Maillard <xma@gnu.org>
1730 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
1731 call the resulting executable.
1733 * clfswm.lisp (read-conf-file): Check for the user config file in
1734 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
1735 prefered whenever possible.
1737 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
1739 * clfswm-layout.lisp (*-layout): Add an optional raise-p
1740 parameter in each layout.
1742 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
1744 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
1746 (copy/move-current-child-by-name/number): new functions
1747 (focus-group-by-name/number): new functions
1748 (delete-group-by-name/number): new functions
1750 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
1752 * ************************************************************ *
1753 *: Major update - No more reference to workspaces. The main *
1754 structure is a tree of groups or application windows. *
1755 * ************************************************************ *
1757 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
1759 * clfswm.lisp (read-conf-file): Read configuration in
1760 $HOME/.clfswmrc or in /etc/clfswmrc or in
1761 $XDG_CONFIG_HOME/clfswm/clfswmrc.
1762 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
1765 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
1767 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
1770 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
1772 * clfswm-internal.lisp (find-window-group): New function.
1774 * clfswm*: Change to make clfswm run with clisp/new-clx.
1776 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
1778 * clfswm-util.lisp (query-show-paren): Add show parent matching in
1780 (query-string): Bind control+k to delete end of line.
1782 * clfswm-second-mode.lisp (draw-second-mode-window): Display
1783 the action on mouse motion in second mode.
1785 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
1786 event but do not clear the root window.
1787 (handle-configure-request): Adjust unmanaged window from there
1790 * clfswm-internal.lisp (process-new-window): Adjust new window
1791 with the specified hints (max/min/base width/height).
1793 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
1795 * clfswm.lisp (handle-configure-request): Send an Configuration
1796 Notify event. This solve a bug with xterm and rxvt who takes some
1797 times to be mapped. Now there is no delay.
1799 * bindings-second-mode.lisp (define-shell): Run programs after
1800 living the second mode.
1802 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
1804 * clfswm-internal.lisp (process-new-window): Do not crop transient
1805 window to group size.
1806 (adapt-window-to-group): Do not crop transient window to group
1809 * clfswm.lisp (handle-configure-request): Adapt just the window to
1810 its group and don't take care of the configure request. Remove the
1811 bug with the Gimp outside the group and speed up the window
1813 (handle-exposure): Remove show-all-group on exposure event
1816 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
1818 * clfswm-util.lisp (circulate-group-up-copy-window)
1819 (circulate-group-down-copy-window)
1820 (circulate-workspace-up-copy-group)
1821 (circulate-workspace-down-copy-group): Prevent the copy of the
1822 same window in the same workspace.
1824 * bindings-second-mode.lisp (release-copy-selected-window)
1825 (release-copy-selected-group): Prevent the copy of the same window
1826 in the same workspace.
1828 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
1829 (generic-pager-move-window-on-next-line): Remove the copy
1831 (generic-pager-move-group-on-next-workspace)
1832 (generic-pager-move-group-on-previous-workspace): Prevent the copy
1833 of the same window in the same workspace.
1835 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
1836 (mouse-pager-copy-selected-group-release): Prevent the copy of the
1837 same window in the same workspace.
1839 * tools.lisp (setf/=): new macro to set a variable only when
1842 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
1843 x, y... only when necessary.
1845 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
1847 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
1848 new function and hook: force windows to stay in its group (solve a
1851 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
1853 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
1854 less flickering when moving/resizing groups.
1856 * clfswm-internal.lisp (hide-group): new function.
1857 (show-all-group): clear-all: new parameter.
1859 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
1861 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
1863 * clfswm*: Color change for the pager. Typo or better description
1864 in bindings definitions. Define bindings for a qwerty keyboard by
1865 default. dot-clfswmrc show examples to switch to an azerty
1867 License change to GPL v3.
1868 * config.lisp: new file - group all globals variables in this
1871 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
1873 * xlib-util.lisp (hide-window): Remove structure-notivy events
1874 when hidding a window.
1876 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
1878 * package.lisp (*sm-property-notify-hook*): Readded
1879 property-notify-hook in second mode.
1881 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1883 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
1885 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1887 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
1888 Tile the current workspace with the current window on one side and
1889 others on the other (this emulate the larswm, dwm, wmii way). See
1890 the default configuration file to enable this mode by default.
1892 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
1895 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1897 * clfswm-pager.lisp (pager-draw-window-in-group): Add
1898 ensure-printable to print windows name even with non-ascii
1901 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
1903 * clfswm-pager.lisp (pager-explode-current-group): Create a new
1904 group for each window in group.
1905 (pager-implode-current-group): Move all windows in workspace to
1906 one group and remove other groups.
1908 * clfswm-pack.lisp (explode-group): Create a new group for each
1910 (implode-group): Move all windows in workspace to one group and
1911 remove other groups.
1913 * clfswm-util.lisp (identify-key): Remove local configuration
1914 variables and made them available for configuration from
1916 (query-string): idem.
1918 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1920 * netwm-util.lisp: Start of NetWM compliance.
1921 Add a Netwm client list gestion.
1923 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1925 * clfswm-internal.lisp (create-group-on-request): open a new group
1926 only when the current group is not empty.
1928 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
1929 bug with null workspace.
1931 * clfswm-pager.lisp (pager-handle-event): Add a hook
1932 system. This hooks can be changed in the user configuration file.
1934 * package.lisp: All colors and font variables are set in
1935 package.lisp and can be configured in the user configuration
1937 Note: If you have configured some less ugly colors (esp. for the
1938 pager) don't hesitate to let me know :)
1940 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
1941 system. This hooks can be changed in the user configuration file.
1943 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
1944 changed in the user configuration file (~/.clfswmrc)
1946 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1948 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
1949 arrow action, open next window in new workspace/group.
1951 * bindings.lisp (stop-all-pending-actions): new binding.
1952 (open-next-window-in-new-group-once): Open the next windows in a
1953 new group (only once) or open all new windows in a new group (like
1954 others windows managers).
1956 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1958 * clfswm.lisp (read-conf-file): New function to read a lisp
1959 configuration file at startup.
1960 (focus-group-under-mouse): Check if group isn't the current group
1961 ( prevent a bug with unclutter ).
1963 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
1965 * bindings.lisp (run-program-from-query-string): A program can be
1966 launch from a input query window.
1968 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
1970 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
1972 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
1974 * clfswm.lisp (process-new-window): One can now open the next
1975 window in a workspace called by its number.
1977 * clfswm-util.lisp (query-font-string): Minimal editing
1979 (eval-from-string): And an REPL in the window manager... :)
1981 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
1983 * clfswm.lisp (process-new-window): One can now open the next
1984 window in a new workspace or a new group.
1986 * clfswm-pager.lisp (pager-mode): Display the next arrow action
1987 with the hidden windows.
1989 * clfswm.lisp (second-key-mode): Display the current workspace
1990 number and the next arrow action in the state window.
1992 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
1993 the pager mode and then redisplay only the current workspace.
1995 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
1997 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
1998 they can be focused with a keypress, sorted or renumbered.
2000 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2002 * clfswm-pager.lisp (pager-mode): Remove multiple silly
2003 pager-draw-display. This prevent a lot of flickering in the
2006 * clfswm.lisp: Remove all display-force-output and replace them
2007 with only one display-finish-output in the event loop.
2009 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
2011 * clfswm-pager.lisp (pager-center-group): New function - center a
2012 group at the middle of the screen.
2014 * clfswm-pack.lisp (center-group): New function - center a group
2015 at the middle of the screen.
2017 * clfswm.lisp (show-group): Add a cross line under the group.
2018 (show-group): Group are showned even if fullscreened.
2019 (init-display): Add an exposure event on the root window.
2021 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
2023 * package.lisp (*default-group*): Default group is the same size
2024 of a fullscreened group.
2026 * bindings*: Use shift to move, control+shift to copy.
2028 * *.lisp: Add comments for configuration or alternatives. So grep
2029 for CONFIG to see where you can configure clfswm. And grep for
2030 Alternative to use some commented code.
2032 * clfswm.lisp (second-key-mode): Use a single window to show the
2033 second mode. See for alternatives at the end of this file.
2035 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
2037 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
2038 macro of key and mouse definitions.
2039 (define-define-key/mouse): Use state instead of modifiers list
2040 this fix a bug when the modifiers list is not in the rigth order.
2042 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
2044 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
2046 * clfswm-info.lisp (info-mode): Add an info mode.
2048 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
2050 * clfswm.lisp (process-new-window): Change border size for
2052 (show-all-windows-in-workspace): Unhide all windows even when the
2053 current group is in fullscreen mode.
2055 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
2057 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
2058 redisplay the identify window after a terminal switch.
2060 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
2061 redisplay the pager after a terminal switch.
2063 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
2065 * clfswm-util.lisp (identify-key): Add a window to display
2066 the keys to identify on screen.
2068 * bindings.lisp, bindings-pager.lisp: Define same keys to
2069 move/copy groups/windows in second mode and in pager.
2071 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
2073 (show-all-windows-in-workspace): unhide window before adapting it
2076 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
2078 * clfswm.lisp (handle-event): Revert to an older version.
2080 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
2082 * clfswm-util.lisp (force-window-in-group)
2083 (force-window-center-in-group): New functions for transient windows.
2085 * clfswm-pager.lisp (pager-remove-current-workspace/group):
2086 bugfix: hide all windows before removing group or workspace.
2088 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
2090 * bindings-pager.lisp (mouse-pager-move-selected-group)
2091 (mouse-pager-copy-selected-group)
2092 (mouse-pager-move-selected-window)
2093 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
2094 (mouse-pager-rotate-window-down): New functions to have mouse in
2097 * clfswm-pager.lisp (pager-swap-window)
2098 (pager-copy-group-on-next/previous-workspace)
2099 (pager-copy-window-on-next/previous-line): New functions
2101 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
2103 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
2104 (pager-move-group-on-next/previous-workspace): new functions.
2106 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
2107 to its half size (new functions).
2109 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
2111 * clfswm-pager.lisp: workspaces, groups and windows can now be
2112 selectionned with the keyboard or the mouse.
2114 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
2116 * clfswm-pager.lisp (pager-select-workspace-right/left):
2117 workspaces can now be selectionned with the keyboard.
2119 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
2121 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
2122 new function to remove a previous defined key or mouse combination.
2124 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
2126 * clfswm.lisp (main): Check for access error in init-display.
2128 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
2129 keycode before grabbing.
2131 * bindings.lisp: Remove nlambda and use defun to keep the function
2132 documentation with clisp.
2133 (define-shell): new macro to define shell command for the second
2136 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
2138 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
2141 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
2143 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
2144 workspace circulation.
2146 * clfswm-util.lisp (absorb-orphan-window): new function.
2148 * clfswm-keys.lisp: Keysyms support.
2150 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
2152 * clfswm.lisp (show-group): Use one gc for all groups and not one
2155 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
2157 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
2159 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
2160 width and height outside group.
2162 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
2164 * clfswm.lisp: First public release.