1 2011-12-26 Philippe Brochard <pbrochard@common-lisp.net>
3 * src/clfswm-query.lisp: Fill the history list with a non-nil
6 2011-12-25 Philippe Brochard <pbrochard@common-lisp.net>
8 * src/package.lisp (make-x-drawable): Drawable wrapper to prevent
9 type error in some CLX versions.
10 Replace xlib:drawable-* functions with x-drawable-* equivalents
12 2011-12-14 Philippe Brochard <pbrochard@common-lisp.net>
14 * src/clfswm-util.lisp (um-create-xdg-section-list): Add at least
15 the 'Utility menu entry.
17 * src/config.lisp (*xdg-section-list*): moved to config.lisp.
19 * src/clfswm-util.lisp (update-menus): Set a default value for
20 searching .desktop files when XDG_DATA_DIRS is not set.
22 2011-10-15 Philippe Brochard <pbrochard@common-lisp.net>
24 * src/clfswm-internal.lisp (place-window-from-hints): Use
25 with-placement macro to place unmanaged windows in an arbitrary
28 2011-06-16 Philippe Brochard <pbrochard@common-lisp.net>
30 * src/clfswm-internal.lisp (clean-windows-in-all-frames): Prevent
31 current root and current child being equal to child.
33 2011-06-13 Philippe Brochard <pbrochard@common-lisp.net>
35 * src/keysyms.lisp: Repeat Page_Down/Up keysym definitions at the
36 end of the file to change keysyms priority.
38 2011-06-13 Sylvain HENRY <hsyl20@gmail.com>
40 * *.*: Minor spelling fix.
42 2011-06-12 Philippe Brochard <pbrochard@common-lisp.net>
44 * src/clfswm.lisp (:unmap-notify, :destroy-notify): Show all
45 children just after the xlib tree cleanup -> reduce the
46 flickering when a window is deleted or destroyed.
48 * src/clfswm-internal.lisp (process-existing-windows): Do not
49 process the notify window.
51 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
53 * *: **** Release 1106 ****
55 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
57 * src/clfswm-internal.lisp (clean-windows-in-all-frames): New
58 function to prevent xlib error when a window is deleted.
60 2011-06-08 Philippe Brochard <pbrochard@common-lisp.net>
62 * src/clfswm-internal.lisp
63 (delete-child-and-children-in-all-frames): Delete or destroy
64 children before displaying all children.
66 2011-06-05 Philippe Brochard <pbrochard@common-lisp.net>
68 * src/clfswm-util.lisp (add-frame-in-parent-frame): New function
71 2011-06-04 Philippe Brochard <pbrochard@common-lisp.net>
73 * src/clfswm.lisp (main-unprotected): Destroy all frames windows
74 before closing the display (not really needed).
76 2011-06-02 Philippe Brochard <pbrochard@common-lisp.net>
78 * src/clfswm-layout.lisp (inc-tile-layout-size)
79 (dec-tile-layout-size, inc-slow-tile-layout-size)
80 (dec-slow-tile-layout-size): New functions and bindings.
82 2011-06-01 Philippe Brochard <pbrochard@common-lisp.net>
84 * src/clfswm-expose-mode.lisp (define-expose-letter-keys): Add
85 0..1 and A..Z keys to select a child in exposé mode.
87 * src/clfswm-internal.lisp (display-frame-info): Remove hidden
88 infos in frames windows.
90 * src/clfswm-util.lisp (ask-close/kill-current-window): Menu
93 2011-05-30 Philippe Brochard <pbrochard@common-lisp.net>
95 * src/clfswm-internal.lisp (get-parent-layout): Minor fullscreen
98 2011-05-29 Philippe Brochard <pbrochard@common-lisp.net>
100 * src/clfswm-internal.lisp
101 (delete-child-and-children-in-all-frames): Show all children
102 before deleting/destroying a windows, so prevent a flickering.
103 (get-parent-layout): Return the fullscreen size when the current
106 2011-05-28 Philippe Brochard <pbrochard@common-lisp.net>
108 * src/clfswm-internal.lisp (get-parent-layout): Handle correctly
111 * src/clfswm-util.lisp (delete-focus-window-generic): Do not hide
112 child before removing, so prevent a flickering.
114 * src/clfswm-internal.lisp (show-all-children): Rectangular
115 optimization to display only needed children.
116 (show-all-children): Remove flickering on
117 select-next/previous-brother.
119 2011-05-17 Philippe Brochard <pbrochard@common-lisp.net>
121 * src/clfswm-util.lisp (copy-focus-window, cut-focus-window): New
122 functions and ask-close/kill-current-window menu and bindings
125 2011-05-16 Philippe Brochard <pbrochard@common-lisp.net>
127 * src/clfswm-util.lisp (ask-close/kill-current-window): Add an
128 *ask-close/kill-placement* placement window variable.
130 2011-05-09 Philippe Brochard <pbrochard@common-lisp.net>
132 * contrib/osd.lisp (funcall-button-from-code): Display osd
133 documention for buttons and fix some redefining warnings.
135 2011-05-07 Philippe Brochard <pbrochard@common-lisp.net>
137 * src/clfswm-nw-hooks.lisp (make-permanent-nw-hook-frame): New
138 function. Prevent to add or delete a new window hook for this
141 * src/clfswm-layout.lisp (update-layout-managed-children-position):
144 2011-05-06 Philippe Brochard <pbrochard@common-lisp.net>
146 * src/bindings-second-mode.lisp (set-default-second-keys):
147 select-brother-spatial-move-* binding update.
149 * src/clfswm-layout.lisp (tile-left|right|top|bottom-layout): Ask
150 to keep children positions or not.
152 * src/clfswm-internal.lisp (fixe-real-size): Takes care of border
155 * src/clfswm-layout.lisp (update-layout-managed-children): Fix a
156 bug by using the parent frame instead of the current child.
158 * src/clfswm-circulate-mode.lisp
159 (select-brother-generic-spatial-move+right/left/up/down): New
160 function to select a brother from another in a spatial move.
162 2011-04-19 Philippe Brochard <pbrochard@common-lisp.net>
164 * src/clfswm-pack.lisp (move-frame-constrained)
165 (resize-frame-constrained): Use pixels instead of floating
168 2011-04-18 Philippe Brochard <pbrochard@common-lisp.net>
170 * src/clfswm-pack.lisp (resize-frame-constrained): Takes care of
172 (implode-frame, implode-current-frame): New functions. Absorb all
173 frames subchildren in frame. Explode frame opposite.
175 2011-04-17 Philippe Brochard <pbrochard@common-lisp.net>
177 * src/clfswm-pack.lisp (move-frame-constrained)
178 (resize-frame-constrained): New function. Move and resize frame
179 with the mouse constrained by other frame brothers.
181 2011-04-14 Philippe Brochard <pbrochard@common-lisp.net>
183 * src/clfswm-util.lisp (with-movement-select-next-brother)
184 (with-movement-select-previous-brother)
185 (with-movement-select-next-child): Use a simple method (do not
186 enter in the circulate mode) to allow to circulate in all children
189 * src/clfswm-menu.lisp (open-menu): Save info hash table keys
190 instead of deleting newly created keys.
192 2011-03-21 Philippe Brochard <pbrochard@common-lisp.net>
194 * src/clfswm-internal.lisp (x-px->fl, y-px->fl): Takes care of
197 2011-03-20 Philippe Brochard <pbrochard@common-lisp.net>
199 * src/clfswm-info.lisp (show-config-variable): call
200 produce-conf-var-doc.
202 2011-03-18 Philippe Brochard <pbrochard@common-lisp.net>
204 * src/clfswm-autodoc.lisp (produce-conf-var-doc-html): Produce a
205 documentation for all configurable variables in CLFSWM -
208 * src/clfswm-internal.lisp (leave-frame): Hide all children except
211 2011-03-16 Philippe Brochard <pbrochard@common-lisp.net>
213 * src/clfswm-autodoc.lisp (produce-all-docs): Produce a
214 documentation for all configurable variables in CLFSWM.
216 * src/clfswm-layout.lisp (set-gimp-layout): Display a notify
217 window with the help on the GIMP layout.
219 2011-03-12 Philippe Brochard <pbrochard@common-lisp.net>
221 * src/menu-def.lisp: Menu update to prevent cursor keys clash.
223 * clfswm.asd: Change compilation order to prevent undefined
226 * src/clfswm-internal.lisp (show-child(frame)): Handle properly
227 the show-root-frame-p parameter.
229 2011-03-11 Philippe Brochard <pbrochard@common-lisp.net>
231 * src/clfswm-util.lisp (move-frame, resize-frame): Do not move or
232 resize a frame when it's the current root.
234 2011-03-10 Philippe Brochard <pbrochard@common-lisp.net>
236 * src/clfswm-internal.lisp (show-all-children): Handle properly
237 duplicated child in multipe frames.
239 2011-03-09 Philippe Brochard <pbrochard@common-lisp.net>
241 * contrib/volume-mode.lisp (set-default-volume-keys): Add more
242 keybindings (up/down, right/left) to raise/lower the volume.
244 * src/clfswm-layout.lisp: Add a variable border size for frames
247 2011-03-08 Philippe Brochard <pbrochard@common-lisp.net>
249 * src/clfswm-util.lisp (cut-current-child, remove-current-child)
250 (delete-current-child): Hide the current child before doing the
253 * src/clfswm-internal.lisp (show-all-children): Hide windows not
254 in the current root before displaying those in current root.
255 Remove all hide-all unnecessary calls.
257 * src/clfswm-configuration.lisp (save-variables-in-conf-file):
258 Save only variables with a different value than their original
261 2011-03-07 Philippe Brochard <pbrochard@common-lisp.net>
263 * src/clfswm-info.lisp (show-config-variable): Use the new
266 * src/clfswm-autodoc.lisp (produce-configuration-variables): Use
267 the new defconfig method.
269 * src/clfswm-configuration.lisp (create-configuration-menu):
270 Change the config system with a more lispy one and a less string
271 based one: (defconfig name value group doc).
274 2011-03-06 Philippe Brochard <pbrochard@common-lisp.net>
276 * src/clfswm-internal.lisp (show-all-children): Simplify the
278 (show-child): Display an unmanaged window whe it's the current
280 (show-all-children): add the ability to display all child from
281 *root-frame* and hide all those who are not in *current-root*.
282 -> remove hide-all-children when needed.
284 * src/xlib-util.lisp (move-window,resize-window): Add a
285 *color-move-window* border when moving or resizing a window.
287 2011-03-04 Philippe Brochard <pbrochard@common-lisp.net>
289 * src/clfswm-internal.lisp (show-all-children): Perform only one
290 recusion on the clfswm tree: calculate geometry and place child in
293 2011-03-03 Philippe Brochard <pbrochard@common-lisp.net>
295 * src/clfswm-internal.lisp (show-all-children): Rethink of display
296 child order to prevent very annoying flickering.
298 2011-02-27 Philippe Brochard <pbrochard@common-lisp.net>
300 * src/clfswm-util.lisp (query-yes-or-no): New function.
302 * src/clfswm-configuration.lisp (reset-all-config-variables): New
303 function and menu entry.
304 (query-conf-value): Add the ability to leave the field blank to
305 reset the variable to its default value.
307 2011-02-26 Philippe Brochard <pbrochard@common-lisp.net>
309 * src/clfswm-configuration.lisp
310 (add-all-configuration-default-value): Add a default value to
311 configurable variables.
313 2011-02-23 Philippe Brochard <pbrochard@common-lisp.net>
315 * src/clfswm.lisp (main-unprotected): Create the configuration
316 menu only once at startup.
318 2011-02-22 Desmond O. Chang <dochang@gmail.com>
320 * contrib/amixer.lisp: Add a volume mode inspired by the emms
321 volume package. Alsa mixer interface.
323 * contrib/volume-mode.lisp: Add a volume mode inspired by the emms
326 2011-02-22 Desmond O. Chang <dochang@gmail.com>
328 * src/clfswm.lisp (main): Use ASDF:SYSTEM-SOURCE-DIRECTORY instead
329 of *LOAD-TRUENAME*. *LOAD-TRUENAME* is only bound during a call to
330 LOAD. If one eval CLFSWM:MAIN in repl, BASE-DIR will be an empty
331 string. Use ASDF:SYSTEM-SOURCE-DIRECTORY to fix it.
333 2011-02-16 Philippe Brochard <pbrochard@common-lisp.net>
335 * src/clfswm.lisp (main-unprotected): Add a close hook. And close
336 the notify window, the virtual keyboard and the clfswm terminal by
339 2011-02-15 Philippe Brochard <pbrochard@common-lisp.net>
341 * src/clfswm.lisp (main-unprotected): Destroy the notify window
342 before closing the display. This fix a bug when resetting/reloading
345 2011-02-12 Philippe Brochard <pbrochard@common-lisp.net>
347 * src/xlib-util.lisp (equal-wm-class-fun, equal-wm-name-fun)
348 (raise-window-fun, raise-and-focus-window-fun): New functions.
350 * src/config.lisp (*clfswm-terminal-cmd*): Switch from xterm to
352 (*never-managed-window-list*): Structure change to be more
353 flexible. Let the choice to focus, raise and do nothing on never
356 2011-02-09 Philippe Brochard <pbrochard@common-lisp.net>
358 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Take
359 care of never managed windows to move or resize them if the raise
362 * src/clfswm-internal.lisp (in-frame, in-window, in-child): New
365 2011-02-08 Philippe Brochard <pbrochard@common-lisp.net>
367 * src/clfswm.lisp (main-mode): Raise or not unmanaged windows
368 following request in *never-managed-window-list*.
370 2011-02-05 Philippe Brochard <pbrochard@common-lisp.net>
372 * *: **** Release 1102 ****
374 2011-02-05 Desmond O. Chang <dochang@gmail.com>
376 * src/keysyms.lisp: Add extended keysyms from stumpwm.
378 2011-02-01 Desmond O. Chang <dochang@gmail.com>
380 * src/clfswm-util.lisp (run-or-raise): New function (thanks to
383 * src/clfswm-internal.lisp (with-all-*): add a nil block.
385 2011-01-28 Desmond O. Chang <dochang@gmail.com>
387 * src/clfswm-util.lisp (xdg-config-home): XDG_CONFIG_HOME should
388 be $HOME/.config by default.
390 2010-12-29 Philippe Brochard <pbrochard@common-lisp.net>
392 * contrib/osd.lisp (display-doc): Add another method where a
393 CLFSWM native window is used to display the key documentation.
395 2010-12-27 Philippe Brochard <pbrochard@common-lisp.net>
397 * src/xlib-util.lisp (with-xlib-protect): Force to revert to the
400 2010-12-25 Philippe Brochard <pbrochard@common-lisp.net>
402 * src/clfswm-second-mode.lisp (second-key-mode): Call the second
403 mode leave function only when the generic mode was ended.
405 2010-12-08 Philippe Brochard <pbrochard@common-lisp.net>
407 * src/clfswm-second-mode.lisp (sm-leave-function): Do not use
408 *second-mode-program* anymore.
410 2010-12-07 Philippe Brochard <pbrochard@common-lisp.net>
412 * src/clfswm-second-mode.lisp (*second-mode-leave-function*): New
413 variable bound to a function executed (when not null) on second
416 2010-11-14 Philippe Brochard <pbrochard@common-lisp.net>
418 * src/clfswm-util.lisp (find-child-under-mouse): Do not find
421 2010-11-13 Philippe Brochard <pbrochard@common-lisp.net>
423 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
424 Do not display the accel window for unmanaged windows.
426 2010-11-11 Philippe Brochard <pbrochard@common-lisp.net>
428 * src/clfswm-internal.lisp (set-current-root): Handle
429 window-parent in set-current-root.
431 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
432 focus the parent child when the current root is a window.
434 2010-11-09 Philippe Brochard <pbrochard@common-lisp.net>
436 * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
437 New function an bindings.
439 * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
442 2010-11-07 Philippe Brochard <pbrochard@common-lisp.net>
444 * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
445 function to let the user choose to keep child position with
448 * src/clfswm-internal.lisp (remove-frame-data-slot): New
451 2010-11-05 Philippe Brochard <pbrochard@common-lisp.net>
453 * src/clfswm-internal.lisp (frame-select-next-child)
454 (frame-select-previous-child): New functions and bindings. Select
455 the next/previous child in the current frame.
457 2010-10-31 Philippe Brochard <pbrochard@common-lisp.net>
459 * src/clfswm-query.lisp (query-mode-complet): New function: Handle
460 completion in query-mode.
462 2010-10-30 Philippe Brochard <pbrochard@common-lisp.net>
464 * src/clfswm-query.lisp (query-print-string): Handle long lines
467 2010-10-27 Philippe Brochard <pbrochard@common-lisp.net>
469 * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
470 all characters are printable.
472 2010-10-25 Philippe Brochard <pbrochard@common-lisp.net>
474 * contrib/server/server.lisp: Load clfswm client code in the main
475 program and let the user start it with a --client command line
478 * src/package.lisp (*main-entrance-hook*): New hook executed after
479 loading configuration file and before opening the display.
481 2010-10-23 Philippe Brochard <pbrochard@common-lisp.net>
483 * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
485 * src/clfswm-internal.lisp (show-child): Show window only if not
488 * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
489 change modifiers after binding definition.
491 2010-10-21 Philippe Brochard <pbrochard@common-lisp.net>
493 * contrib/osd.lisp: New file: OSD (On Screen Display) for
496 * src/clfswm-menu.lisp (open-menu): Modularise function.
498 2010-10-13 Philippe Brochard <pbrochard@common-lisp.net>
500 * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
501 key binding in main and second mode.
503 2010-10-10 Philippe Brochard <pbrochard@common-lisp.net>
505 * src/clfswm-util.lisp (open-notify-window): Convert hello-window
506 functions to a more generic Notify-window system.
508 * src/tools.lisp (add-timer): Add an id to identify the timer.
510 2010-10-09 Philippe Brochard <pbrochard@common-lisp.net>
512 * src/tools.lisp (erase-timer): New function.
514 * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
515 the hello window. Add Configuration variables.
517 2010-10-08 Philippe Brochard <pbrochard@common-lisp.net>
519 * src/clfswm-util.lisp (): Add an Hello window at startup.
521 * src/tools.lisp (process-timers): Add a timer system.
523 2010-10-07 Philippe Brochard <pbrochard@common-lisp.net>
525 * src/clfswm-query.lisp (add-in-query-string): Handle correctly
528 2010-10-06 Philippe Brochard <pbrochard@common-lisp.net>
530 * src/clfswm-query.lisp (query-print-string): Change cursor color
531 and show parenthesis matching with colors (on match and on
534 2010-10-05 Philippe Brochard <pbrochard@common-lisp.net>
536 * src/clfswm-internal.lisp (show-all-children): Do not raise a
537 child when its parent is hidden.
539 2010-10-02 Philippe Brochard <pbrochard@common-lisp.net>
541 * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
542 possibility to circulate over subchild of the current child.
544 * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
545 (expose-windows-generic): Add an escape-body function to return to
546 the original state on escape key.
548 * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
549 to bind the current child from the configuration file.
551 2010-10-01 Philippe Brochard <pbrochard@common-lisp.net>
553 * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
554 window hook: the frame absorb all new windows that match
555 nw-absorb-test frame data slot.
557 2010-09-30 Philippe Brochard <pbrochard@common-lisp.net>
559 * src/clfswm-expose-mode.lisp (expose-create-window): Show window
560 title in accel window.
562 2010-09-29 Philippe Brochard <pbrochard@common-lisp.net>
564 * configure: Use the Xavier Maillard clfswm script in contrib to
565 build an executable in the standard way.
567 2010-09-26 Philippe Brochard <pbrochard@common-lisp.net>
569 * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
570 New functions. Add a window on each child in the expose mode to
573 * src/clfswm-internal.lisp (child-x, child-y, child-width)
574 (child-height): New methods to get real child coordinates.
576 2010-09-25 Philippe Brochard <pbrochard@common-lisp.net>
578 * src/clfswm-layout.lisp (*-layout): Use child-position.
580 * src/clfswm-internal.lisp (child-position): New function.
582 * src/clfswm-expose-mode.lisp (expose-windows-mode)
583 (expose-all-windows-mode): Use a generic mode.
585 * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
586 with handle-event-fun symbols instead of inspecting clfswm
587 internals symbols on each mode change.
589 * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
590 a separate clfswm-expose-mode.lisp file.
592 * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
593 screen size instead of hardcoded test coordinates.
595 2010-09-24 Philippe Brochard <pbrochard@common-lisp.net>
597 * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
598 (speed-mouse-right, speed-mouse-up, speed-mouse-down)
599 (speed-mouse-undo, speed-mouse-first-history): New functions to
600 quickly move the mouse. Implemented for the second mode.
602 2010-09-16 Philippe Brochard <pbrochard@common-lisp.net>
604 * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
605 write permission on $clfswm_asd_path. So anybody can start clfswm
606 even if there is no write permission on the source directory.
608 2010-09-12 Philippe Brochard <pbrochard@common-lisp.net>
610 * contrib/clfswm: Add support to cmucl, ccl and ecl.
612 2010-09-11 Philippe Brochard <pbrochard@common-lisp.net>
614 * src/clfswm-util.lisp (set-hide-unmanaged-window)
615 (set-show-unmanaged-window, set-default-hide-unmanaged-window):
616 New functions and menu entry.
617 (set-globally-hide-unmanaged-window)
618 (set-globally-show-unmanaged-window): New functions and menu
621 * src/clfswm-internal.lisp (hide-unmanager-window-p): New
623 (show-child): Add a data slot on frame to hide or not unmanaged
626 * src/clfswm-corner.lisp (present-clfswm-terminal)
627 (present-virtual-keyboard): Use a function (generic-present-body)
628 instead of a macro (generate-present-body).
630 * src/clfswm-util.lisp (update-menus): List all directories and
631 subdirectories in $XDG_DATA_DIRS/applications.
633 2010-09-10 Philippe Brochard <pbrochard@common-lisp.net>
635 * src/clfswm-corner.lisp (generate-present-body): New macro.
636 (present-clfswm-terminal, present-virtual-keyboard): Use
637 generate-present-body.
639 2010-09-09 Philippe Brochard <pbrochard@common-lisp.net>
641 * src/clfswm-util.lisp (update-menus): Follow XDG specifications
642 instead of the non-portable Debian update-menu.
644 2010-09-07 Philippe Brochard <pbrochard@common-lisp.net>
646 * src/clfswm.lisp (error-handler): New function do handle
647 asynchronous errors and ignore them.
648 (open-display): Install the new error-handler on display.
650 2010-09-05 Philippe Brochard <pbrochard@common-lisp.net>
652 * src/xlib-util.lisp (with-xlib-protect): Add a
653 with-simple-restart on top of body execution.
655 2010-09-04 Philippe Brochard <pbrochard@common-lisp.net>
657 * src/clfswm.lisp (main-loop): Protect all xlib functions with an
660 * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
661 handle-event. Add a with-simple-restart to prevent a
662 clisp/new-lisp infinite loop.
664 2010-08-30 Philippe Brochard <pbrochard@common-lisp.net>
666 * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
667 clfswm terminal working even on xterm title changes.
669 2010-08-29 Philippe Brochard <pbrochard@common-lisp.net>
671 * src/clfswm-util.lisp (run-other-window-manager): Update for
674 * src/tools.lisp (do-execute): New parameter io to change the
677 * src/clfswm-util.lisp (hide-current-child): Prevent from removing
680 * src/clfswm-internal.lisp (child-member): New predicate.
681 (child-remove): New function.
683 * src/*.lisp: Use child-member and child-remove everywhere it's
686 2010-08-28 Philippe Brochard <pbrochard@common-lisp.net>
688 * src/clfswm.lisp (main-loop): Ensure that all events have been
689 processed after a process-event.
691 * src/clfswm-internal.lisp (is-in-current-child-p): New function.
693 2010-08-27 Philippe Brochard <pbrochard@common-lisp.net>
695 * src/clfswm.lisp (main-mode:configure-request): Raise the window
696 only when present on the current child and focus it accordingly.
698 2010-08-26 Philippe Brochard <pbrochard@common-lisp.net>
700 * src/clfswm-circulate-mode.lisp (circulate-loop-function):
701 Use is-a-key-pressed-p.
703 * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
705 * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
706 returned by xlib:keysym->keycodes.
708 * src/*.lisp: Use the new child-equal-p to compare children. This
709 prevent a bug with sbcl/cmucl when the standard equal function
710 does not work with xlib:window.
712 * src/clfswm-internal.lisp (child-equal-p): New predicate.
714 2010-08-25 Philippe Brochard <pbrochard@common-lisp.net>
716 * src/clfswm-generic-mode.lisp (generic-mode): Use an
717 xlib:event-listen before processing event with
718 xlib:process-event. This prevent a bug with CLX threaded
719 implementation like sbcl.
721 * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
722 processing event with xlib:process-event. This prevent a bug with
723 CLX threaded implementation like sbcl.
725 2010-08-17 Philippe Brochard <pbrochard@common-lisp.net>
727 * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
729 * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
732 * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
733 (find-parent-frame, find-frame-window, find-frame-by-name)
734 (find-frame-by-number): Use with-find-in-all-frames to search in
735 frames in the right order.
737 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
738 unwanted flickering with unmanaged windows.
740 2010-08-16 Philippe Brochard <pbrochard@common-lisp.net>
742 * src/package.lisp: Remove event handler hooks as they're not
743 needed anymore (To replace them: use closure and define-handler).
745 * src/xlib-util.lisp (move-window, resize-window)
746 (wait-mouse-button-release): Use a generic mode.
748 * src/*.lisp: Replace the case to handle event with a more (tricky)
749 lispy method which bind a function to each keywords associated
752 2010-07-23 Philippe Brochard <pbrochard@common-lisp.net>
754 * src/clfswm-util.lisp (delete-current-child): Invert bindings and
755 menu entry between delete-current-child and remove-current-child.
756 ie: Delete a child and its children in all frames by default.
758 2010-07-21 Philippe Brochard <pbrochard@common-lisp.net>
760 * src/package.lisp: Add a placement configuration group.
762 * src/binding*.lisp: Bind control+g to escape the current action
765 * src/clfswm-internal.lisp
766 (delete-child-and-children-in-all-frames): New function and
767 binding: Second mode - Control+Delete delete the current child and
768 its children in all frames (ie: close the current child and its
771 2010-07-20 Philippe Brochard <pbrochard@common-lisp.net>
773 * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
774 the frame window and the frame gc. Close a very annoying bug when
775 cuting/pasting a frame or moving a child over frames with the
778 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
779 all children in *current-root* after moving/resizing a frame.
781 2010-07-18 Philippe Brochard <pbrochard@common-lisp.net>
783 * src/clfswm-util.lisp (delete-focus-window)
784 (destroy-focus-window): Remove child in parent frame before
787 2010-07-16 Philippe Brochard <pbrochard@common-lisp.net>
789 * src/clfswm-util.lisp (identify-key): Add a timeout in
791 (mouse-click-to-focus-generic): Use find-child-under-mouse instead
792 of the window passed by xlib:process-event.
794 * src/xlib-util.lisp (move-window, resize-window)
795 (wait-mouse-button-release): Add a timeout in xlib:process-event.
797 2010-04-11 Philippe Brochard <pbrochard@common-lisp.net>
799 * src/clfswm-util.lisp (run-other-window-manager): Add the ability
800 to launch an other window manager and to return to clfswm.
802 2010-03-18 Philippe Brochard <pbrochard@common-lisp.net>
804 * src/clfswm-layout.lisp (set-tile-space-layout): Set default
807 2009-12-15 Philippe Brochard <pbrochard@common-lisp.net>
809 * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
812 * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
813 parameter and a loop timeout.
815 2009-12-05 Philippe Brochard <pbrochard@common-lisp.net>
817 * src/clfswm.lisp (main): Add an alternate configuration filename
820 * load.lisp: Add a debuging code example.
822 2009-11-14 Philippe Brochard <pbrochard@common-lisp.net>
824 * src/clfswm-configuration.lisp (create-configuration-menu): New
825 menu to configure all clfswm variables while clfswm is running.
827 2009-11-12 Philippe Brochard <pbrochard@common-lisp.net>
829 * src/clfswm-util.lisp (save-configuration-variables): New
830 function to save all configuration variables in clfswmrc.
832 2009-11-11 Philippe Brochard <pbrochard@common-lisp.net>
834 * src/clfswm-info.lisp (info-mode): Begining of mouse support in
836 (set-default-info-keys): Add cursor key support in info mode.
838 2009-11-08 Philippe Brochard <pbrochard@common-lisp.net>
840 * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
843 * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
844 prevent reading the configuration file (this may be useful to
845 produce the original documentation without user modifications
846 with the rc configuration file).
848 2009-11-07 Philippe Brochard <pbrochard@common-lisp.net>
850 * src/bindings-second-mode.lisp (set-default-second-keys):
851 Simplification of Escape key to close/kill/remove the focus window
852 and unhide all windows.
854 * src/bindings.lisp (set-default-main-keys): Simplification of
855 Escape key to close/kill/remove the focus window and unhide all
858 * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
859 focus and unhide all windows capabilities.
861 2009-10-10 Philippe Brochard <pbrochard@common-lisp.net>
863 * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
865 2009-07-29 Philippe Brochard <pbrochard@common-lisp.net>
867 * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
868 Keep child order and don't make unnecessary child movement.
869 (one-column-layout, one-line-layout): New layouts.
871 2009-06-29 Philippe Brochard <pbrochard@common-lisp.net>
873 * *: **** Release 0906 ****
875 * contrib/cd-player.lisp: New file to handle the CD player.
877 * contrib/xmms.lisp: New file to handle the xmms player.
879 2009-06-28 Philippe Brochard <pbrochard@common-lisp.net>
881 * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
882 Maximize windows in their frame - Leave frames to their actual
885 * src/bindings-second-mode.lisp (set-default-second-keys): Bind
886 "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
888 2009-06-27 Philippe Brochard <pbrochard@common-lisp.net>
890 * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
892 2009-06-24 Philippe Brochard <pbrochard@common-lisp.net>
894 * contrib/mpd.lisp: Use a standard menu.
896 * src/clfswm-info.lisp: Use a standard menu for the help-menu.
898 2009-06-22 Philippe Brochard <pbrochard@common-lisp.net>
900 * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
902 2009-06-19 Philippe Brochard <pbrochard@common-lisp.net>
904 * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
907 2009-06-18 Philippe Brochard <pbrochard@common-lisp.net>
909 * src/config.lisp (get-fullscreen-size): One pixel adjustment
912 * src/clfswm-placement.lisp (*-child-placement): One pixel
915 2009-06-16 Philippe Brochard <pbrochard@common-lisp.net>
917 * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
918 Ensure that all characters are printable.
920 * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
923 * src/clfswm-placement.lisp (*-child-placement): Adjust
924 coordinates to one pixel in the current child.
926 2009-06-04 Philippe Brochard <pbrochard@common-lisp.net>
928 * src/clfswm-query.lisp (query-enter-function): Assign font before
929 width and height calculation.
931 2009-06-03 Philippe Brochard <pbrochard@common-lisp.net>
933 * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
934 bannish the pointer in an arbitrary place.
936 * src/clfswm-info.lisp (info-mode): Use with-placement macro to
937 place the info window in an arbitrary place.
939 * src/clfswm-query.lisp (query-enter-function): Use with-placement
940 macro to place the query window in an arbitrary place.
942 * src/clfswm-placement.lisp: New file. Allow to place info windows
943 or query windows on an arbitrary place. Allow to bannish the
944 pointer on an arbitrary place.
946 2009-05-16 Philippe Brochard <pbrochard@common-lisp.net>
948 * src/clfswm-circulate-mode.lisp (reorder-child)
949 (reorder-brother): Unfocus windows before reordering children or
952 2009-05-13 Philippe Brochard <pbrochard@common-lisp.net>
954 * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
955 the parent is a frame.
957 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
958 motion with a default modifier.
960 * src/clfswm.lisp (handle-motion-notify): Handle motion with a
963 * src/clfswm-info.lisp (info-mode): Handle motion with a default
965 (info-mode): Optimization in loop function.
967 2009-05-10 Philippe Brochard <pbrochard@common-lisp.net>
969 * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
970 root-frame correctly.
972 * clfswm.asd: Dependency fix for clfswm-generic-mode.
974 * src/clfswm-circulate-mode.lisp (reorder-child)
975 (reorder-brother): Handle empty frames.
976 (reorder-brother): Redisplay only the parent frame of the current
979 * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
980 parent frame of the current frame.
982 2009-05-09 Philippe Brochard <pbrochard@common-lisp.net>
984 * src/clfswm-util.lisp (frame-toggle-maximize): New function:
985 Maximize/Unmaximize the current frame in its parent frame.
987 * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
988 windows and frames in their parent frame.
990 2009-05-05 Philippe Brochard <pbrochard@common-lisp.net>
992 * src/*.lisp: Add support for Clozure Common Lisp (CCL).
994 * src/clfswm-circulate-mode.lisp (reorder-child)
995 (reorder-brother): Reinitialise on circulate type change
996 child to brother or brother to child.
998 * src/*.lisp (*): Use map-window instead of xlib:map-window. So
999 calls xlib:display-finish-output on each map-request. So speed up
1002 * src/xlib-util.lisp (map-window): New function. Call
1003 xlib:display-finish-output on each map request.
1005 2009-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1007 * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
1008 Optimisation when drawing second mode window.
1010 2009-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1012 * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
1015 2009-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1017 * src/clfswm-util.lisp (run-program-from-query-string): Launch
1018 command only with a return validation.
1020 2009-04-22 Xavier Maillard <xma@gnu.org>
1022 * src/clfswm-query.lisp (query-string): Use a generic mode.
1024 2009-04-19 Xavier Maillard <xma@gnu.org>
1026 * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
1028 2009-04-18 Xavier Maillard <xma@gnu.org>
1030 * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
1031 to define all other modes.
1033 2009-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1035 * src/package.lisp (): Use *default-font-string* for all
1038 * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
1040 2009-02-17 Philippe Brochard <pbrochard@common-lisp.net>
1042 * src/xlib-util.lisp (null-size-window-p): Better check of null
1045 2009-02-14 Philippe Brochard <pbrochard@common-lisp.net>
1047 * src/clfswm.lisp (handle-map-request): Add a fix to manage
1048 correctly fullscreen windows (SDL particularly).
1050 2008-12-20 Philippe Brochard <pbrochard@common-lisp.net>
1052 * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
1053 a segfault with clisp/new-clx.
1055 * src/clfswm.lisp (handle-motion-notify): Add a needed window
1058 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
1059 needed window argument.
1061 2008-10-30 Philippe Brochard <pbrochard@common-lisp.net>
1063 * src/xlib-util.lisp (wait-no-key-or-button-press)
1064 (wait-a-key-or-button-press): Check buttons press/release correctly"
1066 2008-10-28 Philippe Brochard <pbrochard@common-lisp.net>
1068 * src/menu-def.lisp: Add children navigation menu in the movement
1069 menu (select next/previous child/brother/level).
1071 2008-10-26 Philippe Brochard <pbrochard@common-lisp.net>
1073 * *: Rename 'sister' frame to 'brother' frame.
1075 * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
1076 alias in a real modifier.
1078 * src/package.lisp (*modifier-alias*): New list of modifier alias
1079 For example: :alt is :mod-1, :numlock is :mod-2...
1081 * src/tools.lisp (remove-hook): New function.
1083 * src/clfswm-keys.lisp (with-capslock, without-capslock)
1084 (with-numlock, without-cnumlock): New functions.
1086 2008-10-25 Philippe Brochard <pbrochard@common-lisp.net>
1088 * src/clfswm-info.lisp: Use the *binding-hook* to create info
1089 keys and mouse bindings.
1091 * src/bindings-second-mode.lisp: Use the *binding-hook* to create
1092 second keys and mouse bindings.
1094 * src/bindings.lisp: Use the *binding-hook* to create main keys
1097 2008-10-10 Philippe Brochard <pbrochard@common-lisp.net>
1099 * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
1102 2008-10-09 Philippe Brochard <pbrochard@common-lisp.net>
1104 * src/menu-def.lisp: Use a menu instead of a function for the
1107 2008-10-08 Philippe Brochard <pbrochard@common-lisp.net>
1109 * src/clfswm-util.lisp (show-standard-menu): Display the standard
1110 menu from the 'update-menus' command.
1112 2008-10-07 Philippe Brochard <pbrochard@common-lisp.net>
1114 * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
1115 it's already grabbed.
1117 * src/clfswm-internal.lisp (display-frame-info): Use configurable
1118 colors and fix a bug with background.
1119 (display-frame-info): Set window background when displaying info.
1121 2008-10-06 Philippe Brochard <pbrochard@common-lisp.net>
1123 * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
1124 warning with clisp/new-clx.
1126 2008-10-04 Philippe Brochard <pbrochard@common-lisp.net>
1128 * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
1131 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1133 * *: **** Release 0809 ****
1135 2008-09-23 Philippe Brochard <pbrochard@common-lisp.net>
1137 * src/clfswm-util.lisp (ensure-unique-name): New function and menu
1139 (ensure-unique-number): New function and menu entry.
1141 2008-09-22 Philippe Brochard <pbrochard@common-lisp.net>
1143 * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
1144 hook: open the next window in a named frame.
1145 (numbered-frame-nw-hook): New new window hook: open the next
1146 window in a numbered frame.
1148 * src/clfswm-query.lisp (query-string): Grab the keyboard in all
1149 cases. So query-string can be called even in the main mode.
1151 * src/clfswm-internal.lisp (show-all-children): Do not raise a
1152 child by default => far less flickering.
1154 2008-09-19 Philippe Brochard <pbrochard@common-lisp.net>
1156 * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
1158 * src/menu-def.lisp: Change key binding for the CLFSWM menu
1161 * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
1162 is nil. (workaround on some CLX implementation).
1164 2008-09-12 Philippe Brochard <pbrochard@common-lisp.net>
1166 * src/menu-def.lisp: Add a menu to set a focus policy for all
1169 * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
1170 (all-frames-set-*-focus-policy): Set a focus policy for all
1173 * src/clfswm.lisp (handle-enter-notify): sloppy-select
1174 mode. Select a child and its parents on mouse over.
1176 2008-09-03 Philippe Brochard <pbrochard@common-lisp.net>
1178 * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
1179 policy -> Sloppy focus only for windows in the current frame.
1180 (main-unprotected): Exit clfswm on init error (ie: when another
1181 window manager is running).
1183 * src/clfswm-util.lisp (reset-clfswm): New function.
1185 2008-09-02 Philippe Brochard <pbrochard@common-lisp.net>
1187 * src/clfswm-menu.lisp (init-menu): New function.
1189 * src/clfswm-util.lisp (reload-clfswm): New function to reload
1191 (exit-clfswm): Rename quit-clfswm to exit-clfswm.
1193 * src/clfswm.lisp (main, main-unprotected): Handle error in a
1194 superior main function. Now CLFSWM can't break the X session. It
1195 just reinitialize the display and run a new main loop.
1197 * src/clfswm-corner.lisp: Make *clfswm-terminal* and
1198 *vt-keyboard-on* global to avoid warnings when loading clfswm.
1200 * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
1201 (help-on-gimp-layout): Describe how to use the GIMP layout.
1203 2008-09-01 Philippe Brochard <pbrochard@common-lisp.net>
1205 * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
1206 main-window-right-layout. Change the keybinding for (shift)alt+tab
1207 to not select windows in the main window lisst.
1208 Bind F8 to add a window in the main window list.
1209 Bind F9 to remove a window in the main window list.
1210 Change the focus policy to :sloppy.
1211 (set-previous-layout): Restore the previous layout, keybinding and
1214 2008-08-31 Philippe Brochard <pbrochard@common-lisp.net>
1216 * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
1218 * src/clfswm-layout.lisp (main-window-left-layout)
1219 (main-window-bottom-layout, main-window-top-layout): New
1221 Factorize layouts in menu.
1223 2008-08-30 Philippe Brochard <pbrochard@common-lisp.net>
1225 * src/clfswm-layout.lisp (main-window-right-layout): A possible
1226 GIMP layout: one or more main windows on one side of the
1227 frame. Others on the other size.
1229 * src/clfswm-util.lisp
1230 (current-frame-set-click/sloppy-focus-policy): Each frame can have
1231 a different focus policy (one of :click or :sloppy).
1232 The default focus policy is set with *default-focus-policy*.
1234 2008-08-23 Philippe Brochard <pbrochard@common-lisp.net>
1236 * src/clfswm-info.lisp (show-config-variable): New function.
1238 2008-08-19 Philippe Brochard <pbrochard@common-lisp.net>
1240 * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
1242 * src/clfswm-info.lisp: Colored help for key binding and corners
1245 2008-08-18 Philippe Brochard <pbrochard@common-lisp.net>
1247 * src/clfswm-util.lisp (delete-focus-window)
1248 (destroy-focus-window): Remove chid only in
1249 handle-unmap/destroy-notify. Focus *current-root* only when
1250 closing/killing the current child.
1252 * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
1253 functions or corners.
1255 2008-08-17 Philippe Brochard <pbrochard@common-lisp.net>
1257 * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
1258 action: Hide/Unhide a terminal on mouse corner action. (By default
1259 right mouse button on the top left corner).
1261 * src/config.lisp (*never-managed-window-list*): New config
1264 * src/clfswm-internal.lisp (never-managed-window-p): New function:
1265 Handle never managed window in a more simple way.
1267 * src/clfswm-corner.lisp: New file and new and more simple method
1268 to define corners actions.
1270 2008-08-15 Philippe Brochard <pbrochard@common-lisp.net>
1272 * src/clfswm-info.lisp (info-mode): Info line can now be colored.
1274 * src/clfswm-layout.lisp (fast-layout-switch)
1275 (define-fast-layout-switch): New functions: Switch between two
1278 * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
1279 really in the second mode. So leave-second-mode can be used even
1282 * src/clfswm-util.lisp (switch-to-last-child): New function:
1283 Store the current child and switch to the previous one.
1285 2008-07-16 Philippe Brochard <pbrochard@common-lisp.net>
1287 * src/clfswm-util.lisp (display-current-window-info): Display the
1289 (have-to-present-virtual-keyboard): Add a virtual keyboard corner
1290 (top right by default). By default 'xvkbd' is used.
1292 2008-06-28 Philippe Brochard <pbrochard@common-lisp.net>
1294 * src/xlib-util.lisp (move-window, resize-window): Compress motion
1297 * src/clfswm.lisp (handle-motion-notify): Compress motion events.
1299 * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
1302 * src/clfswm-info.lisp (info-mode): Compress motion events.
1304 2008-06-21 Philippe Brochard <pbrochard@common-lisp.net>
1306 * src/clfswm-internal.lisp (show-all-children): Compute geometry
1307 and selection first and then show only necessary children.
1308 (show-child): remove unneeded display-p parameter.
1310 * src/config.lisp (get-fullscreen-size): Place the frame border
1311 outside the screen (this prevent the loose of 2 pixels per
1314 2008-06-12 Philippe Brochard <pbrochard@common-lisp.net>
1316 * src/clfswm-internal.lisp (focus-child): Algorithm change to
1317 raise only the selected child.
1319 2008-06-08 Philippe Brochard <pbrochard@common-lisp.net>
1321 * src/clfswm-internal.lisp (raise-p-list, show-all-children):
1322 Raise only viewable children.
1324 2008-06-06 Philippe Brochard <pbrochard@common-lisp.net>
1326 * src/clfswm-internal.lisp (show-all-children): Always raise all
1327 displayed children. Remove all references to raise-p.
1329 2008-06-04 Philippe Brochard <pbrochard@common-lisp.net>
1331 * src/menu-def.lisp (child-menu): New menu entry on raise/lower
1334 * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
1335 second mode binding on raise/lower child in its frame.
1337 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
1338 behaviour to the new raise/lower property.
1339 Call clear-nw-hook before the rest of the hook.
1341 * src/bindings.lisp (mouse-click-to-focus-and-move-window)
1342 (mouse-click-to-focus-and-resize-window): Stop button event. This
1343 prevent a keyboard/pointer freeze.
1345 2008-06-03 Philippe Brochard <pbrochard@common-lisp.net>
1347 * src/clfswm-internal.lisp (frame-lower-child)
1348 (frame-raise-child): New functions to raise/lower a child in its
1351 * src/clfswm-util.lisp (have-to-present-windows)
1352 (have-to-present-all-windows): New functions to have an MaxOS
1353 expose like on mouse click in screen corner.
1355 * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
1357 2008-05-30 Philippe Brochard <pbrochard@common-lisp.net>
1359 * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
1360 child from a choice in all frames with hidden children.
1362 * src/clfswm-info.lisp (info-mode-menu): Handle separators.
1364 2008-05-28 Philippe Brochard <pbrochard@common-lisp.net>
1366 * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
1367 (unhide-all-children): New functions.
1369 * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
1372 * src/clfswm-util.lisp (hide/show-frame-window): new function and
1375 2008-05-23 Philippe Brochard <pbrochard@common-lisp.net>
1377 * src/clfswm-util.lisp (rename-current-child): Do not display the
1378 frame info for a window.
1380 2008-05-20 Philippe Brochard <pbrochard@common-lisp.net>
1382 * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
1383 frame window for the removed child and its children.
1385 2008-05-18 Philippe Brochard <pbrochard@common-lisp.net>
1387 * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
1390 2008-05-17 Philippe Brochard <pbrochard@common-lisp.net>
1392 * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
1393 the ROX pinboard (ie: leave it lowered in the root window as
1396 * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
1397 (tile-left-layout, tile-right-layout, tile-top-layout)
1398 (tile-bottom-layout): Use all the frame space when there is only
1401 * src/clfswm-internal.lisp (place-window-from-hints): Center
1402 unmanaged windows in the root screen.
1404 * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
1407 2008-05-15 Philippe Brochard <pbrochard@common-lisp.net>
1409 * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
1410 typo in managed types.
1412 * src/clfswm-internal.lisp (show-child): Always display frame info
1413 even if the frame is hidden.
1415 * src/xlib-util.lisp (resize-window): Use a better algorithme to
1418 2008-05-13 Philippe Brochard <pbrochard@common-lisp.net>
1420 * src/clfswm-util.lisp (with-movement): Display frame info for all
1421 frames in current root.
1423 2008-05-12 Philippe Brochard <pbrochard@common-lisp.net>
1425 * src/*.lisp: Rename 'brother' frames to 'sister' frames.
1427 * src/bindings-second-mode.lisp (define-second-key #\a): New
1428 binding on 'add-default-frame'.
1430 * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1431 message to follow the autodocumentation process.
1433 2008-05-10 Philippe Brochard <pbrochard@common-lisp.net>
1435 * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1436 "Space" to jump to a child. "B" to bind a slot on the current
1439 * src/bindings-second-mode.lisp: Use "Tab" instead of
1442 2008-05-07 Philippe Brochard <pbrochard@common-lisp.net>
1444 * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1445 unmanaged (hidden) windows.
1447 * src/clfswm-internal.lisp (place-window-from-hints): Give a
1448 minimal size for windows.
1449 (with-all-windows-frames-and-parent): New function.
1451 * src/config.lisp (*default-window-width/height*): New parameters.
1453 * src/clfswm-internal.lisp (place-window-from-hints): Center
1454 windows in the screen instead of in their frame.
1456 * src/bindings-second-mode.lisp (tile-space-current-frame): New
1459 * src/clfswm-layout.lisp (register-layout): Intern the once name
1460 in the right package.
1462 2008-05-05 Philippe Brochard <pbrochard@common-lisp.net>
1464 * doc/dot-clfswmrc: Update to follow the new clfswm way.
1466 2008-05-03 Philippe Brochard <pbrochard@common-lisp.net>
1468 * src/clfswm-internal.lisp (set-current-child)
1469 (adapt-child-to-parent, show-child, hide-child): Handle the case
1470 where child is not a frame or a window.
1472 * src/clfswm-util.lisp
1473 (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1474 Check if child is a frame.
1476 * src/clfswm-internal.lisp (managed-window-p): Handle the case
1477 where frame is null.
1478 (place-frame): Check if frame and parent are frames.
1480 * src/clfswm-info.lisp (info-mode): display all frame info before
1483 * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1484 info before leaving.
1486 * src/clfswm-internal.lisp (display-all-frame-info): New function.
1488 2008-05-02 Philippe Brochard <pbrochard@common-lisp.net>
1490 * src/tools.lisp (getenv): Implemented for ECL.
1491 (urun-prog): Implemented for ECL.
1493 * src/clfswm-util.lisp (identify-key): Use a double buffer to
1496 * src/clfswm-query.lisp (query-string): Use a double buffer to
1499 * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1502 * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1505 2008-05-01 Philippe Brochard <pbrochard@common-lisp.net>
1507 * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1509 * src/menu-def.lisp: New file: move all menu definition in
1512 * src/clfswm-layout.lisp (register-layout): Use a function instead
1515 2008-04-30 Philippe Brochard <pbrochard@common-lisp.net>
1517 * src/clfswm-autodoc.lisp (produce-menu-doc,
1518 (produce-menu-doc-html): New functions.
1519 (produce-doc-*): Moved to clfswm-autodoc.lisp.
1521 * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1522 paste a child on one of its own children. (this prevent a
1524 (move-child-to): Rename move/copy-current-child-by to
1526 (mouse-move-window-over-frame): New function to move the window
1527 under the mouse cursor to another frame.
1529 * src/clfswm-internal.lisp (find-child-in-parent): New function.
1531 2008-04-29 Philippe Brochard <pbrochard@common-lisp.net>
1533 * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1534 windows only when its window parent is the current child.
1536 2008-04-28 Philippe Brochard <pbrochard@common-lisp.net>
1538 * src/clfswm-util.lisp (manage-current-window)
1539 (unmanage-current-window): New functions: Allow to force to manage
1540 or unmanage a window by its parent frame.
1542 * src/bindings-second-mode.lisp (#\o): binded to
1543 set-open-in-new-frame-in-parent-frame-nw-hook and
1544 (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1546 * src/clfswm-util.lisp (with-current-window): New macro.
1548 * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1549 exposure and enter-window handle event.
1551 * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1552 children for the current child after the move/resize.
1554 2008-04-27 Philippe Brochard <pbrochard@common-lisp.net>
1556 * src/xlib-util.lisp (resize-window): Take care of window size
1559 * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1560 move/resize unmanaged windows.
1562 * src/xlib-util.lisp (move-window, resize-window): New functions.
1564 2008-04-25 Philippe Brochard <pbrochard@common-lisp.net>
1566 * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1567 user choose what window type the current frame must handle.
1568 (display-current-window-info): New function.
1569 (current-frame-manage-all-window-type)
1570 (current-frame-manage-only-normal-window-type)
1571 (current-frame-manage-no-window-type): New functions.
1573 * src/clfswm-internal.lisp (managed-window-p): New function.
1575 * src/package.lisp (frame): Managed type: new frame
1576 parameter. This allow to choose what window type a frame must
1579 * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1581 * src/clfswm-nw-hooks.lisp
1582 (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1584 * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1587 * src/tools.lisp (ensure-printable): Return always a string even
1590 2008-04-24 Philippe Brochard <pbrochard@common-lisp.net>
1592 * src/config.lisp (*default-nw-hook*): New variable to change the
1593 default new window hook.
1595 2008-04-22 Philippe Brochard <pbrochard@common-lisp.net>
1597 * clfswm.asd (clfswm): Add a dependency from
1598 clfswm-second-mode.lisp to clfswm.lisp.
1600 * src/clfswm-util.lisp (identify-key): Show the documentation for
1601 the function bound on a key.
1602 (with-movement): Move with-movement,
1603 current-frame-fill/pack/resize-* from bindings-second-mode.lisp
1604 to clfswm-util.lisp.
1606 * src/clfswm-menu.lisp: New menu system that let user change keys
1607 or functions associated to keys.
1609 2008-04-18 Philippe Brochard <pbrochard@common-lisp.net>
1611 * src/clfswm-internal.lisp (show-all-children): Display-child is
1612 the first child by default. Solve a bug with father-p.
1614 2008-04-17 Philippe Brochard <pbrochard@common-lisp.net>
1616 * src/clfswm-internal.lisp (add-frame): Add frame return the
1618 (show-all-children): Move the size computation outside the
1621 * src/bindings-second-mode.lisp (with-movement): Redisplay only
1624 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1625 only the current child.
1627 * src/clfswm-internal.lisp (show-all-children): New display-child
1628 parameter to display only the desired child and its children.
1629 (select-next/previous-child): Only display the current child.
1631 2008-04-14 Philippe Brochard <pbrochard@common-lisp.net>
1633 * src/clfswm.lisp (init-display): Move the default frame creation
1634 on the default init hook.
1636 * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1637 the main mode (for example: "1" on an azerty keyboard).
1639 2008-04-13 Philippe Brochard <pbrochard@common-lisp.net>
1641 * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1642 keysyms. Revert to old grabbing method for the main mode.
1644 2008-04-12 Philippe Brochard <pbrochard@common-lisp.net>
1646 * src/clfswm.lisp (init-display): Add key handling on no focus
1647 window and on frame windows.
1649 2008-04-11 Philippe Brochard <pbrochard@common-lisp.net>
1651 * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1652 all keys by default and replay just what is needed. No change for
1655 * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1656 (find-key-from-code): Test for shift and not shift presence.
1658 2008-04-09 Philippe Brochard <pbrochard@common-lisp.net>
1660 * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1661 new key parameter to have less flickering.
1663 2008-04-07 Philippe Brochard <pbrochard@common-lisp.net>
1665 * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1666 layout only one time and revert to no-layout to freely handle
1669 * src/clfswm-nw-hooks.lisp
1670 (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1671 with new created window.
1673 * src/clfswm-layout.lisp (register-layout): Now register
1674 automatically a once layout to set the layout only one time and
1675 revert to no-layout to freely handle frames.
1677 2008-04-05 Philippe Brochard <pbrochard@common-lisp.net>
1679 * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1680 nw-hook: Open the next window in the current frame and leave the
1681 focus to the current child.
1683 2008-04-04 Philippe Brochard <pbrochard@common-lisp.net>
1685 * src/bindings-second-mode.lisp: Add keys definitions to
1686 bind-or-jump in the second mode.
1688 * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
1689 macro for bind-or-jump-(1|2|3...).
1691 * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
1692 arguments to function. This allow to do things like:
1693 (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
1694 are passed to my-function on key press.
1696 2008-04-03 Philippe Brochard <pbrochard@common-lisp.net>
1698 * src/clfswm-util.lisp (bind-or-jump): New (great) function.
1700 2008-04-02 Philippe Brochard <pbrochard@common-lisp.net>
1702 * src/clfswm-internal.lisp (child-fullname): New function
1704 * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
1705 docstring in info-mode-menu. An item can be
1706 '((key function) (key function)) or with docstring
1707 '((key function "documentation 1") (key function "bla bla") (key function))
1709 * src/tools.lisp (ensure-n-elems): New function.
1711 * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
1712 resize a frame or the window's father.
1714 * src/clfswm.lisp (init-display): Remove tile-space-layout by
1715 default on the root frame.
1717 * src/clfswm-util.lisp (move/resize-frame): Add standard event
1718 hooks handlers (map-request, configure-notify...)
1720 * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
1723 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1725 * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
1726 or the window's father.
1728 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
1729 event only if there is a geometry change.
1730 (mouse-focus-move/resize-generic): Generic function to move or
1731 resize a frame or a window father frame.
1733 2008-04-01 Philippe Brochard <pbrochard@common-lisp.net>
1735 * src/clfswm-internal.lisp (show-all-children): Return t if there
1736 is a geometry change.
1738 2008-03-30 Philippe Brochard <pbrochard@common-lisp.net>
1740 * src/bindings.lisp (Up/Down): Swap select previous/next level.
1742 * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
1744 * src/clfswm.lisp (init-display): Create a default frame in the root frame.
1746 * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
1747 (with-all-*): Reverse the child list to manage the first child last (like in
1750 * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
1751 root window only if true.
1753 * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
1754 root window only if *create-frame-on-root* is true.
1756 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
1759 2008-03-29 Philippe Brochard <pbrochard@common-lisp.net>
1761 * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
1762 the current child (even if it's a window).
1764 2008-03-28 Philippe Brochard <pbrochard@common-lisp.net>
1766 * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
1767 (mouse-click-to-focus-and-resize): New functions.
1769 * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
1770 (*-px->fl): Convert pixel coordinates to float.
1772 * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
1774 2008-03-27 Philippe Brochard <pbrochard@common-lisp.net>
1776 * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
1779 * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
1780 and hide-all-children.
1781 (raise-if-needed): New function.
1782 (show-child): Use a first-p parameter to raise windows only when they are
1785 2008-03-26 Philippe Brochard <pbrochard@common-lisp.net>
1787 * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
1790 2008-03-25 Philippe Brochard <pbrochard@common-lisp.net>
1792 * src/clfswm-info.lisp (keys-from-list): new function.
1794 * src/*: rename 'childs' in 'children'.
1796 * src/*: rename 'group' in 'frame'.
1798 2008-03-22 Philippe Brochard <pbrochard@common-lisp.net>
1800 * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
1802 2008-03-21 Philippe Brochard <pbrochard@common-lisp.net>
1804 * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
1806 2008-03-16 Philippe Brochard <pbrochard@common-lisp.net>
1808 * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
1809 Bind control+o to open the next window in a new group in the root group
1810 (as open in next window in a new workspace in 0801 version).
1812 2008-03-15 Philippe Brochard <pbrochard@common-lisp.net>
1814 * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
1817 2008-03-14 Philippe Brochard <pbrochard@common-lisp.net>
1819 * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
1820 instead of Tab for select-previous-child.
1822 2008-03-13 Philippe Brochard <pbrochard@common-lisp.net>
1824 * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
1827 2008-03-11 Philippe Brochard <pbrochard@common-lisp.net>
1829 * clfswm-util.lisp (identify-key): Display the documentation
1830 associated to keys when identifying a key.
1832 2008-03-10 Xavier Maillard <xma@gnu.org>
1834 * contrib/clfswm: Complete rewrite of the script. Detect error and
1835 act accordingly. Add command line arguments to configure the
1836 script execution. User can now choose different common lisp
1837 implementation (clisp and sbcl only), choose where to store the
1838 dumped image, where to find clfswm source.
1840 2008-03-09 Philippe Brochard <pbrochard@common-lisp.net>
1842 * clfswm-internal.lisp (process-new-window): Beginning of new
1843 window hook: each group have a hook to tell what he wants to do
1844 with the new created window.
1846 2008-03-08 Xavier Maillard <xma@gnu.org>
1848 * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
1849 call the resulting executable.
1851 * clfswm.lisp (read-conf-file): Check for the user config file in
1852 XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
1853 prefered whenever possible.
1855 2008-02-27 Philippe Brochard <pbrochard@common-lisp.net>
1857 * clfswm-layout.lisp (*-layout): Add an optional raise-p
1858 parameter in each layout.
1860 2008-02-26 Philippe Brochard <pbrochard@common-lisp.net>
1862 * clfswm-util.lisp (copy/cut-current-child): Does not affect the
1864 (copy/move-current-child-by-name/number): new functions
1865 (focus-group-by-name/number): new functions
1866 (delete-group-by-name/number): new functions
1868 2008-02-24 Philippe Brochard <pbrochard@common-lisp.net>
1870 * ************************************************************ *
1871 *: Major update - No more reference to workspaces. The main *
1872 structure is a tree of groups or application windows. *
1873 * ************************************************************ *
1875 2008-02-07 Philippe Brochard <pbrochard@common-lisp.net>
1877 * clfswm.lisp (read-conf-file): Read configuration in
1878 $HOME/.clfswmrc or in /etc/clfswmrc or in
1879 $XDG_CONFIG_HOME/clfswm/clfswmrc.
1880 (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
1883 2008-01-18 Philippe Brochard <pbrochard@common-lisp.net>
1885 * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
1888 2008-01-03 Philippe Brochard <pbrochard@common-lisp.net>
1890 * clfswm-internal.lisp (find-window-group): New function.
1892 * clfswm*: Change to make clfswm run with clisp/new-clx.
1894 2008-01-01 Philippe Brochard <pbrochard@common-lisp.net>
1896 * clfswm-util.lisp (query-show-paren): Add show parent matching in
1898 (query-string): Bind control+k to delete end of line.
1900 * clfswm-second-mode.lisp (draw-second-mode-window): Display
1901 the action on mouse motion in second mode.
1903 * clfswm.lisp (handle-exposure): Redisplay groups on exposure
1904 event but do not clear the root window.
1905 (handle-configure-request): Adjust unmanaged window from their
1908 * clfswm-internal.lisp (process-new-window): Adjust new window
1909 with the specified hints (max/min/base width/height).
1911 2007-12-31 Philippe Brochard <pbrochard@common-lisp.net>
1913 * clfswm.lisp (handle-configure-request): Send an Configuration
1914 Notify event. This solve a bug with xterm and rxvt who takes some
1915 times to be mapped. Now there is no delay.
1917 * bindings-second-mode.lisp (define-shell): Run programs after
1918 living the second mode.
1920 2007-12-30 Philippe Brochard <pbrochard@common-lisp.net>
1922 * clfswm-internal.lisp (process-new-window): Do not crop transient
1923 window to group size.
1924 (adapt-window-to-group): Do not crop transient window to group
1927 * clfswm.lisp (handle-configure-request): Adapt just the window to
1928 its group and don't take care of the configure request. Remove the
1929 bug with the Gimp outside the group and speed up the window
1931 (handle-exposure): Remove show-all-group on exposure event
1934 2007-12-29 Philippe Brochard <pbrochard@common-lisp.net>
1936 * clfswm-util.lisp (circulate-group-up-copy-window)
1937 (circulate-group-down-copy-window)
1938 (circulate-workspace-up-copy-group)
1939 (circulate-workspace-down-copy-group): Prevent the copy of the
1940 same window in the same workspace.
1942 * bindings-second-mode.lisp (release-copy-selected-window)
1943 (release-copy-selected-group): Prevent the copy of the same window
1944 in the same workspace.
1946 * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
1947 (generic-pager-move-window-on-next-line): Remove the copy
1949 (generic-pager-move-group-on-next-workspace)
1950 (generic-pager-move-group-on-previous-workspace): Prevent the copy
1951 of the same window in the same workspace.
1953 * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
1954 (mouse-pager-copy-selected-group-release): Prevent the copy of the
1955 same window in the same workspace.
1957 * tools.lisp (setf/=): new macro to set a variable only when
1960 * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
1961 x, y... only when necessary.
1963 2007-12-28 Philippe Brochard <pbrochard@common-lisp.net>
1965 * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
1966 new function and hook: force windows to stay in its group (solve a
1969 2007-12-25 Philippe Brochard <pbrochard@common-lisp.net>
1971 * bindings-second-mode.lisp (mouse-motion): use hide-group to have
1972 less flickering when moving/resizing groups.
1974 * clfswm-internal.lisp (hide-group): new function.
1975 (show-all-group): clear-all: new parameter.
1977 2007-12-22 Philippe Brochard <pbrochard@common-lisp.net>
1979 * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
1981 * clfswm*: Color change for the pager. Typo or better description
1982 in bindings definitions. Define bindings for a qwerty keyboard by
1983 default. dot-clfswmrc show examples to switch to an azerty
1985 License change to GPL v3.
1986 * config.lisp: new file - group all globals variables in this
1989 2007-08-26 Philippe Brochard <pbrochard@common-lisp.net>
1991 * xlib-util.lisp (hide-window): Remove structure-notivy events
1992 when hidding a window.
1994 2007-05-16 Philippe Brochard <pbrochard@common-lisp.net>
1996 * package.lisp (*sm-property-notify-hook*): Readded
1997 property-notify-hook in second mode.
1999 2007-05-15 Philippe Brochard <pbrochard@common-lisp.net>
2001 * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
2003 2007-05-13 Philippe Brochard <pbrochard@common-lisp.net>
2005 * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
2006 Tile the current workspace with the current window on one side and
2007 others on the other (this emulate the larswm, dwm, wmii way). See
2008 the default configuration file to enable this mode by default.
2010 * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
2013 2007-05-12 Philippe Brochard <pbrochard@common-lisp.net>
2015 * clfswm-pager.lisp (pager-draw-window-in-group): Add
2016 ensure-printable to print windows name even with non-ascii
2019 2007-05-11 Philippe Brochard <pbrochard@common-lisp.net>
2021 * clfswm-pager.lisp (pager-explode-current-group): Create a new
2022 group for each window in group.
2023 (pager-implode-current-group): Move all windows in workspace to
2024 one group and remove other groups.
2026 * clfswm-pack.lisp (explode-group): Create a new group for each
2028 (implode-group): Move all windows in workspace to one group and
2029 remove other groups.
2031 * clfswm-util.lisp (identify-key): Remove local configuration
2032 variables and made them available for configuration from
2034 (query-string): idem.
2036 2007-04-29 Philippe Brochard <pbrochard@common-lisp.net>
2038 * netwm-util.lisp: Start of NetWM compliance.
2039 Add a Netwm client list gestion.
2041 2007-04-28 Philippe Brochard <pbrochard@common-lisp.net>
2043 * clfswm-internal.lisp (create-group-on-request): open a new group
2044 only when the current group is not empty.
2046 * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
2047 bug with null workspace.
2049 * clfswm-pager.lisp (pager-handle-event): Add a hook
2050 system. This hooks can be changed in the user configuration file.
2052 * package.lisp: All colors and font variables are set in
2053 package.lisp and can be configured in the user configuration
2055 Note: If you have configured some less ugly colors (esp. for the
2056 pager) don't hesitate to let me know :)
2058 * clfswm-second-mode.lisp (sm-handle-event): Add a hook
2059 system. This hooks can be changed in the user configuration file.
2061 * clfswm.lisp (handle-event): Add a hook system. This hooks can be
2062 changed in the user configuration file (~/.clfswmrc)
2064 2007-04-25 Philippe Brochard <pbrochard@common-lisp.net>
2066 * clfswm-util.lisp (stop-all-pending-actions): new function: reset
2067 arrow action, open next window in new workspace/group.
2069 * bindings.lisp (stop-all-pending-actions): new binding.
2070 (open-next-window-in-new-group-once): Open the next windows in a
2071 new group (only once) or open all new windows in a new group (like
2072 others windows managers).
2074 2007-04-22 Philippe Brochard <pbrochard@common-lisp.net>
2076 * clfswm.lisp (read-conf-file): New function to read a lisp
2077 configuration file at startup.
2078 (focus-group-under-mouse): Check if group isn't the current group
2079 ( prevent a bug with unclutter ).
2081 2007-03-02 Philippe Brochard <pbrochard@common-lisp.net>
2083 * bindings.lisp (run-program-from-query-string): A program can be
2084 launch from a input query window.
2086 2007-03-01 Philippe Brochard <pbrochard@common-lisp.net>
2088 * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
2090 2007-02-28 Philippe Brochard <pbrochard@common-lisp.net>
2092 * clfswm.lisp (process-new-window): One can now open the next
2093 window in a workspace called by its number.
2095 * clfswm-util.lisp (query-font-string): Minimal editing
2097 (eval-from-string): And an REPL in the window manager... :)
2099 2007-02-26 Philippe Brochard <pbrochard@common-lisp.net>
2101 * clfswm.lisp (process-new-window): One can now open the next
2102 window in a new workspace or a new group.
2104 * clfswm-pager.lisp (pager-mode): Display the next arrow action
2105 with the hidden windows.
2107 * clfswm.lisp (second-key-mode): Display the current workspace
2108 number and the next arrow action in the state window.
2110 * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
2111 the pager mode and then redisplay only the current workspace.
2113 2007-02-25 Philippe Brochard <pbrochard@common-lisp.net>
2115 * clfswm.lisp (add-workspace): Workspaces are now numbered. So
2116 they can be focused with a keypress, sorted or renumbered.
2118 2007-02-24 Philippe Brochard <pbrochard@common-lisp.net>
2120 * clfswm-pager.lisp (pager-mode): Remove multiple silly
2121 pager-draw-display. This prevent a lot of flickering in the
2124 * clfswm.lisp: Remove all display-force-output and replace them
2125 with only one display-finish-output in the event loop.
2127 2006-11-06 Philippe Brochard <pbrochard@common-lisp.net>
2129 * clfswm-pager.lisp (pager-center-group): New function - center a
2130 group at the middle of the screen.
2132 * clfswm-pack.lisp (center-group): New function - center a group
2133 at the middle of the screen.
2135 * clfswm.lisp (show-group): Add a cross line under the group.
2136 (show-group): Group are showned even if fullscreened.
2137 (init-display): Add an exposure event on the root window.
2139 2006-11-05 Philippe Brochard <pbrochard@common-lisp.net>
2141 * package.lisp (*default-group*): Default group is the same size
2142 of a fullscreened group.
2144 * bindings*: Use shift to move, control+shift to copy.
2146 * *.lisp: Add comments for configuration or alternatives. So grep
2147 for CONFIG to see where you can configure clfswm. And grep for
2148 Alternative to use some commented code.
2150 * clfswm.lisp (second-key-mode): Use a single window to show the
2151 second mode. See for alternatives at the end of this file.
2153 2006-11-03 Philippe Brochard <pbrochard@common-lisp.net>
2155 * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
2156 macro of key and mouse definitions.
2157 (define-define-key/mouse): Use state instead of modifiers list
2158 this fix a bug when the modifiers list is not in the rigth order.
2160 * clfswm.lisp (second-key-mode): Add a colored border in second mode.
2162 2006-11-02 Philippe Brochard <pbrochard@common-lisp.net>
2164 * clfswm-info.lisp (info-mode): Add an info mode.
2166 2006-11-01 Philippe Brochard <pbrochard@common-lisp.net>
2168 * clfswm.lisp (process-new-window): Change border size for
2170 (show-all-windows-in-workspace): Unhide all windows even when the
2171 current group is in fullscreen mode.
2173 2006-10-26 Philippe Brochard <pbrochard@common-lisp.net>
2175 * clfswm-util.lisp (identify-key): Add an exposure handle-event to
2176 redisplay the identify window after a terminal switch.
2178 * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
2179 redisplay the pager after a terminal switch.
2181 2006-10-24 Philippe Brochard <pbrochard@common-lisp.net>
2183 * clfswm-util.lisp (identify-key): Add a window to display
2184 the keys to identify on screen.
2186 * bindings.lisp, bindings-pager.lisp: Define same keys to
2187 move/copy groups/windows in second mode and in pager.
2189 * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
2191 (show-all-windows-in-workspace): unhide window before adapting it
2194 2006-10-23 Philippe Brochard <pbrochard@common-lisp.net>
2196 * clfswm.lisp (handle-event): Revert to an older version.
2198 2006-10-18 Philippe Brochard <pbrochard@common-lisp.net>
2200 * clfswm-util.lisp (force-window-in-group)
2201 (force-window-center-in-group): New functions for transient windows.
2203 * clfswm-pager.lisp (pager-remove-current-workspace/group):
2204 bugfix: hide all windows before removing group or workspace.
2206 2006-10-17 Philippe Brochard <pbrochard@common-lisp.net>
2208 * bindings-pager.lisp (mouse-pager-move-selected-group)
2209 (mouse-pager-copy-selected-group)
2210 (mouse-pager-move-selected-window)
2211 (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
2212 (mouse-pager-rotate-window-down): New functions to have mouse in
2215 * clfswm-pager.lisp (pager-swap-window)
2216 (pager-copy-group-on-next/previous-workspace)
2217 (pager-copy-window-on-next/previous-line): New functions
2219 2006-10-15 Philippe Brochard <pbrochard@common-lisp.net>
2221 * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
2222 (pager-move-group-on-next/previous-workspace): new functions.
2224 * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
2225 to its half size (new functions).
2227 2006-10-11 Philippe Brochard <pbrochard@common-lisp.net>
2229 * clfswm-pager.lisp: workspaces, groups and windows can now be
2230 selectionned with the keyboard or the mouse.
2232 2006-10-09 Philippe Brochard <pbrochard@common-lisp.net>
2234 * clfswm-pager.lisp (pager-select-workspace-right/left):
2235 workspaces can now be selectionned with the keyboard.
2237 2006-10-08 Philippe Brochard <pbrochard@common-lisp.net>
2239 * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
2240 new function to remove a previous defined key or mouse combination.
2242 2006-10-07 Philippe Brochard <pbrochard@common-lisp.net>
2244 * clfswm.lisp (main): Check for access error in init-display.
2246 * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
2247 keycode before grabbing.
2249 * bindings.lisp: Remove nlambda and use defun to keep the function
2250 documentation with clisp.
2251 (define-shell): new macro to define shell command for the second
2254 2006-10-06 Philippe Brochard <pbrochard@common-lisp.net>
2256 * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
2259 2006-10-05 Philippe Brochard <pbrochard@common-lisp.net>
2261 * bindings.lisp (accept-motion): Move group bugfix in upper mouse
2262 workspace circulation.
2264 * clfswm-util.lisp (absorb-orphan-window): new function.
2266 * clfswm-keys.lisp: Keysyms support.
2268 2006-10-02 Philippe Brochard <pbrochard@common-lisp.net>
2270 * clfswm.lisp (show-group): Use one gc for all groups and not one
2273 2006-10-01 Philippe Brochard <pbrochard@common-lisp.net>
2275 * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
2277 * clfswm.lisp (adapt-window-to-group): Adapt only windows with
2278 width and height outside group.
2280 2006-09-28 Philippe Brochard <pbrochard@common-lisp.net>
2282 * clfswm.lisp: First public release.