1 2012-01-04 Philippe Brochard <pbrochard@common-lisp.net>
3 * src/xlib-util.lisp (with-xlib-protect): Protect from
4 xlib:lookup-error. This prevent an error in clisp/new-clx when
5 sometimes an xlib:colormap is expected instead of an xlib:window.
7 2012-01-03 Philippe Brochard <pbrochard@common-lisp.net>
9 * src/xlib-util.lisp (handle-event): Fix a clisp/new-clx error
10 when sometimes window slot of event-slots is a pixmap instead of a
13 2011-12-26 Philippe Brochard <pbrochard@common-lisp.net>
15 * src/clfswm-query.lisp: Fill the history list with a non-nil
18 2011-12-25 Philippe Brochard <pbrochard@common-lisp.net>
20 * src/package.lisp (make-x-drawable): Drawable wrapper to prevent
21 type error in some CLX versions.
22 Replace xlib:drawable-* functions with x-drawable-* equivalents
24 2011-12-14 Philippe Brochard <pbrochard@common-lisp.net>
26 * src/clfswm-util.lisp (um-create-xdg-section-list): Add at least
27 the 'Utility menu entry.
29 * src/config.lisp (*xdg-section-list*): moved to config.lisp.
31 * src/clfswm-util.lisp (update-menus): Set a default value for
32 searching .desktop files when XDG_DATA_DIRS is not set.
34 2011-10-15 Philippe Brochard <pbrochard@common-lisp.net>
36 * src/clfswm-internal.lisp (place-window-from-hints): Use
37 with-placement macro to place unmanaged windows in an arbitrary
40 2011-06-16 Philippe Brochard <pbrochard@common-lisp.net>
42 * src/clfswm-internal.lisp (clean-windows-in-all-frames): Prevent
43 current root and current child being equal to child.
45 2011-06-13 Philippe Brochard <pbrochard@common-lisp.net>
47 * src/keysyms.lisp: Repeat Page_Down/Up keysym definitions at the
48 end of the file to change keysyms priority.
50 2011-06-13 Sylvain HENRY <hsyl20@gmail.com>
52 * *.*: Minor spelling fix.
54 2011-06-12 Philippe Brochard <pbrochard@common-lisp.net>
56 * src/clfswm.lisp (:unmap-notify, :destroy-notify): Show all
57 children just after the xlib tree cleanup -> reduce the
58 flickering when a window is deleted or destroyed.
60 * src/clfswm-internal.lisp (process-existing-windows): Do not
61 process the notify window.
63 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
65 * *: **** Release 1106 ****
67 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
69 * src/clfswm-internal.lisp (clean-windows-in-all-frames): New
70 function to prevent xlib error when a window is deleted.
72 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
74 * src/clfswm-internal.lisp
75 (delete-child-and-children-in-all-frames): Delete or destroy
76 children before displaying all children.
78 2011-06-05 Philippe Brochard <pbrochard@common-lisp.net>
80 * src/clfswm-util.lisp (add-frame-in-parent-frame): New function
83 2011-06-04 Philippe Brochard <pbrochard@common-lisp.net>
85 * src/clfswm.lisp (main-unprotected): Destroy all frames windows
86 before closing the display (not really needed).
88 2011-06-02 Philippe Brochard <pbrochard@common-lisp.net>
90 * src/clfswm-layout.lisp (inc-tile-layout-size)
91 (dec-tile-layout-size, inc-slow-tile-layout-size)
92 (dec-slow-tile-layout-size): New functions and bindings.
94 2011-06-01 Philippe Brochard <pbrochard@common-lisp.net>
96 * src/clfswm-expose-mode.lisp (define-expose-letter-keys): Add
97 0..1 and A..Z keys to select a child in exposé mode.
99 * src/clfswm-internal.lisp (display-frame-info): Remove hidden
100 infos in frames windows.
102 * src/clfswm-util.lisp (ask-close/kill-current-window): Menu
105 2011-05-30 Philippe Brochard <pbrochard@common-lisp.net>
107 * src/clfswm-internal.lisp (get-parent-layout): Minor fullscreen
110 2011-05-29 Philippe Brochard <pbrochard@common-lisp.net>
112 * src/clfswm-internal.lisp
113 (delete-child-and-children-in-all-frames): Show all children
114 before deleting/destroying a windows, so prevent a flickering.
115 (get-parent-layout): Return the fullscreen size when the current
118 2011-05-28 Philippe Brochard <pbrochard@common-lisp.net>
120 * src/clfswm-internal.lisp (get-parent-layout): Handle correctly
123 * src/clfswm-util.lisp (delete-focus-window-generic): Do not hide
124 child before removing, so prevent a flickering.
126 * src/clfswm-internal.lisp (show-all-children): Rectangular
127 optimization to display only needed children.
128 (show-all-children): Remove flickering on
129 select-next/previous-brother.
131 2011-05-17 Philippe Brochard <pbrochard@common-lisp.net>
133 * src/clfswm-util.lisp (copy-focus-window, cut-focus-window): New
134 functions and ask-close/kill-current-window menu and bindings
137 2011-05-16 Philippe Brochard <pbrochard@common-lisp.net>
139 * src/clfswm-util.lisp (ask-close/kill-current-window): Add an
140 *ask-close/kill-placement* placement window variable.
142 2011-05-09 Philippe Brochard <pbrochard@common-lisp.net>
144 * contrib/osd.lisp (funcall-button-from-code): Display osd
145 documention for buttons and fix some redefining warnings.
147 2011-05-07 Philippe Brochard <pbrochard@common-lisp.net>
149 * src/clfswm-nw-hooks.lisp (make-permanent-nw-hook-frame): New
150 function. Prevent to add or delete a new window hook for this
153 * src/clfswm-layout.lisp (update-layout-managed-children-position):
156 2011-05-06 Philippe Brochard <pbrochard@common-lisp.net>
158 * src/bindings-second-mode.lisp (set-default-second-keys):
159 select-brother-spatial-move-* binding update.
161 * src/clfswm-layout.lisp (tile-left|right|top|bottom-layout): Ask
162 to keep children positions or not.
164 * src/clfswm-internal.lisp (fixe-real-size): Takes care of border
167 * src/clfswm-layout.lisp (update-layout-managed-children): Fix a
168 bug by using the parent frame instead of the current child.
170 * src/clfswm-circulate-mode.lisp
171 (select-brother-generic-spatial-move+right/left/up/down): New
172 function to select a brother from another in a spatial move.
174 2011-04-19 Philippe Brochard <pbrochard@common-lisp.net>
176 * src/clfswm-pack.lisp (move-frame-constrained)
177 (resize-frame-constrained): Use pixels instead of floating
180 2011-04-18 Philippe Brochard <pbrochard@common-lisp.net>
182 * src/clfswm-pack.lisp (resize-frame-constrained): Takes care of
184 (implode-frame, implode-current-frame): New functions. Absorb all
185 frames subchildren in frame. Explode frame opposite.
187 2011-04-17 Philippe Brochard <pbrochard@common-lisp.net>
189 * src/clfswm-pack.lisp (move-frame-constrained)
190 (resize-frame-constrained): New function. Move and resize frame
191 with the mouse constrained by other frame brothers.
193 2011-04-14 Philippe Brochard <pbrochard@common-lisp.net>
195 * src/clfswm-util.lisp (with-movement-select-next-brother)
196 (with-movement-select-previous-brother)
197 (with-movement-select-next-child): Use a simple method (do not
198 enter in the circulate mode) to allow to circulate in all children
201 * src/clfswm-menu.lisp (open-menu): Save info hash table keys
202 instead of deleting newly created keys.
204 2011-03-21 Philippe Brochard <pbrochard@common-lisp.net>
206 * src/clfswm-internal.lisp (x-px->fl, y-px->fl): Takes care of
209 2011-03-20 Philippe Brochard <pbrochard@common-lisp.net>
211 * src/clfswm-info.lisp (show-config-variable): call
212 produce-conf-var-doc.
214 2011-03-18 Philippe Brochard <pbrochard@common-lisp.net>
216 * src/clfswm-autodoc.lisp (produce-conf-var-doc-html): Produce a
217 documentation for all configurable variables in CLFSWM -
220 * src/clfswm-internal.lisp (leave-frame): Hide all children except
223 2011-03-16 Philippe Brochard <pbrochard@common-lisp.net>
225 * src/clfswm-autodoc.lisp (produce-all-docs): Produce a
226 documentation for all configurable variables in CLFSWM.
228 * src/clfswm-layout.lisp (set-gimp-layout): Display a notify
229 window with the help on the GIMP layout.
231 2011-03-12 Philippe Brochard <pbrochard@common-lisp.net>
233 * src/menu-def.lisp: Menu update to prevent cursor keys clash.
235 * clfswm.asd: Change compilation order to prevent undefined
238 * src/clfswm-internal.lisp (show-child(frame)): Handle properly
239 the show-root-frame-p parameter.
241 2011-03-11 Philippe Brochard <pbrochard@common-lisp.net>
243 * src/clfswm-util.lisp (move-frame, resize-frame): Do not move or
244 resize a frame when it's the current root.
246 2011-03-10 Philippe Brochard <pbrochard@common-lisp.net>
248 * src/clfswm-internal.lisp (show-all-children): Handle properly
249 duplicated child in multipe frames.
251 2011-03-09 Philippe Brochard <pbrochard@common-lisp.net>
253 * contrib/volume-mode.lisp (set-default-volume-keys): Add more
254 keybindings (up/down, right/left) to raise/lower the volume.
256 * src/clfswm-layout.lisp: Add a variable border size for frames
259 2011-03-08 Philippe Brochard <pbrochard@common-lisp.net>
261 * src/clfswm-util.lisp (cut-current-child, remove-current-child)
262 (delete-current-child): Hide the current child before doing the
265 * src/clfswm-internal.lisp (show-all-children): Hide windows not
266 in the current root before displaying those in current root.
267 Remove all hide-all unnecessary calls.
269 * src/clfswm-configuration.lisp (save-variables-in-conf-file):
270 Save only variables with a different value than their original
273 2011-03-07 Philippe Brochard <pbrochard@common-lisp.net>
275 * src/clfswm-info.lisp (show-config-variable): Use the new
278 * src/clfswm-autodoc.lisp (produce-configuration-variables): Use
279 the new defconfig method.
281 * src/clfswm-configuration.lisp (create-configuration-menu):
282 Change the config system with a more lispy one and a less string
283 based one: (defconfig name value group doc).
286 2011-03-06 Philippe Brochard <pbrochard@common-lisp.net>
288 * src/clfswm-internal.lisp (show-all-children): Simplify the
290 (show-child): Display an unmanaged window whe it's the current
292 (show-all-children): add the ability to display all child from
293 *root-frame* and hide all those who are not in *current-root*.
294 -> remove hide-all-children when needed.
296 * src/xlib-util.lisp (move-window,resize-window): Add a
297 *color-move-window* border when moving or resizing a window.
299 2011-03-04 Philippe Brochard <pbrochard@common-lisp.net>
301 * src/clfswm-internal.lisp (show-all-children): Perform only one
302 recusion on the clfswm tree: calculate geometry and place child in
305 2011-03-03 Philippe Brochard <pbrochard@common-lisp.net>
307 * src/clfswm-internal.lisp (show-all-children): Rethink of display
308 child order to prevent very annoying flickering.
310 2011-02-27 Philippe Brochard <pbrochard@common-lisp.net>
312 * src/clfswm-util.lisp (query-yes-or-no): New function.
314 * src/clfswm-configuration.lisp (reset-all-config-variables): New
315 function and menu entry.
316 (query-conf-value): Add the ability to leave the field blank to
317 reset the variable to its default value.
319 2011-02-26 Philippe Brochard <pbrochard@common-lisp.net>
321 * src/clfswm-configuration.lisp
322 (add-all-configuration-default-value): Add a default value to
323 configurable variables.
325 2011-02-23 Philippe Brochard <pbrochard@common-lisp.net>
327 * src/clfswm.lisp (main-unprotected): Create the configuration
328 menu only once at startup.
330 2011-02-22 Desmond O. Chang <dochang@gmail.com>
332 * contrib/amixer.lisp: Add a volume mode inspired by the emms
333 volume package. Alsa mixer interface.
335 * contrib/volume-mode.lisp: Add a volume mode inspired by the emms
338 2011-02-22 Desmond O. Chang <dochang@gmail.com>
340 * src/clfswm.lisp (main): Use ASDF:SYSTEM-SOURCE-DIRECTORY instead
341 of *LOAD-TRUENAME*. *LOAD-TRUENAME* is only bound during a call to
342 LOAD. If one eval CLFSWM:MAIN in repl, BASE-DIR will be an empty
343 string. Use ASDF:SYSTEM-SOURCE-DIRECTORY to fix it.
345 2011-02-16 Philippe Brochard <pbrochard@common-lisp.net>
347 * src/clfswm.lisp (main-unprotected): Add a close hook. And close
348 the notify window, the virtual keyboard and the clfswm terminal by
351 2011-02-15 Philippe Brochard <pbrochard@common-lisp.net>
353 * src/clfswm.lisp (main-unprotected): Destroy the notify window
354 before closing the display. This fix a bug when resetting/reloading
357 2011-02-12 Philippe Brochard <pbrochard@common-lisp.net>
359 * src/xlib-util.lisp (equal-wm-class-fun, equal-wm-name-fun)
360 (raise-window-fun, raise-and-focus-window-fun): New functions.
362 * src/config.lisp (*clfswm-terminal-cmd*): Switch from xterm to
364 (*never-managed-window-list*): Structure change to be more
365 flexible. Let the choice to focus, raise and do nothing on never
368 2011-02-09 Philippe Brochard <pbrochard@common-lisp.net>
370 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Take
371 care of never managed windows to move or resize them if the raise
374 * src/clfswm-internal.lisp (in-frame, in-window, in-child): New
377 2011-02-08 Philippe Brochard <pbrochard@common-lisp.net>
379 * src/clfswm.lisp (main-mode): Raise or not unmanaged windows
380 following request in *never-managed-window-list*.
382 2011-02-05 Philippe Brochard <pbrochard@common-lisp.net>
384 * *: **** Release 1102 ****
386 2011-02-05 Desmond O. Chang <dochang@gmail.com>
388 * src/keysyms.lisp: Add extended keysyms from stumpwm.
390 2011-02-01 Desmond O. Chang <dochang@gmail.com>
392 * src/clfswm-util.lisp (run-or-raise): New function (thanks to
395 * src/clfswm-internal.lisp (with-all-*): add a nil block.
397 2011-01-28 Desmond O. Chang <dochang@gmail.com>
399 * src/clfswm-util.lisp (xdg-config-home): XDG_CONFIG_HOME should
400 be $HOME/.config by default.
402 2010-12-29 Philippe Brochard <pbrochard@common-lisp.net>
404 * contrib/osd.lisp (display-doc): Add another method where a
405 CLFSWM native window is used to display the key documentation.
407 2010-12-27 Philippe Brochard <pbrochard@common-lisp.net>
409 * src/xlib-util.lisp (with-xlib-protect): Force to revert to the
412 2010-12-25 Philippe Brochard <pbrochard@common-lisp.net>
414 * src/clfswm-second-mode.lisp (second-key-mode): Call the second
415 mode leave function only when the generic mode was ended.
417 2010-12-08 Philippe Brochard <pbrochard@common-lisp.net>
419 * src/clfswm-second-mode.lisp (sm-leave-function): Do not use
420 *second-mode-program* anymore.
422 2010-12-07 Philippe Brochard <pbrochard@common-lisp.net>
424 * src/clfswm-second-mode.lisp (*second-mode-leave-function*): New
425 variable bound to a function executed (when not null) on second
428 2010-11-14 Philippe Brochard <pbrochard@common-lisp.net>
430 * src/clfswm-util.lisp (find-child-under-mouse): Do not find
433 2010-11-13 Philippe Brochard <pbrochard@common-lisp.net>
435 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
436 Do not display the accel window for unmanaged windows.
438 2010-11-11 Philippe Brochard <pbrochard@common-lisp.net>
440 * src/clfswm-internal.lisp (set-current-root): Handle
441 window-parent in set-current-root.
443 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
444 focus the parent child when the current root is a window.
446 2010-11-09 Philippe Brochard <pbrochard@common-lisp.net>
448 * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
449 New function an bindings.
451 * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
454 2010-11-07 Philippe Brochard <pbrochard@common-lisp.net>
456 * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
457 function to let the user choose to keep child position with
460 * src/clfswm-internal.lisp (remove-frame-data-slot): New
463 2010-11-05 Philippe Brochard <pbrochard@common-lisp.net>
465 * src/clfswm-internal.lisp (frame-select-next-child)
466 (frame-select-previous-child): New functions and bindings. Select
467 the next/previous child in the current frame.
469 2010-10-31 Philippe Brochard <pbrochard@common-lisp.net>
471 * src/clfswm-query.lisp (query-mode-complet): New function: Handle
472 completion in query-mode.
474 2010-10-30 Philippe Brochard <pbrochard@common-lisp.net>
476 * src/clfswm-query.lisp (query-print-string): Handle long lines
479 2010-10-27 Philippe Brochard <pbrochard@common-lisp.net>
481 * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
482 all characters are printable.
484 2010-10-25 Philippe Brochard <pbrochard@common-lisp.net>
486 * contrib/server/server.lisp: Load clfswm client code in the main
487 program and let the user start it with a --client command line
490 * src/package.lisp (*main-entrance-hook*): New hook executed after
491 loading configuration file and before opening the display.
493 2010-10-23 Philippe Brochard <pbrochard@common-lisp.net>
495 * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
497 * src/clfswm-internal.lisp (show-child): Show window only if not
500 * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
501 change modifiers after binding definition.
503 2010-10-21 Philippe Brochard <pbrochard@common-lisp.net>
505 * contrib/osd.lisp: New file: OSD (On Screen Display) for
508 * src/clfswm-menu.lisp (open-menu): Modularise function.
510 2010-10-13 Philippe Brochard <pbrochard@common-lisp.net>
512 * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
513 key binding in main and second mode.
515 2010-10-10 Philippe Brochard <pbrochard@common-lisp.net>
517 * src/clfswm-util.lisp (open-notify-window): Convert hello-window
518 functions to a more generic Notify-window system.
520 * src/tools.lisp (add-timer): Add an id to identify the timer.
522 2010-10-09 Philippe Brochard <pbrochard@common-lisp.net>
524 * src/tools.lisp (erase-timer): New function.
526 * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
527 the hello window. Add Configuration variables.
529 2010-10-08 Philippe Brochard <pbrochard@common-lisp.net>
531 * src/clfswm-util.lisp (): Add an Hello window at startup.
533 * src/tools.lisp (process-timers): Add a timer system.
535 2010-10-07 Philippe Brochard <pbrochard@common-lisp.net>
537 * src/clfswm-query.lisp (add-in-query-string): Handle correctly
540 2010-10-06 Philippe Brochard <pbrochard@common-lisp.net>
542 * src/clfswm-query.lisp (query-print-string): Change cursor color
543 and show parenthesis matching with colors (on match and on
546 2010-10-05 Philippe Brochard <pbrochard@common-lisp.net>
548 * src/clfswm-internal.lisp (show-all-children): Do not raise a
549 child when its parent is hidden.
551 2010-10-02 Philippe Brochard <pbrochard@common-lisp.net>
553 * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
554 possibility to circulate over subchild of the current child.
556 * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
557 (expose-windows-generic): Add an escape-body function to return to
558 the original state on escape key.
560 * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
561 to bind the current child from the configuration file.
563 2010-10-01 Philippe Brochard <pbrochard@common-lisp.net>
565 * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
566 window hook: the frame absorb all new windows that match
567 nw-absorb-test frame data slot.
569 2010-09-30 Philippe Brochard <pbrochard@common-lisp.net>
571 * src/clfswm-expose-mode.lisp (expose-create-window): Show window
572 title in accel window.
574 2010-09-29 Philippe Brochard <pbrochard@common-lisp.net>
576 * configure: Use the Xavier Maillard clfswm script in contrib to
577 build an executable in the standard way.
579 2010-09-26 Philippe Brochard <pbrochard@common-lisp.net>
581 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
582 New functions. Add a window on each child in the expose mode to
585 * src/clfswm-internal.lisp (child-x, child-y, child-width)
586 (child-height): New methods to get real child coordinates.
588 2010-09-25 Philippe Brochard <pbrochard@common-lisp.net>
590 * src/clfswm-layout.lisp (*-layout): Use child-position.
592 * src/clfswm-internal.lisp (child-position): New function.
594 * src/clfswm-expose-mode.lisp (expose-windows-mode)
595 (expose-all-windows-mode): Use a generic mode.
597 * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
598 with handle-event-fun symbols instead of inspecting clfswm
599 internals symbols on each mode change.
601 * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
602 a separate clfswm-expose-mode.lisp file.
604 * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
605 screen size instead of hardcoded test coordinates.
607 2010-09-24 Philippe Brochard <pbrochard@common-lisp.net>
609 * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
610 (speed-mouse-right, speed-mouse-up, speed-mouse-down)
611 (speed-mouse-undo, speed-mouse-first-history): New functions to
612 quickly move the mouse. Implemented for the second mode.
614 2010-09-16 Philippe Brochard <pbrochard@common-lisp.net>
616 * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
617 write permission on $clfswm_asd_path. So anybody can start clfswm
618 even if there is no write permission on the source directory.
620 2010-09-12 Philippe Brochard <pbrochard@common-lisp.net>
622 * contrib/clfswm: Add support to cmucl, ccl and ecl.
624 2010-09-11 Philippe Brochard <pbrochard@common-lisp.net>
626 * src/clfswm-util.lisp (set-hide-unmanaged-window)
627 (set-show-unmanaged-window, set-default-hide-unmanaged-window):
628 New functions and menu entry.
629 (set-globally-hide-unmanaged-window)
630 (set-globally-show-unmanaged-window): New functions and menu
633 * src/clfswm-internal.lisp (hide-unmanager-window-p): New
635 (show-child): Add a data slot on frame to hide or not unmanaged
638 * src/clfswm-corner.lisp (present-clfswm-terminal)
639 (present-virtual-keyboard): Use a function (generic-present-body)
640 instead of a macro (generate-present-body).
642 * src/clfswm-util.lisp (update-menus): List all directories and
643 subdirectories in $XDG_DATA_DIRS/applications.
645 2010-09-10 Philippe Brochard <pbrochard@common-lisp.net>
647 * src/clfswm-corner.lisp (generate-present-body): New macro.
648 (present-clfswm-terminal, present-virtual-keyboard): Use
649 generate-present-body.
651 2010-09-09 Philippe Brochard <pbrochard@common-lisp.net>
653 * src/clfswm-util.lisp (update-menus): Follow XDG specifications
654 instead of the non-portable Debian update-menu.
656 2010-09-07 Philippe Brochard <pbrochard@common-lisp.net>
658 * src/clfswm.lisp (error-handler): New function do handle
659 asynchronous errors and ignore them.
660 (open-display): Install the new error-handler on display.
662 2010-09-05 Philippe Brochard <pbrochard@common-lisp.net>
664 * src/xlib-util.lisp (with-xlib-protect): Add a
665 with-simple-restart on top of body execution.
667 2010-09-04 Philippe Brochard <pbrochard@common-lisp.net>
669 * src/clfswm.lisp (main-loop): Protect all xlib functions with an
672 * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
673 handle-event. Add a with-simple-restart to prevent a
674 clisp/new-lisp infinite loop.
676 2010-08-30 Philippe Brochard <pbrochard@common-lisp.net>
678 * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
679 clfswm terminal working even on xterm title changes.
681 2010-08-29 Philippe Brochard <pbrochard@common-lisp.net>
683 * src/clfswm-util.lisp (run-other-window-manager): Update for
686 * src/tools.lisp (do-execute): New parameter io to change the
689 * src/clfswm-util.lisp (hide-current-child): Prevent from removing
692 * src/clfswm-internal.lisp (child-member): New predicate.
693 (child-remove): New function.
695 * src/*.lisp: Use child-member and child-remove everywhere it's
698 2010-08-28 Philippe Brochard <pbrochard@common-lisp.net>
700 * src/clfswm.lisp (main-loop): Ensure that all events have been
701 processed after a process-event.
703 * src/clfswm-internal.lisp (is-in-current-child-p): New function.
705 2010-08-27 Philippe Brochard <pbrochard@common-lisp.net>
707 * src/clfswm.lisp (main-mode:configure-request): Raise the window
708 only when present on the current child and focus it accordingly.
710 2010-08-26 Philippe Brochard <pbrochard@common-lisp.net>
712 * src/clfswm-circulate-mode.lisp (circulate-loop-function):
713 Use is-a-key-pressed-p.
715 * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
717 * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
718 returned by xlib:keysym->keycodes.
720 * src/*.lisp: Use the new child-equal-p to compare children. This
721 prevent a bug with sbcl/cmucl when the standard equal function
722 does not work with xlib:window.
724 * src/clfswm-internal.lisp (child-equal-p): New predicate.
726 2010-08-25 Philippe Brochard <pbrochard@common-lisp.net>
728 * src/clfswm-generic-mode.lisp (generic-mode): Use an
729 xlib:event-listen before processing event with
730 xlib:process-event. This prevent a bug with CLX threaded
731 implementation like sbcl.
733 * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
734 processing event with xlib:process-event. This prevent a bug with
735 CLX threaded implementation like sbcl.
737 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
739 * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
741 * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
744 * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
745 (find-parent-frame, find-frame-window, find-frame-by-name)
746 (find-frame-by-number): Use with-find-in-all-frames to search in
747 frames in the right order.
749 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
750 unwanted flickering with unmanaged windows.
752 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
754 * src/package.lisp: Remove event handler hooks as they're not
755 needed anymore (To replace them: use closure and define-handler).
757 * src/xlib-util.lisp (move-window, resize-window)
758 (wait-mouse-button-release): Use a generic mode.
760 * src/*.lisp: Replace the case to handle event with a more (tricky)
761 lispy method which bind a function to each keywords associated
764 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
766 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
767 menu entry between delete-current-child and remove-current-child.
768 ie: Delete a child and its children in all frames by default.
770 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
772 * src/package.lisp: Add a placement configuration group.
774 * src/binding*.lisp: Bind control+g to escape the current action
777 * src/clfswm-internal.lisp
778 (delete-child-and-children-in-all-frames): New function and
779 binding: Second mode - Control+Delete delete the current child and
780 its children in all frames (ie: close the current child and its
783 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
785 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
786 the frame window and the frame gc. Close a very annoying bug when
787 cuting/pasting a frame or moving a child over frames with the
790 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
791 all children in *current-root* after moving/resizing a frame.
793 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
795 * src/clfswm-util.lisp (delete-focus-window)
796 (destroy-focus-window): Remove child in parent frame before
799 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
801 * src/clfswm-util.lisp (identify-key): Add a timeout in
803 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
804 of the window passed by xlib:process-event.
806 * src/xlib-util.lisp (move-window, resize-window)
807 (wait-mouse-button-release): Add a timeout in xlib:process-event.
809 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
811 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
812 to launch an other window manager and to return to clfswm.
814 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
816 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
819 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
821 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
824 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
825 parameter and a loop timeout.
827 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
829 * src/clfswm.lisp (main): Add an alternate configuration filename
832 * load.lisp: Add a debuging code example.
834 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
836 * src/clfswm-configuration.lisp (create-configuration-menu): New
837 menu to configure all clfswm variables while clfswm is running.
839 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
841 * src/clfswm-util.lisp (save-configuration-variables): New
842 function to save all configuration variables in clfswmrc.
844 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
846 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
848 (set-default-info-keys): Add cursor key support in info mode.
850 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
852 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
855 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
856 prevent reading the configuration file (this may be useful to
857 produce the original documentation without user modifications
858 with the rc configuration file).
860 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
862 * src/bindings-second-mode.lisp (set-default-second-keys):
863 Simplification of Escape key to close/kill/remove the focus window
864 and unhide all windows.
866 * src/bindings.lisp (set-default-main-keys): Simplification of
867 Escape key to close/kill/remove the focus window and unhide all
870 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
871 focus and unhide all windows capabilities.
873 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
875 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
877 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
879 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
880 Keep child order and don't make unnecessary child movement.
881 (one-column-layout, one-line-layout): New layouts.
883 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
885 * *: **** Release 0906 ****
887 * contrib/cd-player.lisp: New file to handle the CD player.
889 * contrib/xmms.lisp: New file to handle the xmms player.
891 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
893 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
894 Maximize windows in their frame - Leave frames to their actual
897 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
898 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
900 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
902 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
904 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
906 * contrib/mpd.lisp: Use a standard menu.
908 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
910 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
912 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
914 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
916 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
919 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
921 * src/config.lisp (get-fullscreen-size): One pixel adjustment
924 * src/clfswm-placement.lisp (*-child-placement): One pixel
927 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
929 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
930 Ensure that all characters are printable.
932 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
935 * src/clfswm-placement.lisp (*-child-placement): Adjust
936 coordinates to one pixel in the current child.
938 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
940 * src/clfswm-query.lisp (query-enter-function): Assign font before
941 width and height calculation.
943 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
945 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
946 bannish the pointer in an arbitrary place.
948 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
949 place the info window in an arbitrary place.
951 * src/clfswm-query.lisp (query-enter-function): Use with-placement
952 macro to place the query window in an arbitrary place.
954 * src/clfswm-placement.lisp: New file. Allow to place info windows
955 or query windows on an arbitrary place. Allow to bannish the
956 pointer on an arbitrary place.
958 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
960 * src/clfswm-circulate-mode.lisp (reorder-child)
961 (reorder-brother): Unfocus windows before reordering children or
964 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
966 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
967 the parent is a frame.
969 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
970 motion with a default modifier.
972 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
975 * src/clfswm-info.lisp (info-mode): Handle motion with a default
977 (info-mode): Optimization in loop function.
979 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
981 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
982 root-frame correctly.
984 * clfswm.asd: Dependency fix for clfswm-generic-mode.
986 * src/clfswm-circulate-mode.lisp (reorder-child)
987 (reorder-brother): Handle empty frames.
988 (reorder-brother): Redisplay only the parent frame of the current
991 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
992 parent frame of the current frame.
994 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
996 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
997 Maximize/Unmaximize the current frame in its parent frame.
999 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
1000 windows and frames in their parent frame.
1002 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1004 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
1006 * src/clfswm-circulate-mode.lisp (reorder-child)
1007 (reorder-brother): Reinitialise on circulate type change
1008 child to brother or brother to child.
1010 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
1011 calls xlib:display-finish-output on each map-request. So speed up
1014 * src/xlib-util.lisp (map-window): New function. Call
1015 xlib:display-finish-output on each map request.
1017 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1019 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
1020 Optimisation when drawing second mode window.
1022 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1024 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
1027 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1029 * src/clfswm-util.lisp (run-program-from-query-string): Launch
1030 command only with a return validation.
1032 2009-04-22 Xavier Maillard <xma@gnu.org>
1034 * src/clfswm-query.lisp (query-string): Use a generic mode.
1036 2009-04-19 Xavier Maillard <xma@gnu.org>
1038 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
1040 2009-04-18 Xavier Maillard <xma@gnu.org>
1042 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
1043 to define all other modes.
1045 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1047 * src/package.lisp (): Use *default-font-string* for all
1050 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
1052 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
1054 * src/xlib-util.lisp (null-size-window-p): Better check of null
1057 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
1059 * src/clfswm.lisp (handle-map-request): Add a fix to manage
1060 correctly fullscreen windows (SDL particularly).
1062 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
1064 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
1065 a segfault with clisp/new-clx.
1067 * src/clfswm.lisp (handle-motion-notify): Add a needed window
1070 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
1071 needed window argument.
1073 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
1075 * src/xlib-util.lisp (wait-no-key-or-button-press)
1076 (wait-a-key-or-button-press): Check buttons press/release correctly"
1078 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
1080 * src/menu-def.lisp: Add children navigation menu in the movement
1081 menu (select next/previous child/brother/level).
1083 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
1085 * *: Rename 'sister' frame to 'brother' frame.
1087 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
1088 alias in a real modifier.
1090 * src/package.lisp (*modifier-alias*): New list of modifier alias
1091 For example: :alt is :mod-1, :numlock is :mod-2...
1093 * src/tools.lisp (remove-hook): New function.
1095 * src/clfswm-keys.lisp (with-capslock, without-capslock)
1096 (with-numlock, without-cnumlock): New functions.
1098 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
1100 * src/clfswm-info.lisp: Use the *binding-hook* to create info
1101 keys and mouse bindings.
1103 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
1104 second keys and mouse bindings.
1106 * src/bindings.lisp: Use the *binding-hook* to create main keys
1109 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1111 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
1114 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
1116 * src/menu-def.lisp: Use a menu instead of a function for the
1119 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
1121 * src/clfswm-util.lisp (show-standard-menu): Display the standard
1122 menu from the 'update-menus' command.
1124 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
1126 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
1127 it's already grabbed.
1129 * src/clfswm-internal.lisp (display-frame-info): Use configurable
1130 colors and fix a bug with background.
1131 (display-frame-info): Set window background when displaying info.
1133 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1135 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
1136 warning with clisp/new-clx.
1138 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
1140 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
1143 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1145 * *: **** Release 0809 ****
1147 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1149 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
1151 (ensure-unique-number): New function and menu entry.
1153 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
1155 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
1156 hook: open the next window in a named frame.
1157 (numbered-frame-nw-hook): New new window hook: open the next
1158 window in a numbered frame.
1160 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
1161 cases. So query-string can be called even in the main mode.
1163 * src/clfswm-internal.lisp (show-all-children): Do not raise a
1164 child by default => far less flickering.
1166 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
1168 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
1170 * src/menu-def.lisp: Change key binding for the CLFSWM menu
1173 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
1174 is nil. (workaround on some CLX implementation).
1176 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
1178 * src/menu-def.lisp: Add a menu to set a focus policy for all
1181 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
1182 (all-frames-set-*-focus-policy): Set a focus policy for all
1185 * src/clfswm.lisp (handle-enter-notify): sloppy-select
1186 mode. Select a child and its parents on mouse over.
1188 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
1190 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
1191 policy -> Sloppy focus only for windows in the current frame.
1192 (main-unprotected): Exit clfswm on init error (ie: when another
1193 window manager is running).
1195 * src/clfswm-util.lisp (reset-clfswm): New function.
1197 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
1199 * src/clfswm-menu.lisp (init-menu): New function.
1201 * src/clfswm-util.lisp (reload-clfswm): New function to reload
1203 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
1205 * src/clfswm.lisp (main, main-unprotected): Handle error in a
1206 superior main function. Now CLFSWM can't break the X session. It
1207 just reinitialize the display and run a new main loop.
1209 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
1210 *vt-keyboard-on* global to avoid warnings when loading clfswm.
1212 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
1213 (help-on-gimp-layout): Describe how to use the GIMP layout.
1215 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
1217 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
1218 main-window-right-layout. Change the keybinding for (shift)alt+tab
1219 to not select windows in the main window lisst.
1220 Bind F8 to add a window in the main window list.
1221 Bind F9 to remove a window in the main window list.
1222 Change the focus policy to :sloppy.
1223 (set-previous-layout): Restore the previous layout, keybinding and
1226 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
1228 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
1230 * src/clfswm-layout.lisp (main-window-left-layout)
1231 (main-window-bottom-layout, main-window-top-layout): New
1233 Factorize layouts in menu.
1235 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
1237 * src/clfswm-layout.lisp (main-window-right-layout): A possible
1238 GIMP layout: one or more main windows on one side of the
1239 frame. Others on the other size.
1241 * src/clfswm-util.lisp
1242 (current-frame-set-click/sloppy-focus-policy): Each frame can have
1243 a different focus policy (one of :click or :sloppy).
1244 The default focus policy is set with *default-focus-policy*.
1246 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
1248 * src/clfswm-info.lisp (show-config-variable): New function.
1250 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
1252 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
1254 * src/clfswm-info.lisp: Colored help for key binding and corners
1257 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
1259 * src/clfswm-util.lisp (delete-focus-window)
1260 (destroy-focus-window): Remove chid only in
1261 handle-unmap/destroy-notify. Focus *current-root* only when
1262 closing/killing the current child.
1264 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
1265 functions or corners.
1267 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1269 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
1270 action: Hide/Unhide a terminal on mouse corner action. (By default
1271 right mouse button on the top left corner).
1273 * src/config.lisp (*never-managed-window-list*): New config
1276 * src/clfswm-internal.lisp (never-managed-window-p): New function:
1277 Handle never managed window in a more simple way.
1279 * src/clfswm-corner.lisp: New file and new and more simple method
1280 to define corners actions.
1282 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
1284 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
1286 * src/clfswm-layout.lisp (fast-layout-switch)
1287 (define-fast-layout-switch): New functions: Switch between two
1290 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
1291 really in the second mode. So leave-second-mode can be used even
1294 * src/clfswm-util.lisp (switch-to-last-child): New function:
1295 Store the current child and switch to the previous one.
1297 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1299 * src/clfswm-util.lisp (display-current-window-info): Display the
1301 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
1302 (top right by default). By default 'xvkbd' is used.
1304 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1306 * src/xlib-util.lisp (move-window, resize-window): Compress motion
1309 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
1311 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
1314 * src/clfswm-info.lisp (info-mode): Compress motion events.
1316 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
1318 * src/clfswm-internal.lisp (show-all-children): Compute geometry
1319 and selection first and then show only necessary children.
1320 (show-child): remove unneeded display-p parameter.
1322 * src/config.lisp (get-fullscreen-size): Place the frame border
1323 outside the screen (this prevent the loose of 2 pixels per
1326 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
1328 * src/clfswm-internal.lisp (focus-child): Algorithm change to
1329 raise only the selected child.
1331 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
1333 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
1334 Raise only viewable children.
1336 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
1338 * src/clfswm-internal.lisp (show-all-children): Always raise all
1339 displayed children. Remove all references to raise-p.
1341 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1343 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
1346 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
1347 second mode binding on raise/lower child in its frame.
1349 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
1350 behaviour to the new raise/lower property.
1351 Call clear-nw-hook before the rest of the hook.
1353 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
1354 (mouse-click-to-focus-and-resize-window): Stop button event. This
1355 prevent a keyboard/pointer freeze.
1357 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1359 * src/clfswm-internal.lisp (frame-lower-child)
1360 (frame-raise-child): New functions to raise/lower a child in its
1363 * src/clfswm-util.lisp (have-to-present-windows)
1364 (have-to-present-all-windows): New functions to have an MaxOS
1365 expose like on mouse click in screen corner.
1367 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
1369 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
1371 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
1372 child from a choice in all frames with hidden children.
1374 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
1376 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
1378 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
1379 (unhide-all-children): New functions.
1381 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
1384 * src/clfswm-util.lisp (hide/show-frame-window): new function and
1387 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
1389 * src/clfswm-util.lisp (rename-current-child): Do not display the
1390 frame info for a window.
1392 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
1394 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
1395 frame window for the removed child and its children.
1397 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
1399 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
1402 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
1404 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
1405 the ROX pinboard (ie: leave it lowered in the root window as
1408 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
1409 (tile-left-layout, tile-right-layout, tile-top-layout)
1410 (tile-bottom-layout): Use all the frame space when there is only
1413 * src/clfswm-internal.lisp (place-window-from-hints): Center
1414 unmanaged windows in the root screen.
1416 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
1419 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1421 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
1422 typo in managed types.
1424 * src/clfswm-internal.lisp (show-child): Always display frame info
1425 even if the frame is hidden.
1427 * src/xlib-util.lisp (resize-window): Use a better algorithme to
1430 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1432 * src/clfswm-util.lisp (with-movement): Display frame info for all
1433 frames in current root.
1435 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1437 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
1439 * src/bindings-second-mode.lisp (define-second-key #\a): New
1440 binding on 'add-default-frame'.
1442 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1443 message to follow the autodocumentation process.
1445 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1447 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1448 "Space" to jump to a child. "B" to bind a slot on the current
1451 * src/bindings-second-mode.lisp: Use "Tab" instead of
1454 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
1456 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1457 unmanaged (hidden) windows.
1459 * src/clfswm-internal.lisp (place-window-from-hints): Give a
1460 minimal size for windows.
1461 (with-all-windows-frames-and-parent): New function.
1463 * src/config.lisp (*default-window-width/height*): New parameters.
1465 * src/clfswm-internal.lisp (place-window-from-hints): Center
1466 windows in the screen instead of in their frame.
1468 * src/bindings-second-mode.lisp (tile-space-current-frame): New
1471 * src/clfswm-layout.lisp (register-layout): Intern the once name
1472 in the right package.
1474 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1476 * doc/dot-clfswmrc: Update to follow the new clfswm way.
1478 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
1480 * src/clfswm-internal.lisp (set-current-child)
1481 (adapt-child-to-parent, show-child, hide-child): Handle the case
1482 where child is not a frame or a window.
1484 * src/clfswm-util.lisp
1485 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1486 Check if child is a frame.
1488 * src/clfswm-internal.lisp (managed-window-p): Handle the case
1489 where frame is null.
1490 (place-frame): Check if frame and parent are frames.
1492 * src/clfswm-info.lisp (info-mode): display all frame info before
1495 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1496 info before leaving.
1498 * src/clfswm-internal.lisp (display-all-frame-info): New function.
1500 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
1502 * src/tools.lisp (getenv): Implemented for ECL.
1503 (urun-prog): Implemented for ECL.
1505 * src/clfswm-util.lisp (identify-key): Use a double buffer to
1508 * src/clfswm-query.lisp (query-string): Use a double buffer to
1511 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1514 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1517 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
1519 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1521 * src/menu-def.lisp: New file: move all menu definition in
1524 * src/clfswm-layout.lisp (register-layout): Use a function instead
1527 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
1529 * src/clfswm-autodoc.lisp (produce-menu-doc,
1530 (produce-menu-doc-html): New functions.
1531 (produce-doc-*): Moved to clfswm-autodoc.lisp.
1533 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1534 paste a child on one of its own children. (this prevent a
1536 (move-child-to): Rename move/copy-current-child-by to
1538 (mouse-move-window-over-frame): New function to move the window
1539 under the mouse cursor to another frame.
1541 * src/clfswm-internal.lisp (find-child-in-parent): New function.
1543 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1545 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1546 windows only when its window parent is the current child.
1548 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1550 * src/clfswm-util.lisp (manage-current-window)
1551 (unmanage-current-window): New functions: Allow to force to manage
1552 or unmanage a window by its parent frame.
1554 * src/bindings-second-mode.lisp (#\o): binded to
1555 set-open-in-new-frame-in-parent-frame-nw-hook and
1556 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1558 * src/clfswm-util.lisp (with-current-window): New macro.
1560 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1561 exposure and enter-window handle event.
1563 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1564 children for the current child after the move/resize.
1566 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1568 * src/xlib-util.lisp (resize-window): Take care of window size
1571 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1572 move/resize unmanaged windows.
1574 * src/xlib-util.lisp (move-window, resize-window): New functions.
1576 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1578 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1579 user choose what window type the current frame must handle.
1580 (display-current-window-info): New function.
1581 (current-frame-manage-all-window-type)
1582 (current-frame-manage-only-normal-window-type)
1583 (current-frame-manage-no-window-type): New functions.
1585 * src/clfswm-internal.lisp (managed-window-p): New function.
1587 * src/package.lisp (frame): Managed type: new frame
1588 parameter. This allow to choose what window type a frame must
1591 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1593 * src/clfswm-nw-hooks.lisp
1594 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1596 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1599 * src/tools.lisp (ensure-printable): Return always a string even
1602 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
1604 * src/config.lisp (*default-nw-hook*): New variable to change the
1605 default new window hook.
1607 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1609 * clfswm.asd (clfswm): Add a dependency from
1610 clfswm-second-mode.lisp to clfswm.lisp.
1612 * src/clfswm-util.lisp (identify-key): Show the documentation for
1613 the function bound on a key.
1614 (with-movement): Move with-movement,
1615 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
1616 to clfswm-util.lisp.
1618 * src/clfswm-menu.lisp: New menu system that let user change keys
1619 or functions associated to keys.
1621 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
1623 * src/clfswm-internal.lisp (show-all-children): Display-child is
1624 the first child by default. Solve a bug with father-p.
1626 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
1628 * src/clfswm-internal.lisp (add-frame): Add frame return the
1630 (show-all-children): Move the size computation outside the
1633 * src/bindings-second-mode.lisp (with-movement): Redisplay only
1636 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1637 only the current child.
1639 * src/clfswm-internal.lisp (show-all-children): New display-child
1640 parameter to display only the desired child and its children.
1641 (select-next/previous-child): Only display the current child.
1643 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
1645 * src/clfswm.lisp (init-display): Move the default frame creation
1646 on the default init hook.
1648 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1649 the main mode (for example: "1" on an azerty keyboard).
1651 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
1653 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1654 keysyms. Revert to old grabbing method for the main mode.
1656 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
1658 * src/clfswm.lisp (init-display): Add key handling on no focus
1659 window and on frame windows.
1661 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1663 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1664 all keys by default and replay just what is needed. No change for
1667 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1668 (find-key-from-code): Test for shift and not shift presence.
1670 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
1672 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1673 new key parameter to have less flickering.
1675 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
1677 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1678 layout only one time and revert to no-layout to freely handle
1681 * src/clfswm-nw-hooks.lisp
1682 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1683 with new created window.
1685 * src/clfswm-layout.lisp (register-layout): Now register
1686 automatically a once layout to set the layout only one time and
1687 revert to no-layout to freely handle frames.
1689 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1691 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1692 nw-hook: Open the next window in the current frame and leave the
1693 focus to the current child.
1695 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
1697 * src/bindings-second-mode.lisp: Add keys definitions to
1698 bind-or-jump in the second mode.
1700 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
1701 macro for bind-or-jump-(1|2|3...).
1703 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
1704 arguments to function. This allow to do things like:
1705 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
1706 are passed to my-function on key press.
1708 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
1710 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
1712 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
1714 * src/clfswm-internal.lisp (child-fullname): New function
1716 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
1717 docstring in info-mode-menu. An item can be
1718 '((key function) (key function)) or with docstring
1719 '((key function "documentation 1") (key function "bla bla") (key function))
1721 * src/tools.lisp (ensure-n-elems): New function.
1723 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
1724 resize a frame or the window's father.
1726 * src/clfswm.lisp (init-display): Remove tile-space-layout by
1727 default on the root frame.
1729 * src/clfswm-util.lisp (move/resize-frame): Add standard event
1730 hooks handlers (map-request, configure-notify...)
1732 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
1735 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1737 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
1738 or the window's father.
1740 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
1741 event only if there is a geometry change.
1742 (mouse-focus-move/resize-generic): Generic function to move or
1743 resize a frame or a window father frame.
1745 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1747 * src/clfswm-internal.lisp (show-all-children): Return t if there
1748 is a geometry change.
1750 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
1752 * src/bindings.lisp (Up/Down): Swap select previous/next level.
1754 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
1756 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
1758 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
1759 (with-all-*): Reverse the child list to manage the first child last (like in
1762 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
1763 root window only if true.
1765 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
1766 root window only if *create-frame-on-root* is true.
1768 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
1771 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
1773 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
1774 the current child (even if it's a window).
1776 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
1778 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
1779 (mouse-click-to-focus-and-resize): New functions.
1781 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
1782 (*-px->fl): Convert pixel coordinates to float.
1784 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
1786 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
1788 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
1791 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
1792 and hide-all-children.
1793 (raise-if-needed): New function.
1794 (show-child): Use a first-p parameter to raise windows only when they are
1797 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
1799 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
1802 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
1804 * src/clfswm-info.lisp (keys-from-list): new function.
1806 * src/*: rename 'childs' in 'children'.
1808 * src/*: rename 'group' in 'frame'.
1810 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
1812 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
1814 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
1816 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
1818 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
1820 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
1821 Bind control+o to open the next window in a new group in the root group
1822 (as open in next window in a new workspace in 0801 version).
1824 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
1826 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
1829 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
1831 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
1832 instead of Tab for select-previous-child.
1834 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
1836 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
1839 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
1841 * clfswm-util.lisp (identify-key): Display the documentation
1842 associated to keys when identifying a key.
1844 2008-03-10 Xavier Maillard <xma@gnu.org>
1846 * contrib/clfswm: Complete rewrite of the script. Detect error and
1847 act accordingly. Add command line arguments to configure the
1848 script execution. User can now choose different common lisp
1849 implementation (clisp and sbcl only), choose where to store the
1850 dumped image, where to find clfswm source.
1852 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
1854 * clfswm-internal.lisp (process-new-window): Beginning of new
1855 window hook: each group have a hook to tell what he wants to do
1856 with the new created window.
1858 2008-03-08 Xavier Maillard <xma@gnu.org>
1860 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
1861 call the resulting executable.
1863 * clfswm.lisp (read-conf-file): Check for the user config file in
1864 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
1865 prefered whenever possible.
1867 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
1869 * clfswm-layout.lisp (*-layout): Add an optional raise-p
1870 parameter in each layout.
1872 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
1874 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
1876 (copy/move-current-child-by-name/number): new functions
1877 (focus-group-by-name/number): new functions
1878 (delete-group-by-name/number): new functions
1880 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
1882 * ************************************************************ *
1883 *: Major update - No more reference to workspaces. The main *
1884 structure is a tree of groups or application windows. *
1885 * ************************************************************ *
1887 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
1889 * clfswm.lisp (read-conf-file): Read configuration in
1890 $HOME/.clfswmrc or in /etc/clfswmrc or in
1891 $XDG_CONFIG_HOME/clfswm/clfswmrc.
1892 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
1895 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
1897 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
1900 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
1902 * clfswm-internal.lisp (find-window-group): New function.
1904 * clfswm*: Change to make clfswm run with clisp/new-clx.
1906 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
1908 * clfswm-util.lisp (query-show-paren): Add show parent matching in
1910 (query-string): Bind control+k to delete end of line.
1912 * clfswm-second-mode.lisp (draw-second-mode-window): Display
1913 the action on mouse motion in second mode.
1915 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
1916 event but do not clear the root window.
1917 (handle-configure-request): Adjust unmanaged window from their
1920 * clfswm-internal.lisp (process-new-window): Adjust new window
1921 with the specified hints (max/min/base width/height).
1923 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
1925 * clfswm.lisp (handle-configure-request): Send an Configuration
1926 Notify event. This solve a bug with xterm and rxvt who takes some
1927 times to be mapped. Now there is no delay.
1929 * bindings-second-mode.lisp (define-shell): Run programs after
1930 living the second mode.
1932 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
1934 * clfswm-internal.lisp (process-new-window): Do not crop transient
1935 window to group size.
1936 (adapt-window-to-group): Do not crop transient window to group
1939 * clfswm.lisp (handle-configure-request): Adapt just the window to
1940 its group and don't take care of the configure request. Remove the
1941 bug with the Gimp outside the group and speed up the window
1943 (handle-exposure): Remove show-all-group on exposure event
1946 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
1948 * clfswm-util.lisp (circulate-group-up-copy-window)
1949 (circulate-group-down-copy-window)
1950 (circulate-workspace-up-copy-group)
1951 (circulate-workspace-down-copy-group): Prevent the copy of the
1952 same window in the same workspace.
1954 * bindings-second-mode.lisp (release-copy-selected-window)
1955 (release-copy-selected-group): Prevent the copy of the same window
1956 in the same workspace.
1958 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
1959 (generic-pager-move-window-on-next-line): Remove the copy
1961 (generic-pager-move-group-on-next-workspace)
1962 (generic-pager-move-group-on-previous-workspace): Prevent the copy
1963 of the same window in the same workspace.
1965 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
1966 (mouse-pager-copy-selected-group-release): Prevent the copy of the
1967 same window in the same workspace.
1969 * tools.lisp (setf/=): new macro to set a variable only when
1972 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
1973 x, y... only when necessary.
1975 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
1977 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
1978 new function and hook: force windows to stay in its group (solve a
1981 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
1983 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
1984 less flickering when moving/resizing groups.
1986 * clfswm-internal.lisp (hide-group): new function.
1987 (show-all-group): clear-all: new parameter.
1989 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
1991 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
1993 * clfswm*: Color change for the pager. Typo or better description
1994 in bindings definitions. Define bindings for a qwerty keyboard by
1995 default. dot-clfswmrc show examples to switch to an azerty
1997 License change to GPL v3.
1998 * config.lisp: new file - group all globals variables in this
2001 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
2003 * xlib-util.lisp (hide-window): Remove structure-notivy events
2004 when hidding a window.
2006 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
2008 * package.lisp (*sm-property-notify-hook*): Readded
2009 property-notify-hook in second mode.
2011 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
2013 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
2015 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
2017 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
2018 Tile the current workspace with the current window on one side and
2019 others on the other (this emulate the larswm, dwm, wmii way). See
2020 the default configuration file to enable this mode by default.
2022 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
2025 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
2027 * clfswm-pager.lisp (pager-draw-window-in-group): Add
2028 ensure-printable to print windows name even with non-ascii
2031 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
2033 * clfswm-pager.lisp (pager-explode-current-group): Create a new
2034 group for each window in group.
2035 (pager-implode-current-group): Move all windows in workspace to
2036 one group and remove other groups.
2038 * clfswm-pack.lisp (explode-group): Create a new group for each
2040 (implode-group): Move all windows in workspace to one group and
2041 remove other groups.
2043 * clfswm-util.lisp (identify-key): Remove local configuration
2044 variables and made them available for configuration from
2046 (query-string): idem.
2048 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
2050 * netwm-util.lisp: Start of NetWM compliance.
2051 Add a Netwm client list gestion.
2053 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
2055 * clfswm-internal.lisp (create-group-on-request): open a new group
2056 only when the current group is not empty.
2058 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
2059 bug with null workspace.
2061 * clfswm-pager.lisp (pager-handle-event): Add a hook
2062 system. This hooks can be changed in the user configuration file.
2064 * package.lisp: All colors and font variables are set in
2065 package.lisp and can be configured in the user configuration
2067 Note: If you have configured some less ugly colors (esp. for the
2068 pager) don't hesitate to let me know :)
2070 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
2071 system. This hooks can be changed in the user configuration file.
2073 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
2074 changed in the user configuration file (~/.clfswmrc)
2076 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
2078 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
2079 arrow action, open next window in new workspace/group.
2081 * bindings.lisp (stop-all-pending-actions): new binding.
2082 (open-next-window-in-new-group-once): Open the next windows in a
2083 new group (only once) or open all new windows in a new group (like
2084 others windows managers).
2086 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
2088 * clfswm.lisp (read-conf-file): New function to read a lisp
2089 configuration file at startup.
2090 (focus-group-under-mouse): Check if group isn't the current group
2091 ( prevent a bug with unclutter ).
2093 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
2095 * bindings.lisp (run-program-from-query-string): A program can be
2096 launch from a input query window.
2098 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
2100 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
2102 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
2104 * clfswm.lisp (process-new-window): One can now open the next
2105 window in a workspace called by its number.
2107 * clfswm-util.lisp (query-font-string): Minimal editing
2109 (eval-from-string): And an REPL in the window manager... :)
2111 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2113 * clfswm.lisp (process-new-window): One can now open the next
2114 window in a new workspace or a new group.
2116 * clfswm-pager.lisp (pager-mode): Display the next arrow action
2117 with the hidden windows.
2119 * clfswm.lisp (second-key-mode): Display the current workspace
2120 number and the next arrow action in the state window.
2122 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
2123 the pager mode and then redisplay only the current workspace.
2125 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
2127 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
2128 they can be focused with a keypress, sorted or renumbered.
2130 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2132 * clfswm-pager.lisp (pager-mode): Remove multiple silly
2133 pager-draw-display. This prevent a lot of flickering in the
2136 * clfswm.lisp: Remove all display-force-output and replace them
2137 with only one display-finish-output in the event loop.
2139 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
2141 * clfswm-pager.lisp (pager-center-group): New function - center a
2142 group at the middle of the screen.
2144 * clfswm-pack.lisp (center-group): New function - center a group
2145 at the middle of the screen.
2147 * clfswm.lisp (show-group): Add a cross line under the group.
2148 (show-group): Group are showned even if fullscreened.
2149 (init-display): Add an exposure event on the root window.
2151 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
2153 * package.lisp (*default-group*): Default group is the same size
2154 of a fullscreened group.
2156 * bindings*: Use shift to move, control+shift to copy.
2158 * *.lisp: Add comments for configuration or alternatives. So grep
2159 for CONFIG to see where you can configure clfswm. And grep for
2160 Alternative to use some commented code.
2162 * clfswm.lisp (second-key-mode): Use a single window to show the
2163 second mode. See for alternatives at the end of this file.
2165 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
2167 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
2168 macro of key and mouse definitions.
2169 (define-define-key/mouse): Use state instead of modifiers list
2170 this fix a bug when the modifiers list is not in the rigth order.
2172 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
2174 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
2176 * clfswm-info.lisp (info-mode): Add an info mode.
2178 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
2180 * clfswm.lisp (process-new-window): Change border size for
2182 (show-all-windows-in-workspace): Unhide all windows even when the
2183 current group is in fullscreen mode.
2185 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
2187 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
2188 redisplay the identify window after a terminal switch.
2190 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
2191 redisplay the pager after a terminal switch.
2193 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
2195 * clfswm-util.lisp (identify-key): Add a window to display
2196 the keys to identify on screen.
2198 * bindings.lisp, bindings-pager.lisp: Define same keys to
2199 move/copy groups/windows in second mode and in pager.
2201 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
2203 (show-all-windows-in-workspace): unhide window before adapting it
2206 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
2208 * clfswm.lisp (handle-event): Revert to an older version.
2210 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
2212 * clfswm-util.lisp (force-window-in-group)
2213 (force-window-center-in-group): New functions for transient windows.
2215 * clfswm-pager.lisp (pager-remove-current-workspace/group):
2216 bugfix: hide all windows before removing group or workspace.
2218 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
2220 * bindings-pager.lisp (mouse-pager-move-selected-group)
2221 (mouse-pager-copy-selected-group)
2222 (mouse-pager-move-selected-window)
2223 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
2224 (mouse-pager-rotate-window-down): New functions to have mouse in
2227 * clfswm-pager.lisp (pager-swap-window)
2228 (pager-copy-group-on-next/previous-workspace)
2229 (pager-copy-window-on-next/previous-line): New functions
2231 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
2233 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
2234 (pager-move-group-on-next/previous-workspace): new functions.
2236 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
2237 to its half size (new functions).
2239 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
2241 * clfswm-pager.lisp: workspaces, groups and windows can now be
2242 selectionned with the keyboard or the mouse.
2244 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
2246 * clfswm-pager.lisp (pager-select-workspace-right/left):
2247 workspaces can now be selectionned with the keyboard.
2249 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
2251 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
2252 new function to remove a previous defined key or mouse combination.
2254 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
2256 * clfswm.lisp (main): Check for access error in init-display.
2258 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
2259 keycode before grabbing.
2261 * bindings.lisp: Remove nlambda and use defun to keep the function
2262 documentation with clisp.
2263 (define-shell): new macro to define shell command for the second
2266 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
2268 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
2271 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
2273 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
2274 workspace circulation.
2276 * clfswm-util.lisp (absorb-orphan-window): new function.
2278 * clfswm-keys.lisp: Keysyms support.
2280 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
2282 * clfswm.lisp (show-group): Use one gc for all groups and not one
2285 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
2287 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
2289 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
2290 width and height outside group.
2292 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
2294 * clfswm.lisp: First public release.