1 2010-09-10 Philippe Brochard <pbrochard@common-lisp.net>
3 * src/clfswm-corner.lisp (generate-present-body): New macro.
4 (present-clfswm-terminal, present-virtual-keyboard): Use
7 2010-09-09 Philippe Brochard <pbrochard@common-lisp.net>
9 * src/clfswm-util.lisp (update-menus): Follow XDG specifications
10 instead of the non-portable Debian update-menu.
12 2010-09-07 Philippe Brochard <pbrochard@common-lisp.net>
14 * src/clfswm.lisp (error-handler): New function do handle
15 asynchronous errors and ignore them.
16 (open-display): Install the new error-handler on display.
18 2010-09-05 Philippe Brochard <pbrochard@common-lisp.net>
20 * src/xlib-util.lisp (with-xlib-protect): Add a
21 with-simple-restart on top of body execution.
23 2010-09-04 Philippe Brochard <pbrochard@common-lisp.net>
25 * src/clfswm.lisp (main-loop): Protect all xlib functions with an
28 * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
29 handle-event. Add a with-simple-restart to prevent a
30 clisp/new-lisp infinite loop.
32 2010-08-30 Philippe Brochard <pbrochard@common-lisp.net>
34 * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
35 clfswm terminal working even on xterm title changes.
37 2010-08-29 Philippe Brochard <pbrochard@common-lisp.net>
39 * src/clfswm-util.lisp (run-other-window-manager): Update for
42 * src/tools.lisp (do-execute): New parameter io to change the
45 * src/clfswm-util.lisp (hide-current-child): Prevent from removing
48 * src/clfswm-internal.lisp (child-member): New predicate.
49 (child-remove): New function.
51 * src/*.lisp: Use child-member and child-remove everywhere it's
54 2010-08-28 Philippe Brochard <pbrochard@common-lisp.net>
56 * src/clfswm.lisp (main-loop): Ensure that all events have been
57 processed after a process-event.
59 * src/clfswm-internal.lisp (is-in-current-child-p): New function.
61 2010-08-27 Philippe Brochard <pbrochard@common-lisp.net>
63 * src/clfswm.lisp (main-mode:configure-request): Raise the window
64 only when present on the current child and focus it accordingly.
66 2010-08-26 Philippe Brochard <pbrochard@common-lisp.net>
68 * src/clfswm-circulate-mode.lisp (circulate-loop-function):
69 Use is-a-key-pressed-p.
71 * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
73 * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
74 returned by xlib:keysym->keycodes.
76 * src/*.lisp: Use the new child-equal-p to compare children. This
77 prevent a bug with sbcl/cmucl when the standard equal function
78 does not work with xlib:window.
80 * src/clfswm-internal.lisp (child-equal-p): New predicate.
82 2010-08-25 Philippe Brochard <pbrochard@common-lisp.net>
84 * src/clfswm-generic-mode.lisp (generic-mode): Use an
85 xlib:event-listen before processing event with
86 xlib:process-event. This prevent a bug with CLX threaded
87 implementation like sbcl.
89 * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
90 processing event with xlib:process-event. This prevent a bug with
91 CLX threaded implementation like sbcl.
93 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
95 * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
97 * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
100 * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
101 (find-parent-frame, find-frame-window, find-frame-by-name)
102 (find-frame-by-number): Use with-find-in-all-frames to search in
103 frames in the right order.
105 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
106 unwanted flickering with unmanaged windows.
108 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
110 * src/package.lisp: Remove event handler hooks as they're not
111 needed anymore (To replace them: use closure and define-handler).
113 * src/xlib-util.lisp (move-window, resize-window)
114 (wait-mouse-button-release): Use a generic mode.
116 * src/*.lisp: Replace the case to handle event with a more (tricky)
117 lispy method which bind a function to each keywords associated
120 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
122 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
123 menu entry between delete-current-child and remove-current-child.
124 ie: Delete a child and its children in all frames by default.
126 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
128 * src/package.lisp: Add a placement configuration group.
130 * src/binding*.lisp: Bind control+g to escape the current action
133 * src/clfswm-internal.lisp
134 (delete-child-and-children-in-all-frames): New function and
135 binding: Second mode - Control+Delete delete the current child and
136 its children in all frames (ie: close the current child and its
139 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
141 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
142 the frame window and the frame gc. Close a very annoying bug when
143 cuting/pasting a frame or moving a child over frames with the
146 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
147 all children in *current-root* after moving/resizing a frame.
149 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
151 * src/clfswm-util.lisp (delete-focus-window)
152 (destroy-focus-window): Remove child in parent frame before
155 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
157 * src/clfswm-util.lisp (identify-key): Add a timeout in
159 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
160 of the window passed by xlib:process-event.
162 * src/xlib-util.lisp (move-window, resize-window)
163 (wait-mouse-button-release): Add a timeout in xlib:process-event.
165 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
167 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
168 to launch an other window manager and to return to clfswm.
170 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
172 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
175 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
177 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
180 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
181 parameter and a loop timeout.
183 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
185 * src/clfswm.lisp (main): Add an alternate configuration filename
188 * load.lisp: Add a debuging code example.
190 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
192 * src/clfswm-configuration.lisp (create-configuration-menu): New
193 menu to configure all clfswm variables while clfswm is running.
195 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
197 * src/clfswm-util.lisp (save-configuration-variables): New
198 function to save all configuration variables in clfswmrc.
200 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
202 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
204 (set-default-info-keys): Add cursor key support in info mode.
206 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
208 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
211 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
212 prevent reading the configuration file (this may be useful to
213 produce the original documentation without user modifications
214 with the rc configuration file).
216 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
218 * src/bindings-second-mode.lisp (set-default-second-keys):
219 Simplification of Escape key to close/kill/remove the focus window
220 and unhide all windows.
222 * src/bindings.lisp (set-default-main-keys): Simplification of
223 Escape key to close/kill/remove the focus window and unhide all
226 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
227 focus and unhide all windows capabilities.
229 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
231 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
233 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
235 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
236 Keep child order and don't make unnecessary child movement.
237 (one-column-layout, one-line-layout): New layouts.
239 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
241 * contrib/cd-player.lisp: New file to handle the CD player.
243 * contrib/xmms.lisp: New file to handle the xmms player.
245 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
247 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
248 Maximize windows in there frame - Leave frames to there actual
251 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
252 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
254 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
256 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
258 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
260 * contrib/mpd.lisp: Use a standard menu.
262 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
264 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
266 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
268 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
270 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
273 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
275 * src/config.lisp (get-fullscreen-size): One pixel adjustment
278 * src/clfswm-placement.lisp (*-child-placement): One pixel
281 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
283 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
284 Ensure that all characters are printable.
286 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
289 * src/clfswm-placement.lisp (*-child-placement): Adjust
290 coordinates to one pixel in the current child.
292 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
294 * src/clfswm-query.lisp (query-enter-function): Assign font before
295 width and height calculation.
297 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
299 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
300 bannish the pointer in an arbitrary place.
302 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
303 place the info window in an arbitrary place.
305 * src/clfswm-query.lisp (query-enter-function): Use with-placement
306 macro to place the query window in an arbitrary place.
308 * src/clfswm-placement.lisp: New file. Allow to place info windows
309 or query windows on an arbitrary place. Allow to bannish the
310 pointer on an arbitrary place.
312 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
314 * src/clfswm-circulate-mode.lisp (reorder-child)
315 (reorder-brother): Unfocus windows before reordering children or
318 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
320 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
321 the parent is a frame.
323 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
324 motion with a default modifier.
326 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
329 * src/clfswm-info.lisp (info-mode): Handle motion with a default
331 (info-mode): Optimization in loop function.
333 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
335 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
336 root-frame correctly.
338 * clfswm.asd: Dependency fix for clfswm-generic-mode.
340 * src/clfswm-circulate-mode.lisp (reorder-child)
341 (reorder-brother): Handle empty frames.
342 (reorder-brother): Redisplay only the parent frame of the current
345 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
346 parent frame of the current frame.
348 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
350 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
351 Maximize/Unmaximize the current frame in its parent frame.
353 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
354 windows and frames in there parent frame.
356 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
358 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
360 * src/clfswm-circulate-mode.lisp (reorder-child)
361 (reorder-brother): Reinitialise on circulate type change
362 child to brother or brother to child.
364 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
365 calls xlib:display-finish-output on each map-request. So speed up
368 * src/xlib-util.lisp (map-window): New function. Call
369 xlib:display-finish-output on each map request.
371 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
373 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
374 Optimisation when drawing second mode window.
376 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
378 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
381 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
383 * src/clfswm-util.lisp (run-program-from-query-string): Launch
384 command only with a return validation.
386 2009-04-22 Xavier Maillard <xma@gnu.org>
388 * src/clfswm-query.lisp (query-string): Use a generic mode.
390 2009-04-19 Xavier Maillard <xma@gnu.org>
392 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
394 2009-04-18 Xavier Maillard <xma@gnu.org>
396 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
397 to define all other modes.
399 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
401 * src/package.lisp (): Use *default-font-string* for all
404 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
406 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
408 * src/xlib-util.lisp (null-size-window-p): Better check of null
411 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
413 * src/clfswm.lisp (handle-map-request): Add a fix to manage
414 correctly fullscreen windows (SDL particularly).
416 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
418 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
419 a segfault with clisp/new-clx.
421 * src/clfswm.lisp (handle-motion-notify): Add a needed window
424 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
425 needed window argument.
427 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
429 * src/xlib-util.lisp (wait-no-key-or-button-press)
430 (wait-a-key-or-button-press): Check buttons press/release correctly"
432 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
434 * src/menu-def.lisp: Add children navigation menu in the movement
435 menu (select next/previous child/brother/level).
437 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
439 * *: Rename 'sister' frame to 'brother' frame.
441 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
442 alias in a real modifier.
444 * src/package.lisp (*modifier-alias*): New list of modifier alias
445 For example: :alt is :mod-1, :numlock is :mod-2...
447 * src/tools.lisp (remove-hook): New function.
449 * src/clfswm-keys.lisp (with-capslock, without-capslock)
450 (with-numlock, without-cnumlock): New functions.
452 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
454 * src/clfswm-info.lisp: Use the *binding-hook* to create info
455 keys and mouse bindings.
457 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
458 second keys and mouse bindings.
460 * src/bindings.lisp: Use the *binding-hook* to create main keys
463 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
465 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
468 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
470 * src/menu-def.lisp: Use a menu instead of a function for the
473 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
475 * src/clfswm-util.lisp (show-standard-menu): Display the standard
476 menu from the 'update-menus' command.
478 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
480 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
481 it's already grabbed.
483 * src/clfswm-internal.lisp (display-frame-info): Use configurable
484 colors and fix a bug with background.
485 (display-frame-info): Set window background when displaying info.
487 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
489 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
490 warning with clisp/new-clx.
492 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
494 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
497 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
498 * *: **** Release 0809 ****
500 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
502 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
504 (ensure-unique-number): New function and menu entry.
506 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
508 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
509 hook: open the next window in a named frame.
510 (numbered-frame-nw-hook): New new window hook: open the next
511 window in a numbered frame.
513 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
514 cases. So query-string can be called even in the main mode.
516 * src/clfswm-internal.lisp (show-all-children): Do not raise a
517 child by default => far less flickering.
519 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
521 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
523 * src/menu-def.lisp: Change key binding for the CLFSWM menu
526 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
527 is nil. (workaround on some CLX implementation).
529 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
531 * src/menu-def.lisp: Add a menu to set a focus policy for all
534 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
535 (all-frames-set-*-focus-policy): Set a focus policy for all
538 * src/clfswm.lisp (handle-enter-notify): sloppy-select
539 mode. Select a child and its parents on mouse over.
541 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
543 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
544 policy -> Sloppy focus only for windows in the current frame.
545 (main-unprotected): Exit clfswm on init error (ie: when another
546 window manager is running).
548 * src/clfswm-util.lisp (reset-clfswm): New function.
550 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
552 * src/clfswm-menu.lisp (init-menu): New function.
554 * src/clfswm-util.lisp (reload-clfswm): New function to reload
556 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
558 * src/clfswm.lisp (main, main-unprotected): Handle error in a
559 superior main function. Now CLFSWM can't break the X session. It
560 just reinitialize the display and run a new main loop.
562 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
563 *vt-keyboard-on* global to avoid warnings when loading clfswm.
565 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
566 (help-on-gimp-layout): Describe how to use the GIMP layout.
568 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
570 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
571 main-window-right-layout. Change the keybinding for (shift)alt+tab
572 to not select windows in the main window lisst.
573 Bind F8 to add a window in the main window list.
574 Bind F9 to remove a window in the main window list.
575 Change the focus policy to :sloppy.
576 (set-previous-layout): Restore the previous layout, keybinding and
579 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
581 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
583 * src/clfswm-layout.lisp (main-window-left-layout)
584 (main-window-bottom-layout, main-window-top-layout): New
586 Factorize layouts in menu.
588 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
590 * src/clfswm-layout.lisp (main-window-right-layout): A possible
591 GIMP layout: one or more main windows on one side of the
592 frame. Others on the other size.
594 * src/clfswm-util.lisp
595 (current-frame-set-click/sloppy-focus-policy): Each frame can have
596 a different focus policy (one of :click or :sloppy).
597 The default focus policy is set with *default-focus-policy*.
599 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
601 * src/clfswm-info.lisp (show-config-variable): New function.
603 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
605 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
607 * src/clfswm-info.lisp: Colored help for key binding and corners
610 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
612 * src/clfswm-util.lisp (delete-focus-window)
613 (destroy-focus-window): Remove chid only in
614 handle-unmap/destroy-notify. Focus *current-root* only when
615 closing/killing the current child.
617 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
618 functions or corners.
620 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
622 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
623 action: Hide/Unhide a terminal on mouse corner action. (By default
624 right mouse button on the top left corner).
626 * src/config.lisp (*never-managed-window-list*): New config
629 * src/clfswm-internal.lisp (never-managed-window-p): New function:
630 Handle never managed window in a more simple way.
632 * src/clfswm-corner.lisp: New file and new and more simple method
633 to define corners actions.
635 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
637 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
639 * src/clfswm-layout.lisp (fast-layout-switch)
640 (define-fast-layout-switch): New functions: Switch between two
643 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
644 really in the second mode. So leave-second-mode can be used even
647 * src/clfswm-util.lisp (switch-to-last-child): New function:
648 Store the current child and switch to the previous one.
650 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
652 * src/clfswm-util.lisp (display-current-window-info): Display the
654 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
655 (top right by default). By default 'xvkbd' is used.
657 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
659 * src/xlib-util.lisp (move-window, resize-window): Compress motion
662 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
664 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
667 * src/clfswm-info.lisp (info-mode): Compress motion events.
669 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
671 * src/clfswm-internal.lisp (show-all-children): Compute geometry
672 and selection first and then show only necessary children.
673 (show-child): remove unneeded display-p parameter.
675 * src/config.lisp (get-fullscreen-size): Place the frame border
676 outside the screen (this prevent the loose of 2 pixels per
679 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
681 * src/clfswm-internal.lisp (focus-child): Algorithm change to
682 raise only the selected child.
684 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
686 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
687 Raise only viewable children.
689 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
691 * src/clfswm-internal.lisp (show-all-children): Always raise all
692 displayed children. Remove all references to raise-p.
694 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
696 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
699 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
700 second mode binding on raise/lower child in its frame.
702 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
703 behaviour to the new raise/lower property.
704 Call clear-nw-hook before the rest of the hook.
706 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
707 (mouse-click-to-focus-and-resize-window): Stop button event. This
708 prevent a keyboard/pointer freeze.
710 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
712 * src/clfswm-internal.lisp (frame-lower-child)
713 (frame-raise-child): New functions to raise/lower a child in its
716 * src/clfswm-util.lisp (have-to-present-windows)
717 (have-to-present-all-windows): New functions to have an MaxOS
718 expose like on mouse click in screen corner.
720 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
722 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
724 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
725 child from a choice in all frames with hidden children.
727 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
729 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
731 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
732 (unhide-all-children): New functions.
734 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
737 * src/clfswm-util.lisp (hide/show-frame-window): new function and
740 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
742 * src/clfswm-util.lisp (rename-current-child): Do not display the
743 frame info for a window.
745 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
747 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
748 frame window for the removed child and its children.
750 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
752 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
755 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
757 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
758 the ROX pinboard (ie: leave it lowered in the root window as
761 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
762 (tile-left-layout, tile-right-layout, tile-top-layout)
763 (tile-bottom-layout): Use all the frame space when there is only
766 * src/clfswm-internal.lisp (place-window-from-hints): Center
767 unmanaged windows in the root screen.
769 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
772 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
774 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
775 typo in managed types.
777 * src/clfswm-internal.lisp (show-child): Always display frame info
778 even if the frame is hidden.
780 * src/xlib-util.lisp (resize-window): Use a better algorithme to
783 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
785 * src/clfswm-util.lisp (with-movement): Display frame info for all
786 frames in current root.
788 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
790 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
792 * src/bindings-second-mode.lisp (define-second-key #\a): New
793 binding on 'add-default-frame'.
795 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
796 message to follow the autodocumentation process.
798 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
800 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
801 "Space" to jump to a child. "B" to bind a slot on the current
804 * src/bindings-second-mode.lisp: Use "Tab" instead of
807 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
809 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
810 unmanaged (hidden) windows.
812 * src/clfswm-internal.lisp (place-window-from-hints): Give a
813 minimal size for windows.
814 (with-all-windows-frames-and-parent): New function.
816 * src/config.lisp (*default-window-width/height*): New parameters.
818 * src/clfswm-internal.lisp (place-window-from-hints): Center
819 windows in the screen instead of in there frame.
821 * src/bindings-second-mode.lisp (tile-space-current-frame): New
824 * src/clfswm-layout.lisp (register-layout): Intern the once name
825 in the right package.
827 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
829 * doc/dot-clfswmrc: Update to follow the new clfswm way.
831 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
833 * src/clfswm-internal.lisp (set-current-child)
834 (adapt-child-to-parent, show-child, hide-child): Handle the case
835 where child is not a frame or a window.
837 * src/clfswm-util.lisp
838 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
839 Check if child is a frame.
841 * src/clfswm-internal.lisp (managed-window-p): Handle the case
843 (place-frame): Check if frame and parent are frames.
845 * src/clfswm-info.lisp (info-mode): display all frame info before
848 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
851 * src/clfswm-internal.lisp (display-all-frame-info): New function.
853 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
855 * src/tools.lisp (getenv): Implemented for ECL.
856 (urun-prog): Implemented for ECL.
858 * src/clfswm-util.lisp (identify-key): Use a double buffer to
861 * src/clfswm-query.lisp (query-string): Use a double buffer to
864 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
867 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
870 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
872 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
874 * src/menu-def.lisp: New file: move all menu definition in
877 * src/clfswm-layout.lisp (register-layout): Use a function instead
880 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
882 * src/clfswm-autodoc.lisp (produce-menu-doc,
883 (produce-menu-doc-html): New functions.
884 (produce-doc-*): Moved to clfswm-autodoc.lisp.
886 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
887 paste a child on one of its own children. (this prevent a
889 (move-child-to): Rename move/copy-current-child-by to
891 (mouse-move-window-over-frame): New function to move the window
892 under the mouse cursor to another frame.
894 * src/clfswm-internal.lisp (find-child-in-parent): New function.
896 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
898 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
899 windows only when its window parent is the current child.
901 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
903 * src/clfswm-util.lisp (manage-current-window)
904 (unmanage-current-window): New functions: Allow to force to manage
905 or unmanage a window by its parent frame.
907 * src/bindings-second-mode.lisp (#\o): binded to
908 set-open-in-new-frame-in-parent-frame-nw-hook and
909 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
911 * src/clfswm-util.lisp (with-current-window): New macro.
913 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
914 exposure and enter-window handle event.
916 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
917 children for the current child after the move/resize.
919 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
921 * src/xlib-util.lisp (resize-window): Take care of window size
924 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
925 move/resize unmanaged windows.
927 * src/xlib-util.lisp (move-window, resize-window): New functions.
929 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
931 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
932 user choose what window type the current frame must handle.
933 (display-current-window-info): New function.
934 (current-frame-manage-all-window-type)
935 (current-frame-manage-only-normal-window-type)
936 (current-frame-manage-no-window-type): New functions.
938 * src/clfswm-internal.lisp (managed-window-p): New function.
940 * src/package.lisp (frame): Managed type: new frame
941 parameter. This allow to choose what window type a frame must
944 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
946 * src/clfswm-nw-hooks.lisp
947 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
949 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
952 * src/tools.lisp (ensure-printable): Return always a string even
955 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
957 * src/config.lisp (*default-nw-hook*): New variable to change the
958 default new window hook.
960 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
962 * clfswm.asd (clfswm): Add a dependency from
963 clfswm-second-mode.lisp to clfswm.lisp.
965 * src/clfswm-util.lisp (identify-key): Show the documentation for
966 the function bound on a key.
967 (with-movement): Move with-movement,
968 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
971 * src/clfswm-menu.lisp: New menu system that let user change keys
972 or functions associated to keys.
974 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
976 * src/clfswm-internal.lisp (show-all-children): Display-child is
977 the first child by default. Solve a bug with father-p.
979 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
981 * src/clfswm-internal.lisp (add-frame): Add frame return the
983 (show-all-children): Move the size computation outside the
986 * src/bindings-second-mode.lisp (with-movement): Redisplay only
989 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
990 only the current child.
992 * src/clfswm-internal.lisp (show-all-children): New display-child
993 parameter to display only the desired child and its children.
994 (select-next/previous-child): Only display the current child.
996 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
998 * src/clfswm.lisp (init-display): Move the default frame creation
999 on the default init hook.
1001 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1002 the main mode (for example: "1" on an azerty keyboard).
1004 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
1006 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1007 keysyms. Revert to old grabbing method for the main mode.
1009 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
1011 * src/clfswm.lisp (init-display): Add key handling on no focus
1012 window and on frame windows.
1014 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1016 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1017 all keys by default and replay just what is needed. No change for
1020 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1021 (find-key-from-code): Test for shift and not shift presence.
1023 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
1025 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1026 new key parameter to have less flickering.
1028 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
1030 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1031 layout only one time and revert to no-layout to freely handle
1034 * src/clfswm-nw-hooks.lisp
1035 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1036 with new created window.
1038 * src/clfswm-layout.lisp (register-layout): Now register
1039 automatically a once layout to set the layout only one time and
1040 revert to no-layout to freely handle frames.
1042 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1044 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1045 nw-hook: Open the next window in the current frame and leave the
1046 focus to the current child.
1048 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
1050 * src/bindings-second-mode.lisp: Add keys definitions to
1051 bind-or-jump in the second mode.
1053 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
1054 macro for bind-or-jump-(1|2|3...).
1056 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
1057 arguments to function. This allow to do things like:
1058 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
1059 are passed to my-function on key press.
1061 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
1063 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
1065 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
1067 * src/clfswm-internal.lisp (child-fullname): New function
1069 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
1070 docstring in info-mode-menu. An item can be
1071 '((key function) (key function)) or with docstring
1072 '((key function "documentation 1") (key function "bla bla") (key function))
1074 * src/tools.lisp (ensure-n-elems): New function.
1076 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
1077 resize a frame or the window's father.
1079 * src/clfswm.lisp (init-display): Remove tile-space-layout by
1080 default on the root frame.
1082 * src/clfswm-util.lisp (move/resize-frame): Add standard event
1083 hooks handlers (map-request, configure-notify...)
1085 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
1088 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1090 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
1091 or the window's father.
1093 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
1094 event only if there is a geometry change.
1095 (mouse-focus-move/resize-generic): Generic function to move or
1096 resize a frame or a window father frame.
1098 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1100 * src/clfswm-internal.lisp (show-all-children): Return t if there
1101 is a geometry change.
1103 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
1105 * src/bindings.lisp (Up/Down): Swap select previous/next level.
1107 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
1109 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
1111 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
1112 (with-all-*): Reverse the child list to manage the first child last (like in
1115 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
1116 root window only if true.
1118 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
1119 root window only if *create-frame-on-root* is true.
1121 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
1124 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
1126 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
1127 the current child (even if it's a window).
1129 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
1131 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
1132 (mouse-click-to-focus-and-resize): New functions.
1134 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
1135 (*-px->fl): Convert pixel coordinates to float.
1137 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
1139 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
1141 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
1144 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
1145 and hide-all-children.
1146 (raise-if-needed): New function.
1147 (show-child): Use a first-p parameter to raise windows only when they are
1150 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
1152 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
1155 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
1157 * src/clfswm-info.lisp (keys-from-list): new function.
1159 * src/*: rename 'childs' in 'children'.
1161 * src/*: rename 'group' in 'frame'.
1163 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
1165 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
1167 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
1169 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
1171 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
1173 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
1174 Bind control+o to open the next window in a new group in the root group
1175 (as open in next window in a new workspace in 0801 version).
1177 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
1179 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
1182 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
1184 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
1185 instead of Tab for select-previous-child.
1187 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
1189 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
1192 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
1194 * clfswm-util.lisp (identify-key): Display the documentation
1195 associated to keys when identifying a key.
1197 2008-03-10 Xavier Maillard <xma@gnu.org>
1199 * contrib/clfswm: Complete rewrite of the script. Detect error and
1200 act accordingly. Add command line arguments to configure the
1201 script execution. User can now choose different common lisp
1202 implementation (clisp and sbcl only), choose where to store the
1203 dumped image, where to find clfswm source.
1205 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
1207 * clfswm-internal.lisp (process-new-window): Beginning of new
1208 window hook: each group have a hook to tell what he wants to do
1209 with the new created window.
1211 2008-03-08 Xavier Maillard <xma@gnu.org>
1213 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
1214 call the resulting executable.
1216 * clfswm.lisp (read-conf-file): Check for the user config file in
1217 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
1218 prefered whenever possible.
1220 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
1222 * clfswm-layout.lisp (*-layout): Add an optional raise-p
1223 parameter in each layout.
1225 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
1227 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
1229 (copy/move-current-child-by-name/number): new functions
1230 (focus-group-by-name/number): new functions
1231 (delete-group-by-name/number): new functions
1233 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
1235 * ************************************************************ *
1236 *: Major update - No more reference to workspaces. The main *
1237 structure is a tree of groups or application windows. *
1238 * ************************************************************ *
1240 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
1242 * clfswm.lisp (read-conf-file): Read configuration in
1243 $HOME/.clfswmrc or in /etc/clfswmrc or in
1244 $XDG_CONFIG_HOME/clfswm/clfswmrc.
1245 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
1248 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
1250 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
1253 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
1255 * clfswm-internal.lisp (find-window-group): New function.
1257 * clfswm*: Change to make clfswm run with clisp/new-clx.
1259 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
1261 * clfswm-util.lisp (query-show-paren): Add show parent matching in
1263 (query-string): Bind control+k to delete end of line.
1265 * clfswm-second-mode.lisp (draw-second-mode-window): Display
1266 the action on mouse motion in second mode.
1268 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
1269 event but do not clear the root window.
1270 (handle-configure-request): Adjust unmanaged window from there
1273 * clfswm-internal.lisp (process-new-window): Adjust new window
1274 with the specified hints (max/min/base width/height).
1276 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
1278 * clfswm.lisp (handle-configure-request): Send an Configuration
1279 Notify event. This solve a bug with xterm and rxvt who takes some
1280 times to be mapped. Now there is no delay.
1282 * bindings-second-mode.lisp (define-shell): Run programs after
1283 living the second mode.
1285 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
1287 * clfswm-internal.lisp (process-new-window): Do not crop transient
1288 window to group size.
1289 (adapt-window-to-group): Do not crop transient window to group
1292 * clfswm.lisp (handle-configure-request): Adapt just the window to
1293 its group and don't take care of the configure request. Remove the
1294 bug with the Gimp outside the group and speed up the window
1296 (handle-exposure): Remove show-all-group on exposure event
1299 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
1301 * clfswm-util.lisp (circulate-group-up-copy-window)
1302 (circulate-group-down-copy-window)
1303 (circulate-workspace-up-copy-group)
1304 (circulate-workspace-down-copy-group): Prevent the copy of the
1305 same window in the same workspace.
1307 * bindings-second-mode.lisp (release-copy-selected-window)
1308 (release-copy-selected-group): Prevent the copy of the same window
1309 in the same workspace.
1311 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
1312 (generic-pager-move-window-on-next-line): Remove the copy
1314 (generic-pager-move-group-on-next-workspace)
1315 (generic-pager-move-group-on-previous-workspace): Prevent the copy
1316 of the same window in the same workspace.
1318 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
1319 (mouse-pager-copy-selected-group-release): Prevent the copy of the
1320 same window in the same workspace.
1322 * tools.lisp (setf/=): new macro to set a variable only when
1325 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
1326 x, y... only when necessary.
1328 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
1330 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
1331 new function and hook: force windows to stay in its group (solve a
1334 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
1336 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
1337 less flickering when moving/resizing groups.
1339 * clfswm-internal.lisp (hide-group): new function.
1340 (show-all-group): clear-all: new parameter.
1342 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
1344 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
1346 * clfswm*: Color change for the pager. Typo or better description
1347 in bindings definitions. Define bindings for a qwerty keyboard by
1348 default. dot-clfswmrc show examples to switch to an azerty
1350 License change to GPL v3.
1351 * config.lisp: new file - group all globals variables in this
1354 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
1356 * xlib-util.lisp (hide-window): Remove structure-notivy events
1357 when hidding a window.
1359 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
1361 * package.lisp (*sm-property-notify-hook*): Readded
1362 property-notify-hook in second mode.
1364 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1366 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
1368 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1370 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
1371 Tile the current workspace with the current window on one side and
1372 others on the other (this emulate the larswm, dwm, wmii way). See
1373 the default configuration file to enable this mode by default.
1375 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
1378 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1380 * clfswm-pager.lisp (pager-draw-window-in-group): Add
1381 ensure-printable to print windows name even with non-ascii
1384 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
1386 * clfswm-pager.lisp (pager-explode-current-group): Create a new
1387 group for each window in group.
1388 (pager-implode-current-group): Move all windows in workspace to
1389 one group and remove other groups.
1391 * clfswm-pack.lisp (explode-group): Create a new group for each
1393 (implode-group): Move all windows in workspace to one group and
1394 remove other groups.
1396 * clfswm-util.lisp (identify-key): Remove local configuration
1397 variables and made them available for configuration from
1399 (query-string): idem.
1401 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1403 * netwm-util.lisp: Start of NetWM compliance.
1404 Add a Netwm client list gestion.
1406 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1408 * clfswm-internal.lisp (create-group-on-request): open a new group
1409 only when the current group is not empty.
1411 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
1412 bug with null workspace.
1414 * clfswm-pager.lisp (pager-handle-event): Add a hook
1415 system. This hooks can be changed in the user configuration file.
1417 * package.lisp: All colors and font variables are set in
1418 package.lisp and can be configured in the user configuration
1420 Note: If you have configured some less ugly colors (esp. for the
1421 pager) don't hesitate to let me know :)
1423 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
1424 system. This hooks can be changed in the user configuration file.
1426 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
1427 changed in the user configuration file (~/.clfswmrc)
1429 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1431 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
1432 arrow action, open next window in new workspace/group.
1434 * bindings.lisp (stop-all-pending-actions): new binding.
1435 (open-next-window-in-new-group-once): Open the next windows in a
1436 new group (only once) or open all new windows in a new group (like
1437 others windows managers).
1439 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1441 * clfswm.lisp (read-conf-file): New function to read a lisp
1442 configuration file at startup.
1443 (focus-group-under-mouse): Check if group isn't the current group
1444 ( prevent a bug with unclutter ).
1446 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
1448 * bindings.lisp (run-program-from-query-string): A program can be
1449 launch from a input query window.
1451 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
1453 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
1455 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
1457 * clfswm.lisp (process-new-window): One can now open the next
1458 window in a workspace called by its number.
1460 * clfswm-util.lisp (query-font-string): Minimal editing
1462 (eval-from-string): And an REPL in the window manager... :)
1464 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
1466 * clfswm.lisp (process-new-window): One can now open the next
1467 window in a new workspace or a new group.
1469 * clfswm-pager.lisp (pager-mode): Display the next arrow action
1470 with the hidden windows.
1472 * clfswm.lisp (second-key-mode): Display the current workspace
1473 number and the next arrow action in the state window.
1475 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
1476 the pager mode and then redisplay only the current workspace.
1478 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
1480 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
1481 they can be focused with a keypress, sorted or renumbered.
1483 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
1485 * clfswm-pager.lisp (pager-mode): Remove multiple silly
1486 pager-draw-display. This prevent a lot of flickering in the
1489 * clfswm.lisp: Remove all display-force-output and replace them
1490 with only one display-finish-output in the event loop.
1492 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
1494 * clfswm-pager.lisp (pager-center-group): New function - center a
1495 group at the middle of the screen.
1497 * clfswm-pack.lisp (center-group): New function - center a group
1498 at the middle of the screen.
1500 * clfswm.lisp (show-group): Add a cross line under the group.
1501 (show-group): Group are showned even if fullscreened.
1502 (init-display): Add an exposure event on the root window.
1504 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
1506 * package.lisp (*default-group*): Default group is the same size
1507 of a fullscreened group.
1509 * bindings*: Use shift to move, control+shift to copy.
1511 * *.lisp: Add comments for configuration or alternatives. So grep
1512 for CONFIG to see where you can configure clfswm. And grep for
1513 Alternative to use some commented code.
1515 * clfswm.lisp (second-key-mode): Use a single window to show the
1516 second mode. See for alternatives at the end of this file.
1518 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
1520 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
1521 macro of key and mouse definitions.
1522 (define-define-key/mouse): Use state instead of modifiers list
1523 this fix a bug when the modifiers list is not in the rigth order.
1525 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
1527 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
1529 * clfswm-info.lisp (info-mode): Add an info mode.
1531 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
1533 * clfswm.lisp (process-new-window): Change border size for
1535 (show-all-windows-in-workspace): Unhide all windows even when the
1536 current group is in fullscreen mode.
1538 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
1540 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
1541 redisplay the identify window after a terminal switch.
1543 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
1544 redisplay the pager after a terminal switch.
1546 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
1548 * clfswm-util.lisp (identify-key): Add a window to display
1549 the keys to identify on screen.
1551 * bindings.lisp, bindings-pager.lisp: Define same keys to
1552 move/copy groups/windows in second mode and in pager.
1554 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
1556 (show-all-windows-in-workspace): unhide window before adapting it
1559 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
1561 * clfswm.lisp (handle-event): Revert to an older version.
1563 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
1565 * clfswm-util.lisp (force-window-in-group)
1566 (force-window-center-in-group): New functions for transient windows.
1568 * clfswm-pager.lisp (pager-remove-current-workspace/group):
1569 bugfix: hide all windows before removing group or workspace.
1571 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
1573 * bindings-pager.lisp (mouse-pager-move-selected-group)
1574 (mouse-pager-copy-selected-group)
1575 (mouse-pager-move-selected-window)
1576 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
1577 (mouse-pager-rotate-window-down): New functions to have mouse in
1580 * clfswm-pager.lisp (pager-swap-window)
1581 (pager-copy-group-on-next/previous-workspace)
1582 (pager-copy-window-on-next/previous-line): New functions
1584 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
1586 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
1587 (pager-move-group-on-next/previous-workspace): new functions.
1589 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
1590 to its half size (new functions).
1592 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
1594 * clfswm-pager.lisp: workspaces, groups and windows can now be
1595 selectionned with the keyboard or the mouse.
1597 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
1599 * clfswm-pager.lisp (pager-select-workspace-right/left):
1600 workspaces can now be selectionned with the keyboard.
1602 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
1604 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
1605 new function to remove a previous defined key or mouse combination.
1607 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
1609 * clfswm.lisp (main): Check for access error in init-display.
1611 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
1612 keycode before grabbing.
1614 * bindings.lisp: Remove nlambda and use defun to keep the function
1615 documentation with clisp.
1616 (define-shell): new macro to define shell command for the second
1619 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1621 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
1624 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
1626 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
1627 workspace circulation.
1629 * clfswm-util.lisp (absorb-orphan-window): new function.
1631 * clfswm-keys.lisp: Keysyms support.
1633 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
1635 * clfswm.lisp (show-group): Use one gc for all groups and not one
1638 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
1640 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
1642 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
1643 width and height outside group.
1645 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
1647 * clfswm.lisp: First public release.