1 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
3 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
4 unwanted flickering with unmanaged windows.
6 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
8 * src/package.lisp: Remove event handler hooks as they're not
9 needed anymore (To replace them: use closure and define-handler).
11 * src/xlib-util.lisp (move-window, resize-window)
12 (wait-mouse-button-release): Use a generic mode.
14 * src/*.lisp: Replace the case to handle event with a more (tricky)
15 lispy method which bind a function to each keywords associated
18 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
20 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
21 menu entry between delete-current-child and remove-current-child.
22 ie: Delete a child and its children in all frames by default.
24 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
26 * src/package.lisp: Add a placement configuration group.
28 * src/binding*.lisp: Bind control+g to escape the current action
31 * src/clfswm-internal.lisp
32 (delete-child-and-children-in-all-frames): New function and
33 binding: Second mode - Control+Delete delete the current child and
34 its children in all frames (ie: close the current child and its
37 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
39 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
40 the frame window and the frame gc. Close a very annoying bug when
41 cuting/pasting a frame or moving a child over frames with the
44 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
45 all children in *current-root* after moving/resizing a frame.
47 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
49 * src/clfswm-util.lisp (delete-focus-window)
50 (destroy-focus-window): Remove child in parent frame before
53 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
55 * src/clfswm-util.lisp (identify-key): Add a timeout in
57 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
58 of the window passed by xlib:process-event.
60 * src/xlib-util.lisp (move-window, resize-window)
61 (wait-mouse-button-release): Add a timeout in xlib:process-event.
63 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
65 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
66 to launch an other window manager and to return to clfswm.
68 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
70 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
73 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
75 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
78 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
79 parameter and a loop timeout.
81 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
83 * src/clfswm.lisp (main): Add an alternate configuration filename
86 * load.lisp: Add a debuging code example.
88 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
90 * src/clfswm-configuration.lisp (create-configuration-menu): New
91 menu to configure all clfswm variables while clfswm is running.
93 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
95 * src/clfswm-util.lisp (save-configuration-variables): New
96 function to save all configuration variables in clfswmrc.
98 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
100 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
102 (set-default-info-keys): Add cursor key support in info mode.
104 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
106 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
109 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
110 prevent reading the configuration file (this may be useful to
111 produce the original documentation without user modifications
112 with the rc configuration file).
114 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
116 * src/bindings-second-mode.lisp (set-default-second-keys):
117 Simplification of Escape key to close/kill/remove the focus window
118 and unhide all windows.
120 * src/bindings.lisp (set-default-main-keys): Simplification of
121 Escape key to close/kill/remove the focus window and unhide all
124 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
125 focus and unhide all windows capabilities.
127 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
129 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
131 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
133 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
134 Keep child order and don't make unnecessary child movement.
135 (one-column-layout, one-line-layout): New layouts.
137 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
139 * contrib/cd-player.lisp: New file to handle the CD player.
141 * contrib/xmms.lisp: New file to handle the xmms player.
143 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
145 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
146 Maximize windows in there frame - Leave frames to there actual
149 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
150 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
152 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
154 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
156 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
158 * contrib/mpd.lisp: Use a standard menu.
160 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
162 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
164 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
166 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
168 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
171 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
173 * src/config.lisp (get-fullscreen-size): One pixel adjustment
176 * src/clfswm-placement.lisp (*-child-placement): One pixel
179 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
181 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
182 Ensure that all characters are printable.
184 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
187 * src/clfswm-placement.lisp (*-child-placement): Adjust
188 coordinates to one pixel in the current child.
190 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
192 * src/clfswm-query.lisp (query-enter-function): Assign font before
193 width and height calculation.
195 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
197 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
198 bannish the pointer in an arbitrary place.
200 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
201 place the info window in an arbitrary place.
203 * src/clfswm-query.lisp (query-enter-function): Use with-placement
204 macro to place the query window in an arbitrary place.
206 * src/clfswm-placement.lisp: New file. Allow to place info windows
207 or query windows on an arbitrary place. Allow to bannish the
208 pointer on an arbitrary place.
210 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
212 * src/clfswm-circulate-mode.lisp (reorder-child)
213 (reorder-brother): Unfocus windows before reordering children or
216 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
218 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
219 the parent is a frame.
221 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
222 motion with a default modifier.
224 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
227 * src/clfswm-info.lisp (info-mode): Handle motion with a default
229 (info-mode): Optimization in loop function.
231 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
233 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
234 root-frame correctly.
236 * clfswm.asd: Dependency fix for clfswm-generic-mode.
238 * src/clfswm-circulate-mode.lisp (reorder-child)
239 (reorder-brother): Handle empty frames.
240 (reorder-brother): Redisplay only the parent frame of the current
243 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
244 parent frame of the current frame.
246 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
248 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
249 Maximize/Unmaximize the current frame in its parent frame.
251 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
252 windows and frames in there parent frame.
254 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
256 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
258 * src/clfswm-circulate-mode.lisp (reorder-child)
259 (reorder-brother): Reinitialise on circulate type change
260 child to brother or brother to child.
262 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
263 calls xlib:display-finish-output on each map-request. So speed up
266 * src/xlib-util.lisp (map-window): New function. Call
267 xlib:display-finish-output on each map request.
269 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
271 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
272 Optimisation when drawing second mode window.
274 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
276 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
279 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
281 * src/clfswm-util.lisp (run-program-from-query-string): Launch
282 command only with a return validation.
284 2009-04-22 Xavier Maillard <xma@gnu.org>
286 * src/clfswm-query.lisp (query-string): Use a generic mode.
288 2009-04-19 Xavier Maillard <xma@gnu.org>
290 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
292 2009-04-18 Xavier Maillard <xma@gnu.org>
294 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
295 to define all other modes.
297 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
299 * src/package.lisp (): Use *default-font-string* for all
302 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
304 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
306 * src/xlib-util.lisp (null-size-window-p): Better check of null
309 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
311 * src/clfswm.lisp (handle-map-request): Add a fix to manage
312 correctly fullscreen windows (SDL particularly).
314 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
316 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
317 a segfault with clisp/new-clx.
319 * src/clfswm.lisp (handle-motion-notify): Add a needed window
322 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
323 needed window argument.
325 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
327 * src/xlib-util.lisp (wait-no-key-or-button-press)
328 (wait-a-key-or-button-press): Check buttons press/release correctly"
330 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
332 * src/menu-def.lisp: Add children navigation menu in the movement
333 menu (select next/previous child/brother/level).
335 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
337 * *: Rename 'sister' frame to 'brother' frame.
339 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
340 alias in a real modifier.
342 * src/package.lisp (*modifier-alias*): New list of modifier alias
343 For example: :alt is :mod-1, :numlock is :mod-2...
345 * src/tools.lisp (remove-hook): New function.
347 * src/clfswm-keys.lisp (with-capslock, without-capslock)
348 (with-numlock, without-cnumlock): New functions.
350 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
352 * src/clfswm-info.lisp: Use the *binding-hook* to create info
353 keys and mouse bindings.
355 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
356 second keys and mouse bindings.
358 * src/bindings.lisp: Use the *binding-hook* to create main keys
361 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
363 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
366 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
368 * src/menu-def.lisp: Use a menu instead of a function for the
371 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
373 * src/clfswm-util.lisp (show-standard-menu): Display the standard
374 menu from the 'update-menus' command.
376 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
378 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
379 it's already grabbed.
381 * src/clfswm-internal.lisp (display-frame-info): Use configurable
382 colors and fix a bug with background.
383 (display-frame-info): Set window background when displaying info.
385 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
387 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
388 warning with clisp/new-clx.
390 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
392 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
395 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
396 * *: **** Release 0809 ****
398 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
400 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
402 (ensure-unique-number): New function and menu entry.
404 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
406 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
407 hook: open the next window in a named frame.
408 (numbered-frame-nw-hook): New new window hook: open the next
409 window in a numbered frame.
411 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
412 cases. So query-string can be called even in the main mode.
414 * src/clfswm-internal.lisp (show-all-children): Do not raise a
415 child by default => far less flickering.
417 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
419 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
421 * src/menu-def.lisp: Change key binding for the CLFSWM menu
424 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
425 is nil. (workaround on some CLX implementation).
427 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
429 * src/menu-def.lisp: Add a menu to set a focus policy for all
432 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
433 (all-frames-set-*-focus-policy): Set a focus policy for all
436 * src/clfswm.lisp (handle-enter-notify): sloppy-select
437 mode. Select a child and its parents on mouse over.
439 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
441 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
442 policy -> Sloppy focus only for windows in the current frame.
443 (main-unprotected): Exit clfswm on init error (ie: when another
444 window manager is running).
446 * src/clfswm-util.lisp (reset-clfswm): New function.
448 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
450 * src/clfswm-menu.lisp (init-menu): New function.
452 * src/clfswm-util.lisp (reload-clfswm): New function to reload
454 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
456 * src/clfswm.lisp (main, main-unprotected): Handle error in a
457 superior main function. Now CLFSWM can't break the X session. It
458 just reinitialize the display and run a new main loop.
460 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
461 *vt-keyboard-on* global to avoid warnings when loading clfswm.
463 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
464 (help-on-gimp-layout): Describe how to use the GIMP layout.
466 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
468 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
469 main-window-right-layout. Change the keybinding for (shift)alt+tab
470 to not select windows in the main window lisst.
471 Bind F8 to add a window in the main window list.
472 Bind F9 to remove a window in the main window list.
473 Change the focus policy to :sloppy.
474 (set-previous-layout): Restore the previous layout, keybinding and
477 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
479 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
481 * src/clfswm-layout.lisp (main-window-left-layout)
482 (main-window-bottom-layout, main-window-top-layout): New
484 Factorize layouts in menu.
486 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
488 * src/clfswm-layout.lisp (main-window-right-layout): A possible
489 GIMP layout: one or more main windows on one side of the
490 frame. Others on the other size.
492 * src/clfswm-util.lisp
493 (current-frame-set-click/sloppy-focus-policy): Each frame can have
494 a different focus policy (one of :click or :sloppy).
495 The default focus policy is set with *default-focus-policy*.
497 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
499 * src/clfswm-info.lisp (show-config-variable): New function.
501 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
503 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
505 * src/clfswm-info.lisp: Colored help for key binding and corners
508 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
510 * src/clfswm-util.lisp (delete-focus-window)
511 (destroy-focus-window): Remove chid only in
512 handle-unmap/destroy-notify. Focus *current-root* only when
513 closing/killing the current child.
515 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
516 functions or corners.
518 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
520 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
521 action: Hide/Unhide a terminal on mouse corner action. (By default
522 right mouse button on the top left corner).
524 * src/config.lisp (*never-managed-window-list*): New config
527 * src/clfswm-internal.lisp (never-managed-window-p): New function:
528 Handle never managed window in a more simple way.
530 * src/clfswm-corner.lisp: New file and new and more simple method
531 to define corners actions.
533 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
535 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
537 * src/clfswm-layout.lisp (fast-layout-switch)
538 (define-fast-layout-switch): New functions: Switch between two
541 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
542 really in the second mode. So leave-second-mode can be used even
545 * src/clfswm-util.lisp (switch-to-last-child): New function:
546 Store the current child and switch to the previous one.
548 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
550 * src/clfswm-util.lisp (display-current-window-info): Display the
552 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
553 (top right by default). By default 'xvkbd' is used.
555 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
557 * src/xlib-util.lisp (move-window, resize-window): Compress motion
560 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
562 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
565 * src/clfswm-info.lisp (info-mode): Compress motion events.
567 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
569 * src/clfswm-internal.lisp (show-all-children): Compute geometry
570 and selection first and then show only necessary children.
571 (show-child): remove unneeded display-p parameter.
573 * src/config.lisp (get-fullscreen-size): Place the frame border
574 outside the screen (this prevent the loose of 2 pixels per
577 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
579 * src/clfswm-internal.lisp (focus-child): Algorithm change to
580 raise only the selected child.
582 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
584 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
585 Raise only viewable children.
587 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
589 * src/clfswm-internal.lisp (show-all-children): Always raise all
590 displayed children. Remove all references to raise-p.
592 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
594 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
597 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
598 second mode binding on raise/lower child in its frame.
600 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
601 behaviour to the new raise/lower property.
602 Call clear-nw-hook before the rest of the hook.
604 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
605 (mouse-click-to-focus-and-resize-window): Stop button event. This
606 prevent a keyboard/pointer freeze.
608 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
610 * src/clfswm-internal.lisp (frame-lower-child)
611 (frame-raise-child): New functions to raise/lower a child in its
614 * src/clfswm-util.lisp (have-to-present-windows)
615 (have-to-present-all-windows): New functions to have an MaxOS
616 expose like on mouse click in screen corner.
618 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
620 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
622 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
623 child from a choice in all frames with hidden children.
625 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
627 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
629 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
630 (unhide-all-children): New functions.
632 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
635 * src/clfswm-util.lisp (hide/show-frame-window): new function and
638 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
640 * src/clfswm-util.lisp (rename-current-child): Do not display the
641 frame info for a window.
643 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
645 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
646 frame window for the removed child and its children.
648 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
650 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
653 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
655 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
656 the ROX pinboard (ie: leave it lowered in the root window as
659 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
660 (tile-left-layout, tile-right-layout, tile-top-layout)
661 (tile-bottom-layout): Use all the frame space when there is only
664 * src/clfswm-internal.lisp (place-window-from-hints): Center
665 unmanaged windows in the root screen.
667 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
670 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
672 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
673 typo in managed types.
675 * src/clfswm-internal.lisp (show-child): Always display frame info
676 even if the frame is hidden.
678 * src/xlib-util.lisp (resize-window): Use a better algorithme to
681 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
683 * src/clfswm-util.lisp (with-movement): Display frame info for all
684 frames in current root.
686 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
688 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
690 * src/bindings-second-mode.lisp (define-second-key #\a): New
691 binding on 'add-default-frame'.
693 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
694 message to follow the autodocumentation process.
696 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
698 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
699 "Space" to jump to a child. "B" to bind a slot on the current
702 * src/bindings-second-mode.lisp: Use "Tab" instead of
705 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
707 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
708 unmanaged (hidden) windows.
710 * src/clfswm-internal.lisp (place-window-from-hints): Give a
711 minimal size for windows.
712 (with-all-windows-frames-and-parent): New function.
714 * src/config.lisp (*default-window-width/height*): New parameters.
716 * src/clfswm-internal.lisp (place-window-from-hints): Center
717 windows in the screen instead of in there frame.
719 * src/bindings-second-mode.lisp (tile-space-current-frame): New
722 * src/clfswm-layout.lisp (register-layout): Intern the once name
723 in the right package.
725 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
727 * doc/dot-clfswmrc: Update to follow the new clfswm way.
729 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
731 * src/clfswm-internal.lisp (set-current-child)
732 (adapt-child-to-parent, show-child, hide-child): Handle the case
733 where child is not a frame or a window.
735 * src/clfswm-util.lisp
736 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
737 Check if child is a frame.
739 * src/clfswm-internal.lisp (managed-window-p): Handle the case
741 (place-frame): Check if frame and parent are frames.
743 * src/clfswm-info.lisp (info-mode): display all frame info before
746 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
749 * src/clfswm-internal.lisp (display-all-frame-info): New function.
751 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
753 * src/tools.lisp (getenv): Implemented for ECL.
754 (urun-prog): Implemented for ECL.
756 * src/clfswm-util.lisp (identify-key): Use a double buffer to
759 * src/clfswm-query.lisp (query-string): Use a double buffer to
762 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
765 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
768 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
770 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
772 * src/menu-def.lisp: New file: move all menu definition in
775 * src/clfswm-layout.lisp (register-layout): Use a function instead
778 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
780 * src/clfswm-autodoc.lisp (produce-menu-doc,
781 (produce-menu-doc-html): New functions.
782 (produce-doc-*): Moved to clfswm-autodoc.lisp.
784 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
785 paste a child on one of its own children. (this prevent a
787 (move-child-to): Rename move/copy-current-child-by to
789 (mouse-move-window-over-frame): New function to move the window
790 under the mouse cursor to another frame.
792 * src/clfswm-internal.lisp (find-child-in-parent): New function.
794 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
796 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
797 windows only when its window parent is the current child.
799 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
801 * src/clfswm-util.lisp (manage-current-window)
802 (unmanage-current-window): New functions: Allow to force to manage
803 or unmanage a window by its parent frame.
805 * src/bindings-second-mode.lisp (#\o): binded to
806 set-open-in-new-frame-in-parent-frame-nw-hook and
807 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
809 * src/clfswm-util.lisp (with-current-window): New macro.
811 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
812 exposure and enter-window handle event.
814 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
815 children for the current child after the move/resize.
817 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
819 * src/xlib-util.lisp (resize-window): Take care of window size
822 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
823 move/resize unmanaged windows.
825 * src/xlib-util.lisp (move-window, resize-window): New functions.
827 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
829 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
830 user choose what window type the current frame must handle.
831 (display-current-window-info): New function.
832 (current-frame-manage-all-window-type)
833 (current-frame-manage-only-normal-window-type)
834 (current-frame-manage-no-window-type): New functions.
836 * src/clfswm-internal.lisp (managed-window-p): New function.
838 * src/package.lisp (frame): Managed type: new frame
839 parameter. This allow to choose what window type a frame must
842 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
844 * src/clfswm-nw-hooks.lisp
845 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
847 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
850 * src/tools.lisp (ensure-printable): Return always a string even
853 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
855 * src/config.lisp (*default-nw-hook*): New variable to change the
856 default new window hook.
858 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
860 * clfswm.asd (clfswm): Add a dependency from
861 clfswm-second-mode.lisp to clfswm.lisp.
863 * src/clfswm-util.lisp (identify-key): Show the documentation for
864 the function bound on a key.
865 (with-movement): Move with-movement,
866 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
869 * src/clfswm-menu.lisp: New menu system that let user change keys
870 or functions associated to keys.
872 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
874 * src/clfswm-internal.lisp (show-all-children): Display-child is
875 the first child by default. Solve a bug with father-p.
877 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
879 * src/clfswm-internal.lisp (add-frame): Add frame return the
881 (show-all-children): Move the size computation outside the
884 * src/bindings-second-mode.lisp (with-movement): Redisplay only
887 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
888 only the current child.
890 * src/clfswm-internal.lisp (show-all-children): New display-child
891 parameter to display only the desired child and its children.
892 (select-next/previous-child): Only display the current child.
894 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
896 * src/clfswm.lisp (init-display): Move the default frame creation
897 on the default init hook.
899 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
900 the main mode (for example: "1" on an azerty keyboard).
902 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
904 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
905 keysyms. Revert to old grabbing method for the main mode.
907 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
909 * src/clfswm.lisp (init-display): Add key handling on no focus
910 window and on frame windows.
912 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
914 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
915 all keys by default and replay just what is needed. No change for
918 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
919 (find-key-from-code): Test for shift and not shift presence.
921 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
923 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
924 new key parameter to have less flickering.
926 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
928 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
929 layout only one time and revert to no-layout to freely handle
932 * src/clfswm-nw-hooks.lisp
933 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
934 with new created window.
936 * src/clfswm-layout.lisp (register-layout): Now register
937 automatically a once layout to set the layout only one time and
938 revert to no-layout to freely handle frames.
940 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
942 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
943 nw-hook: Open the next window in the current frame and leave the
944 focus to the current child.
946 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
948 * src/bindings-second-mode.lisp: Add keys definitions to
949 bind-or-jump in the second mode.
951 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
952 macro for bind-or-jump-(1|2|3...).
954 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
955 arguments to function. This allow to do things like:
956 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
957 are passed to my-function on key press.
959 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
961 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
963 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
965 * src/clfswm-internal.lisp (child-fullname): New function
967 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
968 docstring in info-mode-menu. An item can be
969 '((key function) (key function)) or with docstring
970 '((key function "documentation 1") (key function "bla bla") (key function))
972 * src/tools.lisp (ensure-n-elems): New function.
974 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
975 resize a frame or the window's father.
977 * src/clfswm.lisp (init-display): Remove tile-space-layout by
978 default on the root frame.
980 * src/clfswm-util.lisp (move/resize-frame): Add standard event
981 hooks handlers (map-request, configure-notify...)
983 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
986 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
988 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
989 or the window's father.
991 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
992 event only if there is a geometry change.
993 (mouse-focus-move/resize-generic): Generic function to move or
994 resize a frame or a window father frame.
996 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
998 * src/clfswm-internal.lisp (show-all-children): Return t if there
999 is a geometry change.
1001 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
1003 * src/bindings.lisp (Up/Down): Swap select previous/next level.
1005 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
1007 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
1009 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
1010 (with-all-*): Reverse the child list to manage the first child last (like in
1013 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
1014 root window only if true.
1016 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
1017 root window only if *create-frame-on-root* is true.
1019 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
1022 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
1024 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
1025 the current child (even if it's a window).
1027 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
1029 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
1030 (mouse-click-to-focus-and-resize): New functions.
1032 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
1033 (*-px->fl): Convert pixel coordinates to float.
1035 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
1037 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
1039 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
1042 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
1043 and hide-all-children.
1044 (raise-if-needed): New function.
1045 (show-child): Use a first-p parameter to raise windows only when they are
1048 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
1050 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
1053 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
1055 * src/clfswm-info.lisp (keys-from-list): new function.
1057 * src/*: rename 'childs' in 'children'.
1059 * src/*: rename 'group' in 'frame'.
1061 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
1063 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
1065 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
1067 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
1069 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
1071 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
1072 Bind control+o to open the next window in a new group in the root group
1073 (as open in next window in a new workspace in 0801 version).
1075 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
1077 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
1080 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
1082 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
1083 instead of Tab for select-previous-child.
1085 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
1087 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
1090 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
1092 * clfswm-util.lisp (identify-key): Display the documentation
1093 associated to keys when identifying a key.
1095 2008-03-10 Xavier Maillard <xma@gnu.org>
1097 * contrib/clfswm: Complete rewrite of the script. Detect error and
1098 act accordingly. Add command line arguments to configure the
1099 script execution. User can now choose different common lisp
1100 implementation (clisp and sbcl only), choose where to store the
1101 dumped image, where to find clfswm source.
1103 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
1105 * clfswm-internal.lisp (process-new-window): Beginning of new
1106 window hook: each group have a hook to tell what he wants to do
1107 with the new created window.
1109 2008-03-08 Xavier Maillard <xma@gnu.org>
1111 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
1112 call the resulting executable.
1114 * clfswm.lisp (read-conf-file): Check for the user config file in
1115 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
1116 prefered whenever possible.
1118 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
1120 * clfswm-layout.lisp (*-layout): Add an optional raise-p
1121 parameter in each layout.
1123 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
1125 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
1127 (copy/move-current-child-by-name/number): new functions
1128 (focus-group-by-name/number): new functions
1129 (delete-group-by-name/number): new functions
1131 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
1133 * ************************************************************ *
1134 *: Major update - No more reference to workspaces. The main *
1135 structure is a tree of groups or application windows. *
1136 * ************************************************************ *
1138 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
1140 * clfswm.lisp (read-conf-file): Read configuration in
1141 $HOME/.clfswmrc or in /etc/clfswmrc or in
1142 $XDG_CONFIG_HOME/clfswm/clfswmrc.
1143 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
1146 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
1148 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
1151 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
1153 * clfswm-internal.lisp (find-window-group): New function.
1155 * clfswm*: Change to make clfswm run with clisp/new-clx.
1157 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
1159 * clfswm-util.lisp (query-show-paren): Add show parent matching in
1161 (query-string): Bind control+k to delete end of line.
1163 * clfswm-second-mode.lisp (draw-second-mode-window): Display
1164 the action on mouse motion in second mode.
1166 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
1167 event but do not clear the root window.
1168 (handle-configure-request): Adjust unmanaged window from there
1171 * clfswm-internal.lisp (process-new-window): Adjust new window
1172 with the specified hints (max/min/base width/height).
1174 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
1176 * clfswm.lisp (handle-configure-request): Send an Configuration
1177 Notify event. This solve a bug with xterm and rxvt who takes some
1178 times to be mapped. Now there is no delay.
1180 * bindings-second-mode.lisp (define-shell): Run programs after
1181 living the second mode.
1183 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
1185 * clfswm-internal.lisp (process-new-window): Do not crop transient
1186 window to group size.
1187 (adapt-window-to-group): Do not crop transient window to group
1190 * clfswm.lisp (handle-configure-request): Adapt just the window to
1191 its group and don't take care of the configure request. Remove the
1192 bug with the Gimp outside the group and speed up the window
1194 (handle-exposure): Remove show-all-group on exposure event
1197 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
1199 * clfswm-util.lisp (circulate-group-up-copy-window)
1200 (circulate-group-down-copy-window)
1201 (circulate-workspace-up-copy-group)
1202 (circulate-workspace-down-copy-group): Prevent the copy of the
1203 same window in the same workspace.
1205 * bindings-second-mode.lisp (release-copy-selected-window)
1206 (release-copy-selected-group): Prevent the copy of the same window
1207 in the same workspace.
1209 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
1210 (generic-pager-move-window-on-next-line): Remove the copy
1212 (generic-pager-move-group-on-next-workspace)
1213 (generic-pager-move-group-on-previous-workspace): Prevent the copy
1214 of the same window in the same workspace.
1216 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
1217 (mouse-pager-copy-selected-group-release): Prevent the copy of the
1218 same window in the same workspace.
1220 * tools.lisp (setf/=): new macro to set a variable only when
1223 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
1224 x, y... only when necessary.
1226 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
1228 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
1229 new function and hook: force windows to stay in its group (solve a
1232 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
1234 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
1235 less flickering when moving/resizing groups.
1237 * clfswm-internal.lisp (hide-group): new function.
1238 (show-all-group): clear-all: new parameter.
1240 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
1242 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
1244 * clfswm*: Color change for the pager. Typo or better description
1245 in bindings definitions. Define bindings for a qwerty keyboard by
1246 default. dot-clfswmrc show examples to switch to an azerty
1248 License change to GPL v3.
1249 * config.lisp: new file - group all globals variables in this
1252 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
1254 * xlib-util.lisp (hide-window): Remove structure-notivy events
1255 when hidding a window.
1257 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
1259 * package.lisp (*sm-property-notify-hook*): Readded
1260 property-notify-hook in second mode.
1262 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1264 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
1266 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1268 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
1269 Tile the current workspace with the current window on one side and
1270 others on the other (this emulate the larswm, dwm, wmii way). See
1271 the default configuration file to enable this mode by default.
1273 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
1276 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1278 * clfswm-pager.lisp (pager-draw-window-in-group): Add
1279 ensure-printable to print windows name even with non-ascii
1282 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
1284 * clfswm-pager.lisp (pager-explode-current-group): Create a new
1285 group for each window in group.
1286 (pager-implode-current-group): Move all windows in workspace to
1287 one group and remove other groups.
1289 * clfswm-pack.lisp (explode-group): Create a new group for each
1291 (implode-group): Move all windows in workspace to one group and
1292 remove other groups.
1294 * clfswm-util.lisp (identify-key): Remove local configuration
1295 variables and made them available for configuration from
1297 (query-string): idem.
1299 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1301 * netwm-util.lisp: Start of NetWM compliance.
1302 Add a Netwm client list gestion.
1304 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1306 * clfswm-internal.lisp (create-group-on-request): open a new group
1307 only when the current group is not empty.
1309 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
1310 bug with null workspace.
1312 * clfswm-pager.lisp (pager-handle-event): Add a hook
1313 system. This hooks can be changed in the user configuration file.
1315 * package.lisp: All colors and font variables are set in
1316 package.lisp and can be configured in the user configuration
1318 Note: If you have configured some less ugly colors (esp. for the
1319 pager) don't hesitate to let me know :)
1321 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
1322 system. This hooks can be changed in the user configuration file.
1324 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
1325 changed in the user configuration file (~/.clfswmrc)
1327 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1329 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
1330 arrow action, open next window in new workspace/group.
1332 * bindings.lisp (stop-all-pending-actions): new binding.
1333 (open-next-window-in-new-group-once): Open the next windows in a
1334 new group (only once) or open all new windows in a new group (like
1335 others windows managers).
1337 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1339 * clfswm.lisp (read-conf-file): New function to read a lisp
1340 configuration file at startup.
1341 (focus-group-under-mouse): Check if group isn't the current group
1342 ( prevent a bug with unclutter ).
1344 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
1346 * bindings.lisp (run-program-from-query-string): A program can be
1347 launch from a input query window.
1349 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
1351 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
1353 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
1355 * clfswm.lisp (process-new-window): One can now open the next
1356 window in a workspace called by its number.
1358 * clfswm-util.lisp (query-font-string): Minimal editing
1360 (eval-from-string): And an REPL in the window manager... :)
1362 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
1364 * clfswm.lisp (process-new-window): One can now open the next
1365 window in a new workspace or a new group.
1367 * clfswm-pager.lisp (pager-mode): Display the next arrow action
1368 with the hidden windows.
1370 * clfswm.lisp (second-key-mode): Display the current workspace
1371 number and the next arrow action in the state window.
1373 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
1374 the pager mode and then redisplay only the current workspace.
1376 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
1378 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
1379 they can be focused with a keypress, sorted or renumbered.
1381 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
1383 * clfswm-pager.lisp (pager-mode): Remove multiple silly
1384 pager-draw-display. This prevent a lot of flickering in the
1387 * clfswm.lisp: Remove all display-force-output and replace them
1388 with only one display-finish-output in the event loop.
1390 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
1392 * clfswm-pager.lisp (pager-center-group): New function - center a
1393 group at the middle of the screen.
1395 * clfswm-pack.lisp (center-group): New function - center a group
1396 at the middle of the screen.
1398 * clfswm.lisp (show-group): Add a cross line under the group.
1399 (show-group): Group are showned even if fullscreened.
1400 (init-display): Add an exposure event on the root window.
1402 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
1404 * package.lisp (*default-group*): Default group is the same size
1405 of a fullscreened group.
1407 * bindings*: Use shift to move, control+shift to copy.
1409 * *.lisp: Add comments for configuration or alternatives. So grep
1410 for CONFIG to see where you can configure clfswm. And grep for
1411 Alternative to use some commented code.
1413 * clfswm.lisp (second-key-mode): Use a single window to show the
1414 second mode. See for alternatives at the end of this file.
1416 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
1418 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
1419 macro of key and mouse definitions.
1420 (define-define-key/mouse): Use state instead of modifiers list
1421 this fix a bug when the modifiers list is not in the rigth order.
1423 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
1425 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
1427 * clfswm-info.lisp (info-mode): Add an info mode.
1429 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
1431 * clfswm.lisp (process-new-window): Change border size for
1433 (show-all-windows-in-workspace): Unhide all windows even when the
1434 current group is in fullscreen mode.
1436 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
1438 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
1439 redisplay the identify window after a terminal switch.
1441 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
1442 redisplay the pager after a terminal switch.
1444 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
1446 * clfswm-util.lisp (identify-key): Add a window to display
1447 the keys to identify on screen.
1449 * bindings.lisp, bindings-pager.lisp: Define same keys to
1450 move/copy groups/windows in second mode and in pager.
1452 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
1454 (show-all-windows-in-workspace): unhide window before adapting it
1457 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
1459 * clfswm.lisp (handle-event): Revert to an older version.
1461 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
1463 * clfswm-util.lisp (force-window-in-group)
1464 (force-window-center-in-group): New functions for transient windows.
1466 * clfswm-pager.lisp (pager-remove-current-workspace/group):
1467 bugfix: hide all windows before removing group or workspace.
1469 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
1471 * bindings-pager.lisp (mouse-pager-move-selected-group)
1472 (mouse-pager-copy-selected-group)
1473 (mouse-pager-move-selected-window)
1474 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
1475 (mouse-pager-rotate-window-down): New functions to have mouse in
1478 * clfswm-pager.lisp (pager-swap-window)
1479 (pager-copy-group-on-next/previous-workspace)
1480 (pager-copy-window-on-next/previous-line): New functions
1482 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
1484 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
1485 (pager-move-group-on-next/previous-workspace): new functions.
1487 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
1488 to its half size (new functions).
1490 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
1492 * clfswm-pager.lisp: workspaces, groups and windows can now be
1493 selectionned with the keyboard or the mouse.
1495 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
1497 * clfswm-pager.lisp (pager-select-workspace-right/left):
1498 workspaces can now be selectionned with the keyboard.
1500 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
1502 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
1503 new function to remove a previous defined key or mouse combination.
1505 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
1507 * clfswm.lisp (main): Check for access error in init-display.
1509 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
1510 keycode before grabbing.
1512 * bindings.lisp: Remove nlambda and use defun to keep the function
1513 documentation with clisp.
1514 (define-shell): new macro to define shell command for the second
1517 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1519 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
1522 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
1524 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
1525 workspace circulation.
1527 * clfswm-util.lisp (absorb-orphan-window): new function.
1529 * clfswm-keys.lisp: Keysyms support.
1531 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
1533 * clfswm.lisp (show-group): Use one gc for all groups and not one
1536 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
1538 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
1540 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
1541 width and height outside group.
1543 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
1545 * clfswm.lisp: First public release.