src/clfswm-internal.lisp (set-current-root): Handle window-parent in set-current...
[clfswm.git] / ChangeLog
blob128a5aa809b1660c9407cc1c0d2e476de98c0c83
1 2010-11-11  Philippe Brochard  <pbrochard@common-lisp.net>
3         * src/clfswm-internal.lisp (set-current-root): Handle
4         window-parent in set-current-root.
6         * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
7         focus the parent child when the current root is a window.
9 2010-11-09  Philippe Brochard  <pbrochard@common-lisp.net>
11         * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
12         New function an bindings.
14         * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
15         blanks if needed.
17 2010-11-07  Philippe Brochard  <pbrochard@common-lisp.net>
19         * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
20         function to let the user choose to keep child position with
21         tile layout.
23         * src/clfswm-internal.lisp (remove-frame-data-slot): New
24         function.
26 2010-11-05  Philippe Brochard  <pbrochard@common-lisp.net>
28         * src/clfswm-internal.lisp (frame-select-next-child)
29         (frame-select-previous-child): New functions and bindings. Select
30         the next/previous child in the current frame.
32 2010-10-31  Philippe Brochard  <pbrochard@common-lisp.net>
34         * src/clfswm-query.lisp (query-mode-complet): New function: Handle
35         completion in query-mode.
37 2010-10-30  Philippe Brochard  <pbrochard@common-lisp.net>
39         * src/clfswm-query.lisp (query-print-string): Handle long lines
40         correctly.
42 2010-10-27  Philippe Brochard  <pbrochard@common-lisp.net>
44         * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
45         all characters are printable.
47 2010-10-25  Philippe Brochard  <pbrochard@common-lisp.net>
49         * contrib/server/server.lisp: Load clfswm client code in the main
50         program and let the user start it with a --client command line
51         option.
53         * src/package.lisp (*main-entrance-hook*): New hook executed after
54         loading configuration file and before opening the display.
56 2010-10-23  Philippe Brochard  <pbrochard@common-lisp.net>
58         * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
60         * src/clfswm-internal.lisp (show-child): Show window only if not
61         hidden.
63         * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
64         change modifiers after binding definition.
66 2010-10-21  Philippe Brochard  <pbrochard@common-lisp.net>
68         * contrib/osd.lisp: New file: OSD (On Screen Display) for
69         presentations.
71         * src/clfswm-menu.lisp (open-menu): Modularise function.
73 2010-10-13  Philippe Brochard  <pbrochard@common-lisp.net>
75         * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
76         key binding in main and second mode.
78 2010-10-10  Philippe Brochard  <pbrochard@common-lisp.net>
80         * src/clfswm-util.lisp (open-notify-window): Convert hello-window
81         functions to a more generic Notify-window system.
83         * src/tools.lisp (add-timer): Add an id to identify the timer.
85 2010-10-09  Philippe Brochard  <pbrochard@common-lisp.net>
87         * src/tools.lisp (erase-timer): New function.
89         * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
90         the hello window. Add Configuration variables.
92 2010-10-08  Philippe Brochard  <pbrochard@common-lisp.net>
94         * src/clfswm-util.lisp (): Add an Hello window at startup.
96         * src/tools.lisp (process-timers): Add a timer system.
98 2010-10-07  Philippe Brochard  <pbrochard@common-lisp.net>
100         * src/clfswm-query.lisp (add-in-query-string): Handle correctly
101         the mod-5 modifier.
103 2010-10-06  Philippe Brochard  <pbrochard@common-lisp.net>
105         * src/clfswm-query.lisp (query-print-string): Change cursor color
106         and show parenthesis matching with colors (on match and on
107         errors).
109 2010-10-05  Philippe Brochard  <pbrochard@common-lisp.net>
111         * src/clfswm-internal.lisp (show-all-children): Do not raise a
112         child when its parent is hidden.
114 2010-10-02  Philippe Brochard  <pbrochard@common-lisp.net>
116         * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
117         possibility to circulate over subchild of the current child.
119         * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
120         (expose-windows-generic): Add an escape-body function to return to
121         the original state on escape key.
123         * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
124         to bind the current child from the configuration file.
126 2010-10-01  Philippe Brochard  <pbrochard@common-lisp.net>
128         * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
129         window hook: the frame absorb all new windows that match
130         nw-absorb-test frame data slot.
132 2010-09-30  Philippe Brochard  <pbrochard@common-lisp.net>
134         * src/clfswm-expose-mode.lisp (expose-create-window): Show window
135         title in accel window.
137 2010-09-29  Philippe Brochard  <pbrochard@common-lisp.net>
139         * configure: Use the Xavier Maillard clfswm script in contrib to
140         build an executable in the standard way.
142 2010-09-26  Philippe Brochard  <pbrochard@common-lisp.net>
144         * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
145         New functions. Add a window on each child in the expose mode to
146         quickly select them.
148         * src/clfswm-internal.lisp (child-x, child-y, child-width)
149         (child-height): New methods to get real child coordinates.
151 2010-09-25  Philippe Brochard  <pbrochard@common-lisp.net>
153         * src/clfswm-layout.lisp (*-layout): Use child-position.
155         * src/clfswm-internal.lisp (child-position): New function.
157         * src/clfswm-expose-mode.lisp (expose-windows-mode)
158         (expose-all-windows-mode): Use a generic mode.
160         * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
161         with handle-event-fun symbols instead of inspecting clfswm
162         internals symbols on each mode change.
164         * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
165         a separate clfswm-expose-mode.lisp file.
167         * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
168         screen size instead of hardcoded test coordinates.
170 2010-09-24  Philippe Brochard  <pbrochard@common-lisp.net>
172         * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
173         (speed-mouse-right, speed-mouse-up, speed-mouse-down)
174         (speed-mouse-undo, speed-mouse-first-history): New functions to
175         quickly move the mouse. Implemented for the second mode.
177 2010-09-16  Philippe Brochard  <pbrochard@common-lisp.net>
179         * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
180         write permission on $clfswm_asd_path. So anybody can start clfswm
181         even if there is no write permission on the source directory.
183 2010-09-12  Philippe Brochard  <pbrochard@common-lisp.net>
185         * contrib/clfswm: Add support to cmucl, ccl and ecl.
187 2010-09-11  Philippe Brochard  <pbrochard@common-lisp.net>
189         * src/clfswm-util.lisp (set-hide-unmanaged-window)
190         (set-show-unmanaged-window, set-default-hide-unmanaged-window):
191         New functions and menu entry.
192         (set-globally-hide-unmanaged-window)
193         (set-globally-show-unmanaged-window): New functions and menu
194         entry.
196         * src/clfswm-internal.lisp (hide-unmanager-window-p): New
197         function.
198         (show-child): Add a data slot on frame to hide or not unmanaged
199         windows.
201         * src/clfswm-corner.lisp (present-clfswm-terminal)
202         (present-virtual-keyboard): Use a function (generic-present-body)
203         instead of a macro (generate-present-body).
205         * src/clfswm-util.lisp (update-menus): List all directories and
206         subdirectories in $XDG_DATA_DIRS/applications.
208 2010-09-10  Philippe Brochard  <pbrochard@common-lisp.net>
210         * src/clfswm-corner.lisp (generate-present-body): New macro.
211         (present-clfswm-terminal, present-virtual-keyboard): Use
212         generate-present-body.
214 2010-09-09  Philippe Brochard  <pbrochard@common-lisp.net>
216         * src/clfswm-util.lisp (update-menus): Follow XDG specifications
217         instead of the non-portable Debian update-menu.
219 2010-09-07  Philippe Brochard  <pbrochard@common-lisp.net>
221         * src/clfswm.lisp (error-handler): New function do handle
222         asynchronous errors and ignore them.
223         (open-display): Install the new error-handler on display.
225 2010-09-05  Philippe Brochard  <pbrochard@common-lisp.net>
227         * src/xlib-util.lisp (with-xlib-protect): Add a
228         with-simple-restart on top of body execution.
230 2010-09-04  Philippe Brochard  <pbrochard@common-lisp.net>
232         * src/clfswm.lisp (main-loop): Protect all xlib functions with an
233         with-xlib-protect.
235         * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
236         handle-event. Add a with-simple-restart to prevent a
237         clisp/new-lisp infinite loop.
239 2010-08-30  Philippe Brochard  <pbrochard@common-lisp.net>
241         * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
242         clfswm terminal working even on xterm title changes.
244 2010-08-29  Philippe Brochard  <pbrochard@common-lisp.net>
246         * src/clfswm-util.lisp (run-other-window-manager): Update for
247         clisp compatibility.
249         * src/tools.lisp (do-execute): New parameter io to change the
250         input/output method.
252         * src/clfswm-util.lisp (hide-current-child): Prevent from removing
253         the current root.
255         * src/clfswm-internal.lisp (child-member): New predicate.
256         (child-remove): New function.
258         * src/*.lisp: Use child-member and child-remove everywhere it's
259         needed.
261 2010-08-28  Philippe Brochard  <pbrochard@common-lisp.net>
263         * src/clfswm.lisp (main-loop): Ensure that all events have been
264         processed after a process-event.
266         * src/clfswm-internal.lisp (is-in-current-child-p): New function.
268 2010-08-27  Philippe Brochard  <pbrochard@common-lisp.net>
270         * src/clfswm.lisp (main-mode:configure-request): Raise the window
271         only when present on the current child and focus it accordingly.
273 2010-08-26  Philippe Brochard  <pbrochard@common-lisp.net>
275         * src/clfswm-circulate-mode.lisp (circulate-loop-function):
276         Use is-a-key-pressed-p.
278         * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
280         * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
281         returned by xlib:keysym->keycodes.
283         * src/*.lisp: Use the new child-equal-p to compare children. This
284         prevent a bug with sbcl/cmucl when the standard equal function
285         does not work with xlib:window.
287         * src/clfswm-internal.lisp (child-equal-p): New predicate.
289 2010-08-25  Philippe Brochard  <pbrochard@common-lisp.net>
291         * src/clfswm-generic-mode.lisp (generic-mode): Use an
292         xlib:event-listen before processing event with
293         xlib:process-event. This prevent a bug with CLX threaded
294         implementation like sbcl.
296         * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
297         processing event with xlib:process-event. This prevent a bug with
298         CLX threaded implementation like sbcl.
300 2010-08-17  Philippe Brochard  <pbrochard@common-lisp.net>
302         * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
304         * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
305         of an event-case.
307         * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
308         (find-parent-frame, find-frame-window, find-frame-by-name)
309         (find-frame-by-number): Use with-find-in-all-frames to search in
310         frames in the right order.
312         * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
313         unwanted flickering with unmanaged windows.
315 2010-08-16  Philippe Brochard  <pbrochard@common-lisp.net>
317         * src/package.lisp: Remove event handler hooks as they're not
318         needed anymore (To replace them: use closure and define-handler).
320         * src/xlib-util.lisp (move-window, resize-window)
321         (wait-mouse-button-release): Use a generic mode.
323         * src/*.lisp: Replace the case to handle event with a more (tricky)
324         lispy  method which bind a function to each keywords associated
325         to graphics events.
327 2010-07-23  Philippe Brochard  <pbrochard@common-lisp.net>
329         * src/clfswm-util.lisp (delete-current-child): Invert bindings and
330         menu entry between delete-current-child and remove-current-child.
331         ie: Delete a child and its children in all frames by default.
333 2010-07-21  Philippe Brochard  <pbrochard@common-lisp.net>
335         * src/package.lisp: Add a placement configuration group.
337         * src/binding*.lisp: Bind control+g to escape the current action
338         like emacs.
340         * src/clfswm-internal.lisp
341         (delete-child-and-children-in-all-frames): New function and
342         binding: Second mode - Control+Delete delete the current child and
343         its children in all frames (ie: close the current child and its
344         children).
346 2010-07-20  Philippe Brochard  <pbrochard@common-lisp.net>
348         * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
349         the frame window and the frame gc. Close a very annoying bug when
350         cuting/pasting a frame or moving a child over frames with the
351         mouse.
353         * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
354         all children in *current-root* after moving/resizing a frame.
356 2010-07-18  Philippe Brochard  <pbrochard@common-lisp.net>
358         * src/clfswm-util.lisp (delete-focus-window)
359         (destroy-focus-window): Remove child in parent frame before
360         stopping it.
362 2010-07-16  Philippe Brochard  <pbrochard@common-lisp.net>
364         * src/clfswm-util.lisp (identify-key): Add a timeout in
365         xlib:process-event.
366         (mouse-click-to-focus-generic): Use find-child-under-mouse instead
367         of the window passed by xlib:process-event.
369         * src/xlib-util.lisp (move-window, resize-window)
370         (wait-mouse-button-release): Add a timeout in xlib:process-event.
372 2010-04-11  Philippe Brochard  <pbrochard@common-lisp.net>
374         * src/clfswm-util.lisp (run-other-window-manager): Add the ability
375         to launch an other window manager and to return to clfswm.
377 2010-03-18  Philippe Brochard  <pbrochard@common-lisp.net>
379         * src/clfswm-layout.lisp (set-tile-space-layout): Set default
380         to 1%.
382 2009-12-15  Philippe Brochard  <pbrochard@common-lisp.net>
384         * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
385         loop timeout.
387         * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
388         parameter and a loop timeout.
390 2009-12-05  Philippe Brochard  <pbrochard@common-lisp.net>
392         * src/clfswm.lisp (main): Add an alternate configuration filename
393         parameter.
395         * load.lisp: Add a debuging code example.
397 2009-11-14  Philippe Brochard  <pbrochard@common-lisp.net>
399         * src/clfswm-configuration.lisp (create-configuration-menu): New
400         menu to configure all clfswm variables while clfswm is running.
402 2009-11-12  Philippe Brochard  <pbrochard@common-lisp.net>
404         * src/clfswm-util.lisp (save-configuration-variables): New
405         function to save all configuration variables in clfswmrc.
407 2009-11-11  Philippe Brochard  <pbrochard@common-lisp.net>
409         * src/clfswm-info.lisp (info-mode): Begining of mouse support in
410         info mode.
411         (set-default-info-keys): Add cursor key support in info mode.
413 2009-11-08  Philippe Brochard  <pbrochard@common-lisp.net>
415         * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
416         contrib.
418         * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
419         prevent reading the configuration file (this may be useful to
420         produce the original documentation without user modifications
421         with the rc configuration file).
423 2009-11-07  Philippe Brochard  <pbrochard@common-lisp.net>
425         * src/bindings-second-mode.lisp (set-default-second-keys):
426         Simplification of Escape key to close/kill/remove the focus window
427         and unhide all windows.
429         * src/bindings.lisp (set-default-main-keys): Simplification of
430         Escape key to close/kill/remove the focus window and unhide all
431         windows.
433         * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
434         focus and unhide all windows capabilities.
436 2009-10-10  Philippe Brochard  <pbrochard@common-lisp.net>
438         * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
440 2009-07-29  Philippe Brochard  <pbrochard@common-lisp.net>
442         * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
443         Keep child order and don't make unnecessary child movement.
444         (one-column-layout, one-line-layout): New layouts.
446 2009-06-29  Philippe Brochard  <pbrochard@common-lisp.net>
448         * contrib/cd-player.lisp: New file to handle the CD player.
450         * contrib/xmms.lisp: New file to handle the xmms player.
452 2009-06-28  Philippe Brochard  <pbrochard@common-lisp.net>
454         * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
455         Maximize windows in there frame - Leave frames to there actual
456         size.
458         * src/bindings-second-mode.lisp (set-default-second-keys): Bind
459         "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
461 2009-06-27  Philippe Brochard  <pbrochard@common-lisp.net>
463         * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
465 2009-06-24  Philippe Brochard  <pbrochard@common-lisp.net>
467         * contrib/mpd.lisp: Use a standard menu.
469         * src/clfswm-info.lisp: Use a standard menu for the help-menu.
471 2009-06-22  Philippe Brochard  <pbrochard@common-lisp.net>
473         * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
475 2009-06-19  Philippe Brochard  <pbrochard@common-lisp.net>
477         * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
478         number key cleanup.
480 2009-06-18  Philippe Brochard  <pbrochard@common-lisp.net>
482         * src/config.lisp (get-fullscreen-size):  One pixel adjustment
483         (again).
485         * src/clfswm-placement.lisp (*-child-placement): One pixel
486         adjustment (again).
488 2009-06-16  Philippe Brochard  <pbrochard@common-lisp.net>
490         * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
491         Ensure that all characters are printable.
493         * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
494         sizes.
496         * src/clfswm-placement.lisp (*-child-placement): Adjust
497         coordinates to one pixel in the current child.
499 2009-06-04  Philippe Brochard  <pbrochard@common-lisp.net>
501         * src/clfswm-query.lisp (query-enter-function): Assign font before
502         width and height calculation.
504 2009-06-03  Philippe Brochard  <pbrochard@common-lisp.net>
506         * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
507         bannish the pointer in an arbitrary place.
509         * src/clfswm-info.lisp (info-mode): Use with-placement macro to
510         place the info window in an arbitrary place.
512         * src/clfswm-query.lisp (query-enter-function): Use with-placement
513         macro to place the query window in an arbitrary place.
515         * src/clfswm-placement.lisp: New file. Allow to place info windows
516         or query windows on an arbitrary place. Allow to bannish the
517         pointer on an arbitrary place.
519 2009-05-16  Philippe Brochard  <pbrochard@common-lisp.net>
521         * src/clfswm-circulate-mode.lisp (reorder-child)
522         (reorder-brother): Unfocus windows before reordering children or
523         brothers.
525 2009-05-13  Philippe Brochard  <pbrochard@common-lisp.net>
527         * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
528         the parent is a frame.
530         * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
531         motion with a default modifier.
533         * src/clfswm.lisp (handle-motion-notify): Handle motion with a
534         default modifier.
536         * src/clfswm-info.lisp (info-mode): Handle motion with a default
537         modifier.
538         (info-mode): Optimization in loop function.
540 2009-05-10  Philippe Brochard  <pbrochard@common-lisp.net>
542         * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
543         root-frame correctly.
545         * clfswm.asd: Dependency fix for clfswm-generic-mode.
547         * src/clfswm-circulate-mode.lisp (reorder-child)
548         (reorder-brother): Handle empty frames.
549         (reorder-brother): Redisplay only the parent frame of the  current
550         child.
552         * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
553         parent frame of the  current frame.
555 2009-05-09  Philippe Brochard  <pbrochard@common-lisp.net>
557         * src/clfswm-util.lisp (frame-toggle-maximize): New function:
558         Maximize/Unmaximize the current frame in its parent frame.
560         * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
561         windows and frames in there parent frame.
563 2009-05-05  Philippe Brochard  <pbrochard@common-lisp.net>
565         * src/*.lisp: Add support for Clozure Common Lisp (CCL).
567         * src/clfswm-circulate-mode.lisp (reorder-child)
568         (reorder-brother): Reinitialise on circulate type change
569         child to brother or brother to child.
571         * src/*.lisp (*): Use map-window instead of xlib:map-window. So
572         calls xlib:display-finish-output on each map-request. So speed up
573         the window display.
575         * src/xlib-util.lisp (map-window): New function. Call
576         xlib:display-finish-output on each map request.
578 2009-04-28  Philippe Brochard  <pbrochard@common-lisp.net>
580         * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
581         Optimisation when drawing second mode window.
583 2009-04-27  Philippe Brochard  <pbrochard@common-lisp.net>
585         * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
586         window redraw.
588 2009-04-22  Philippe Brochard  <pbrochard@common-lisp.net>
590         * src/clfswm-util.lisp (run-program-from-query-string): Launch
591         command only with a return validation.
593 2009-04-22  Xavier Maillard  <xma@gnu.org>
595         * src/clfswm-query.lisp (query-string): Use a generic mode.
597 2009-04-19  Xavier Maillard  <xma@gnu.org>
599         * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
601 2009-04-18  Xavier Maillard  <xma@gnu.org>
603         * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
604         to define all other modes.
606 2009-04-05  Philippe Brochard  <pbrochard@common-lisp.net>
608         * src/package.lisp (): Use *default-font-string* for all
609         font-string.
611         * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
613 2009-02-17  Philippe Brochard  <pbrochard@common-lisp.net>
615         * src/xlib-util.lisp (null-size-window-p): Better check of null
616         sized windows.
618 2009-02-14  Philippe Brochard  <pbrochard@common-lisp.net>
620         * src/clfswm.lisp (handle-map-request): Add a fix to manage
621         correctly fullscreen windows (SDL particularly).
623 2008-12-20  Philippe Brochard  <pbrochard@common-lisp.net>
625         * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
626         a segfault with clisp/new-clx.
628         * src/clfswm.lisp (handle-motion-notify): Add a needed window
629         argument.
631         * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
632         needed window argument.
634 2008-10-30  Philippe Brochard  <pbrochard@common-lisp.net>
636         * src/xlib-util.lisp (wait-no-key-or-button-press)
637         (wait-a-key-or-button-press): Check buttons press/release correctly"
639 2008-10-28  Philippe Brochard  <pbrochard@common-lisp.net>
641         * src/menu-def.lisp: Add children navigation menu in the movement
642         menu (select next/previous child/brother/level).
644 2008-10-26  Philippe Brochard  <pbrochard@common-lisp.net>
646         *  *: Rename 'sister' frame to 'brother' frame.
648         * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
649         alias in a real modifier.
651         * src/package.lisp (*modifier-alias*): New list of modifier alias
652         For example: :alt is :mod-1, :numlock is :mod-2...
654         * src/tools.lisp (remove-hook): New function.
656         * src/clfswm-keys.lisp (with-capslock, without-capslock)
657         (with-numlock, without-cnumlock): New functions.
659 2008-10-25  Philippe Brochard  <pbrochard@common-lisp.net>
661         * src/clfswm-info.lisp: Use the *binding-hook* to create info
662         keys and mouse bindings.
664         * src/bindings-second-mode.lisp: Use the *binding-hook* to create
665         second keys and mouse bindings.
667         * src/bindings.lisp: Use the *binding-hook* to create main keys
668         and mouse bindings.
670 2008-10-10  Philippe Brochard  <pbrochard@common-lisp.net>
672         * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
673         menu opening.
675 2008-10-09  Philippe Brochard  <pbrochard@common-lisp.net>
677         * src/menu-def.lisp: Use a menu instead of a function for the
678         standard menu.
680 2008-10-08  Philippe Brochard  <pbrochard@common-lisp.net>
682         * src/clfswm-util.lisp (show-standard-menu): Display the standard
683         menu from the 'update-menus' command.
685 2008-10-07  Philippe Brochard  <pbrochard@common-lisp.net>
687         * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
688         it's already grabbed.
690         * src/clfswm-internal.lisp (display-frame-info): Use configurable
691         colors and fix a bug with background.
692         (display-frame-info): Set window background when displaying info.
694 2008-10-06  Philippe Brochard  <pbrochard@common-lisp.net>
696         * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
697         warning with clisp/new-clx.
699 2008-10-04  Philippe Brochard  <pbrochard@common-lisp.net>
701         * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
702         deleted child.
704 2008-09-23  Philippe Brochard  <pbrochard@common-lisp.net>
705         * *: **** Release 0809 ****
707 2008-09-23  Philippe Brochard  <pbrochard@common-lisp.net>
709         * src/clfswm-util.lisp (ensure-unique-name): New function and menu
710         entry.
711         (ensure-unique-number): New function and menu entry.
713 2008-09-22  Philippe Brochard  <pbrochard@common-lisp.net>
715         * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
716         hook: open the next window in a named frame.
717         (numbered-frame-nw-hook): New new window hook: open the next
718         window in a numbered frame.
720         * src/clfswm-query.lisp (query-string): Grab the keyboard in all
721         cases. So query-string can be called even in the main mode.
723         * src/clfswm-internal.lisp (show-all-children): Do not raise a
724         child by default => far less flickering.
726 2008-09-19  Philippe Brochard  <pbrochard@common-lisp.net>
728         * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
730         * src/menu-def.lisp: Change key binding for the CLFSWM menu
731         entry.
733         * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
734         is nil. (workaround on some CLX implementation).
736 2008-09-12  Philippe Brochard  <pbrochard@common-lisp.net>
738         * src/menu-def.lisp: Add a menu to set a focus policy for all
739         frames.
741         * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
742         (all-frames-set-*-focus-policy): Set a focus policy for all
743         frames.
745         * src/clfswm.lisp (handle-enter-notify): sloppy-select
746         mode. Select a child and its parents on mouse over.
748 2008-09-03  Philippe Brochard  <pbrochard@common-lisp.net>
750         * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
751         policy -> Sloppy focus only for windows in the current frame.
752         (main-unprotected): Exit clfswm on init error (ie: when another
753         window manager is running).
755         * src/clfswm-util.lisp (reset-clfswm): New function.
757 2008-09-02  Philippe Brochard  <pbrochard@common-lisp.net>
759         * src/clfswm-menu.lisp (init-menu): New function.
761         * src/clfswm-util.lisp (reload-clfswm): New function to reload
762         CLFSWM.
763         (exit-clfswm): Rename quit-clfswm to exit-clfswm.
765         * src/clfswm.lisp (main, main-unprotected): Handle error in a
766         superior main function. Now CLFSWM can't break the X session. It
767         just reinitialize the display and run a new main loop.
769         * src/clfswm-corner.lisp: Make *clfswm-terminal* and
770         *vt-keyboard-on* global to avoid warnings when loading clfswm.
772         * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
773         (help-on-gimp-layout): Describe how to use the GIMP layout.
775 2008-09-01  Philippe Brochard  <pbrochard@common-lisp.net>
777         * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
778         main-window-right-layout. Change the keybinding for (shift)alt+tab
779         to not select windows in the main window lisst.
780         Bind F8 to add a window in the main window list.
781         Bind F9 to remove a window in the main window list.
782         Change the focus policy to :sloppy.
783         (set-previous-layout): Restore the previous layout, keybinding and
784         focus policy.
786 2008-08-31  Philippe Brochard  <pbrochard@common-lisp.net>
788         * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
790         * src/clfswm-layout.lisp (main-window-left-layout)
791         (main-window-bottom-layout, main-window-top-layout): New
792         functions.
793         Factorize layouts in menu.
795 2008-08-30  Philippe Brochard  <pbrochard@common-lisp.net>
797         * src/clfswm-layout.lisp (main-window-right-layout): A possible
798         GIMP layout: one or more main windows on one side of the
799         frame. Others on the other size.
801         * src/clfswm-util.lisp
802         (current-frame-set-click/sloppy-focus-policy): Each frame can have
803         a different focus policy (one of :click or :sloppy).
804         The default focus policy is set with *default-focus-policy*.
806 2008-08-23  Philippe Brochard  <pbrochard@common-lisp.net>
808         * src/clfswm-info.lisp (show-config-variable): New function.
810 2008-08-19  Philippe Brochard  <pbrochard@common-lisp.net>
812         * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
814         * src/clfswm-info.lisp: Colored help for key binding and corners
815         actions.
817 2008-08-18  Philippe Brochard  <pbrochard@common-lisp.net>
819         * src/clfswm-util.lisp (delete-focus-window)
820         (destroy-focus-window): Remove chid only in
821         handle-unmap/destroy-notify. Focus *current-root* only when
822         closing/killing the current child.
824         * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
825         functions or corners.
827 2008-08-17  Philippe Brochard  <pbrochard@common-lisp.net>
829         * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
830         action: Hide/Unhide a terminal on mouse corner action. (By default
831         right mouse button on the top left corner).
833         * src/config.lisp (*never-managed-window-list*): New config
834         variable.
836         * src/clfswm-internal.lisp (never-managed-window-p): New function:
837         Handle never managed window in a more simple way.
839         * src/clfswm-corner.lisp: New file and new and more simple method
840         to define corners actions.
842 2008-08-15  Philippe Brochard  <pbrochard@common-lisp.net>
844         * src/clfswm-info.lisp (info-mode): Info line can now be colored.
846         * src/clfswm-layout.lisp (fast-layout-switch)
847         (define-fast-layout-switch): New functions: Switch between two
848         layouts.
850         * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
851         really in the second mode. So leave-second-mode can be used even
852         in the main mode.
854         * src/clfswm-util.lisp (switch-to-last-child): New function:
855         Store the current child and switch to the previous one.
857 2008-07-16  Philippe Brochard  <pbrochard@common-lisp.net>
859         * src/clfswm-util.lisp (display-current-window-info): Display the
860         window id.
861         (have-to-present-virtual-keyboard): Add a virtual keyboard corner
862         (top right by default). By default 'xvkbd' is used.
864 2008-06-28  Philippe Brochard  <pbrochard@common-lisp.net>
866         * src/xlib-util.lisp (move-window, resize-window): Compress motion
867         events.
869         * src/clfswm.lisp (handle-motion-notify): Compress motion events.
871         * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
872         motion events.
874         * src/clfswm-info.lisp (info-mode): Compress motion events.
876 2008-06-21  Philippe Brochard  <pbrochard@common-lisp.net>
878         * src/clfswm-internal.lisp (show-all-children): Compute geometry
879         and selection first and then show only necessary children.
880         (show-child): remove unneeded display-p parameter.
882         * src/config.lisp (get-fullscreen-size): Place the frame border
883         outside the screen (this prevent the loose of 2 pixels per
884         directions :)
886 2008-06-12  Philippe Brochard  <pbrochard@common-lisp.net>
888         * src/clfswm-internal.lisp (focus-child): Algorithm change to
889         raise only the selected child.
891 2008-06-08  Philippe Brochard  <pbrochard@common-lisp.net>
893         * src/clfswm-internal.lisp (raise-p-list, show-all-children):
894         Raise only viewable children.
896 2008-06-06  Philippe Brochard  <pbrochard@common-lisp.net>
898         * src/clfswm-internal.lisp (show-all-children): Always raise all
899         displayed children. Remove all references to raise-p.
901 2008-06-04  Philippe Brochard  <pbrochard@common-lisp.net>
903         * src/menu-def.lisp (child-menu): New menu entry on raise/lower
904         child in its frame.
906         * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
907         second mode binding on raise/lower child in its frame.
909         * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
910         behaviour to the new raise/lower property.
911         Call clear-nw-hook before the rest of the hook.
913         * src/bindings.lisp (mouse-click-to-focus-and-move-window)
914         (mouse-click-to-focus-and-resize-window): Stop button event. This
915         prevent a keyboard/pointer freeze.
917 2008-06-03  Philippe Brochard  <pbrochard@common-lisp.net>
919         * src/clfswm-internal.lisp (frame-lower-child)
920         (frame-raise-child): New functions to raise/lower a child in its
921         frame.
923         * src/clfswm-util.lisp (have-to-present-windows)
924         (have-to-present-all-windows): New functions to have an MaxOS
925         expose like on mouse click in screen corner.
927         * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
929 2008-05-30  Philippe Brochard  <pbrochard@common-lisp.net>
931         * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
932         child from a choice in all frames with hidden children.
934         * src/clfswm-info.lisp (info-mode-menu): Handle separators.
936 2008-05-28  Philippe Brochard  <pbrochard@common-lisp.net>
938         * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
939         (unhide-all-children): New functions.
941         * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
942         functions.
944         * src/clfswm-util.lisp (hide/show-frame-window): new function and
945         menu item.
947 2008-05-23  Philippe Brochard  <pbrochard@common-lisp.net>
949         * src/clfswm-util.lisp (rename-current-child): Do not display the
950         frame info for a window.
952 2008-05-20  Philippe Brochard  <pbrochard@common-lisp.net>
954         * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
955         frame window for the removed child and its children.
957 2008-05-18  Philippe Brochard  <pbrochard@common-lisp.net>
959         * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
960         autodoc functions.
962 2008-05-17  Philippe Brochard  <pbrochard@common-lisp.net>
964         * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
965         the ROX pinboard (ie: leave it lowered in the root window as
966         expected).
968         * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
969         (tile-left-layout, tile-right-layout, tile-top-layout)
970         (tile-bottom-layout): Use all the frame space when there is only
971         one child.
973         * src/clfswm-internal.lisp (place-window-from-hints): Center
974         unmanaged windows in the root screen.
976         * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
977         new functions.
979 2008-05-15  Philippe Brochard  <pbrochard@common-lisp.net>
981         * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
982         typo in managed types.
984         * src/clfswm-internal.lisp (show-child): Always display frame info
985         even if the frame is hidden.
987         * src/xlib-util.lisp (resize-window): Use a better algorithme to
988         resize windows.
990 2008-05-13  Philippe Brochard  <pbrochard@common-lisp.net>
992         * src/clfswm-util.lisp (with-movement): Display frame info for all
993         frames in current root.
995 2008-05-12  Philippe Brochard  <pbrochard@common-lisp.net>
997         * src/*.lisp: Rename 'brother' frames to 'sister' frames.
999         * src/bindings-second-mode.lisp (define-second-key #\a): New
1000         binding on 'add-default-frame'.
1002         * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1003         message to follow the autodocumentation process.
1005 2008-05-10  Philippe Brochard  <pbrochard@common-lisp.net>
1007         * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1008         "Space" to jump to a child. "B" to bind a slot on the current
1009         child.
1011         * src/bindings-second-mode.lisp: Use "Tab" instead of
1012         "Iso_Left_Tab".
1014 2008-05-07  Philippe Brochard  <pbrochard@common-lisp.net>
1016         * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1017         unmanaged (hidden) windows.
1019         * src/clfswm-internal.lisp (place-window-from-hints): Give a
1020         minimal size for windows.
1021         (with-all-windows-frames-and-parent): New function.
1023         * src/config.lisp (*default-window-width/height*): New parameters.
1025         * src/clfswm-internal.lisp (place-window-from-hints): Center
1026         windows in the screen instead of in there frame.
1028         * src/bindings-second-mode.lisp (tile-space-current-frame): New
1029         binding on C-t.
1031         * src/clfswm-layout.lisp (register-layout): Intern the once name
1032         in the right package.
1034 2008-05-05  Philippe Brochard  <pbrochard@common-lisp.net>
1036         * doc/dot-clfswmrc: Update to  follow the new clfswm way.
1038 2008-05-03  Philippe Brochard  <pbrochard@common-lisp.net>
1040         * src/clfswm-internal.lisp (set-current-child)
1041         (adapt-child-to-parent, show-child, hide-child): Handle the case
1042         where child is not a frame or a window.
1044         * src/clfswm-util.lisp
1045         (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1046         Check if child is a frame.
1048         * src/clfswm-internal.lisp (managed-window-p): Handle the case
1049         where frame is null.
1050         (place-frame): Check if frame and parent are frames.
1052         * src/clfswm-info.lisp (info-mode): display all frame info before
1053         leaving.
1055         * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1056         info before leaving.
1058         * src/clfswm-internal.lisp (display-all-frame-info): New function.
1060 2008-05-02  Philippe Brochard  <pbrochard@common-lisp.net>
1062         * src/tools.lisp (getenv): Implemented for ECL.
1063         (urun-prog): Implemented for ECL.
1065         * src/clfswm-util.lisp (identify-key): Use a double buffer to
1066         display text.
1068         * src/clfswm-query.lisp (query-string): Use a double buffer to
1069         display text.
1071         * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1072         display text.
1074         * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1075         New functions.
1077 2008-05-01  Philippe Brochard  <pbrochard@common-lisp.net>
1079         * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1081         * src/menu-def.lisp: New file: move all menu definition in
1082         menu-def.lisp.
1084         * src/clfswm-layout.lisp (register-layout): Use a function instead
1085         of a macro.
1087 2008-04-30  Philippe Brochard  <pbrochard@common-lisp.net>
1089         * src/clfswm-autodoc.lisp (produce-menu-doc,
1090         (produce-menu-doc-html): New functions.
1091         (produce-doc-*): Moved to clfswm-autodoc.lisp.
1093         * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1094         paste a child on one of its own children. (this prevent a
1095         recursive bug).
1096         (move-child-to): Rename move/copy-current-child-by to
1097         move/copy-child-to.
1098         (mouse-move-window-over-frame): New function to move the window
1099         under the mouse cursor to another frame.
1101         * src/clfswm-internal.lisp (find-child-in-parent): New function.
1103 2008-04-29  Philippe Brochard  <pbrochard@common-lisp.net>
1105         * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1106         windows only when its window parent is the current child.
1108 2008-04-28  Philippe Brochard  <pbrochard@common-lisp.net>
1110         * src/clfswm-util.lisp (manage-current-window)
1111         (unmanage-current-window): New functions: Allow to force to manage
1112         or unmanage a window by its parent frame.
1114         * src/bindings-second-mode.lisp (#\o): binded to
1115         set-open-in-new-frame-in-parent-frame-nw-hook and
1116         (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1118         * src/clfswm-util.lisp (with-current-window): New macro.
1120         * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1121         exposure and enter-window handle event.
1123         * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1124         children for the current child after the move/resize.
1126 2008-04-27  Philippe Brochard  <pbrochard@common-lisp.net>
1128         * src/xlib-util.lisp (resize-window): Take care of window size
1129         hints.
1131         * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1132         move/resize unmanaged windows.
1134         * src/xlib-util.lisp (move-window, resize-window): New functions.
1136 2008-04-25  Philippe Brochard  <pbrochard@common-lisp.net>
1138         * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1139         user choose what window type the current frame must handle.
1140         (display-current-window-info): New function.
1141         (current-frame-manage-all-window-type)
1142         (current-frame-manage-only-normal-window-type)
1143         (current-frame-manage-no-window-type): New functions.
1145         * src/clfswm-internal.lisp (managed-window-p): New function.
1147         * src/package.lisp (frame): Managed type: new frame
1148         parameter. This allow to choose what window type a frame must
1149         handle.
1151         * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1153         * src/clfswm-nw-hooks.lisp
1154         (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1156         * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1157         function.
1159         * src/tools.lisp (ensure-printable): Return always a string even
1160         with a null string.
1162 2008-04-24  Philippe Brochard  <pbrochard@common-lisp.net>
1164         * src/config.lisp (*default-nw-hook*): New variable to change the
1165         default new window hook.
1167 2008-04-22  Philippe Brochard  <pbrochard@common-lisp.net>
1169         * clfswm.asd (clfswm): Add a dependency from
1170         clfswm-second-mode.lisp to clfswm.lisp.
1172         * src/clfswm-util.lisp (identify-key): Show the documentation for
1173         the function bound on a key.
1174         (with-movement): Move with-movement,
1175         current-frame-fill/pack/resize-*  from bindings-second-mode.lisp
1176         to clfswm-util.lisp.
1178         * src/clfswm-menu.lisp: New menu system that let user change keys
1179         or functions associated to keys.
1181 2008-04-18  Philippe Brochard  <pbrochard@common-lisp.net>
1183         * src/clfswm-internal.lisp (show-all-children): Display-child is
1184         the first child by default. Solve a bug with father-p.
1186 2008-04-17  Philippe Brochard  <pbrochard@common-lisp.net>
1188         * src/clfswm-internal.lisp (add-frame): Add frame return the
1189         created frame.
1190         (show-all-children): Move the size computation outside the
1191         show-child part.
1193         * src/bindings-second-mode.lisp (with-movement): Redisplay only
1194         the current child.
1196         * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1197         only the current child.
1199         * src/clfswm-internal.lisp (show-all-children): New display-child
1200         parameter to display only the desired child and its children.
1201         (select-next/previous-child): Only display the current child.
1203 2008-04-14  Philippe Brochard  <pbrochard@common-lisp.net>
1205         * src/clfswm.lisp (init-display): Move the default frame creation
1206         on the default init hook.
1208         * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1209         the main mode (for example: "1" on an azerty keyboard).
1211 2008-04-13  Philippe Brochard  <pbrochard@common-lisp.net>
1213         * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1214         keysyms. Revert to old grabbing method for the main mode.
1216 2008-04-12  Philippe Brochard  <pbrochard@common-lisp.net>
1218         * src/clfswm.lisp (init-display): Add key handling on no focus
1219         window and on frame windows.
1221 2008-04-11  Philippe Brochard  <pbrochard@common-lisp.net>
1223         * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1224         all keys by default and replay just what is needed. No change for
1225         the second mode.
1227         * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1228         (find-key-from-code): Test for shift and not shift presence.
1230 2008-04-09  Philippe Brochard  <pbrochard@common-lisp.net>
1232         * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1233         new key parameter to have less flickering.
1235 2008-04-07  Philippe Brochard  <pbrochard@common-lisp.net>
1237         * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1238         layout only one time and revert to no-layout to freely handle
1239         frames.
1241         * src/clfswm-nw-hooks.lisp
1242         (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1243         with new created window.
1245         * src/clfswm-layout.lisp (register-layout): Now register
1246         automatically a once layout to set the layout only one time and
1247         revert to no-layout to freely handle frames.
1249 2008-04-05  Philippe Brochard  <pbrochard@common-lisp.net>
1251         * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1252         nw-hook: Open the next window in the current frame and leave the
1253         focus to the current child.
1255 2008-04-04  Philippe Brochard  <pbrochard@common-lisp.net>
1257         * src/bindings-second-mode.lisp: Add keys definitions to
1258         bind-or-jump in the second mode.
1260         * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
1261         macro for bind-or-jump-(1|2|3...).
1263         * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
1264         arguments to function. This allow to do things like:
1265         (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
1266         are passed to my-function on key press.
1268 2008-04-03  Philippe Brochard  <pbrochard@common-lisp.net>
1270         * src/clfswm-util.lisp (bind-or-jump): New (great) function.
1272 2008-04-02  Philippe Brochard  <pbrochard@common-lisp.net>
1274         * src/clfswm-internal.lisp (child-fullname): New function
1276         * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
1277         docstring in info-mode-menu. An item can be
1278         '((key function) (key function)) or with docstring
1279         '((key function "documentation 1") (key function "bla bla") (key function))
1281         * src/tools.lisp (ensure-n-elems): New function.
1283         * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
1284         resize a frame or the window's father.
1286         * src/clfswm.lisp (init-display): Remove tile-space-layout by
1287         default on the root frame.
1289         * src/clfswm-util.lisp (move/resize-frame): Add standard event
1290         hooks handlers (map-request, configure-notify...)
1292         * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
1293         child size to 1x1.
1295 2008-04-01  Philippe Brochard  <pbrochard@common-lisp.net>
1297         * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
1298         or the window's father.
1300         * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
1301         event only if there is a geometry change.
1302         (mouse-focus-move/resize-generic): Generic function to move or
1303         resize a frame or a window father frame.
1305 2008-04-01  Philippe Brochard  <pbrochard@common-lisp.net>
1307         * src/clfswm-internal.lisp (show-all-children): Return t if there
1308         is a geometry change.
1310 2008-03-30  Philippe Brochard  <pbrochard@common-lisp.net>
1312         * src/bindings.lisp (Up/Down): Swap select previous/next level.
1314         * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
1316         * src/clfswm.lisp (init-display): Create a default frame in the root frame.
1318         * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
1319         (with-all-*): Reverse the child list to manage the first child last (like in
1320         show-all-children).
1322         * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
1323         root window only if true.
1325         * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
1326         root window only if *create-frame-on-root* is true.
1328         * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
1329         on the root window.
1331 2008-03-29  Philippe Brochard  <pbrochard@common-lisp.net>
1333         * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
1334         the current child (even if it's a window).
1336 2008-03-28  Philippe Brochard  <pbrochard@common-lisp.net>
1338         * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
1339         (mouse-click-to-focus-and-resize): New functions.
1341         * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
1342         (*-px->fl): Convert pixel coordinates to float.
1344         * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
1346 2008-03-27  Philippe Brochard  <pbrochard@common-lisp.net>
1348         * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
1349         first child.
1351         * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
1352         and hide-all-children.
1353         (raise-if-needed): New function.
1354         (show-child): Use a first-p parameter to raise windows only when they are
1355         first child.
1357 2008-03-26  Philippe Brochard  <pbrochard@common-lisp.net>
1359         * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
1360         -> less flickering.
1362 2008-03-25  Philippe Brochard  <pbrochard@common-lisp.net>
1364         * src/clfswm-info.lisp (keys-from-list): new function.
1366         * src/*: rename 'childs' in 'children'.
1368         * src/*: rename 'group' in 'frame'.
1370 2008-03-22  Philippe Brochard  <pbrochard@common-lisp.net>
1372         * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
1374 2008-03-21  Philippe Brochard  <pbrochard@common-lisp.net>
1376         * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
1378 2008-03-16  Philippe Brochard  <pbrochard@common-lisp.net>
1380         * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
1381         Bind control+o to open the next window in a new group in the root group
1382          (as open in next window in a new workspace in 0801 version).
1384 2008-03-15  Philippe Brochard  <pbrochard@common-lisp.net>
1386         * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
1387         window.
1389 2008-03-14  Philippe Brochard  <pbrochard@common-lisp.net>
1391         * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
1392         instead of Tab for select-previous-child.
1394 2008-03-13  Philippe Brochard  <pbrochard@common-lisp.net>
1396         * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
1397         new functions.
1399 2008-03-11  Philippe Brochard  <pbrochard@common-lisp.net>
1401         * clfswm-util.lisp (identify-key): Display the documentation
1402         associated to keys when identifying a key.
1404 2008-03-10  Xavier Maillard  <xma@gnu.org>
1406         * contrib/clfswm: Complete rewrite of the script. Detect error and
1407         act accordingly. Add command line arguments to configure the
1408         script execution. User can now choose different common lisp
1409         implementation (clisp and sbcl only), choose where to store the
1410         dumped image, where to find clfswm source.
1412 2008-03-09  Philippe Brochard  <pbrochard@common-lisp.net>
1414         * clfswm-internal.lisp (process-new-window): Beginning of new
1415         window hook: each group have a hook to tell what he wants to do
1416         with the new created window.
1418 2008-03-08  Xavier Maillard  <xma@gnu.org>
1420         * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
1421         call the resulting executable.
1423         * clfswm.lisp (read-conf-file): Check for the user config file in
1424         XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
1425         prefered whenever possible.
1427 2008-02-27  Philippe Brochard  <pbrochard@common-lisp.net>
1429         * clfswm-layout.lisp (*-layout): Add an optional raise-p
1430         parameter in each layout.
1432 2008-02-26  Philippe Brochard  <pbrochard@common-lisp.net>
1434         * clfswm-util.lisp (copy/cut-current-child): Does not affect the
1435         root group.
1436         (copy/move-current-child-by-name/number): new functions
1437         (focus-group-by-name/number): new functions
1438         (delete-group-by-name/number): new functions
1440 2008-02-24  Philippe Brochard  <pbrochard@common-lisp.net>
1442         * ************************************************************ *
1443         *: Major update - No more reference  to workspaces. The main   *
1444         structure is a tree of groups or application windows.          *
1445         * ************************************************************ *
1447 2008-02-07  Philippe Brochard  <pbrochard@common-lisp.net>
1449         * clfswm.lisp (read-conf-file): Read configuration in
1450         $HOME/.clfswmrc or in /etc/clfswmrc or in
1451         $XDG_CONFIG_HOME/clfswm/clfswmrc.
1452         (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
1453         to $HOME/.config/).
1455 2008-01-18  Philippe Brochard  <pbrochard@common-lisp.net>
1457         * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
1458         by default.
1460 2008-01-03  Philippe Brochard  <pbrochard@common-lisp.net>
1462         * clfswm-internal.lisp (find-window-group): New function.
1464         * clfswm*: Change to make clfswm run with clisp/new-clx.
1466 2008-01-01  Philippe Brochard  <pbrochard@common-lisp.net>
1468         * clfswm-util.lisp (query-show-paren): Add show parent matching in
1469         query string.
1470         (query-string): Bind control+k to delete end of line.
1472         * clfswm-second-mode.lisp (draw-second-mode-window): Display
1473         the action on mouse motion in second mode.
1475         * clfswm.lisp (handle-exposure): Redisplay groups on exposure
1476         event but do not clear the root window.
1477         (handle-configure-request): Adjust unmanaged window from there
1478         request.
1480         * clfswm-internal.lisp (process-new-window): Adjust new window
1481         with the specified hints (max/min/base width/height).
1483 2007-12-31  Philippe Brochard  <pbrochard@common-lisp.net>
1485         * clfswm.lisp (handle-configure-request): Send an Configuration
1486         Notify event. This solve a bug with xterm and rxvt who takes some
1487         times to be mapped. Now there is no delay.
1489         * bindings-second-mode.lisp (define-shell): Run programs after
1490         living the second mode.
1492 2007-12-30  Philippe Brochard  <pbrochard@common-lisp.net>
1494         * clfswm-internal.lisp (process-new-window): Do not crop transient
1495         window to group size.
1496         (adapt-window-to-group): Do not crop transient window to group
1497         size.
1499         * clfswm.lisp (handle-configure-request): Adapt just the window to
1500         its group and don't take care of the configure request. Remove the
1501         bug with the Gimp outside the group and speed up the window
1502         manipulation.
1503         (handle-exposure): Remove show-all-group on exposure event
1504         -> Speed up.
1506 2007-12-29  Philippe Brochard  <pbrochard@common-lisp.net>
1508         * clfswm-util.lisp (circulate-group-up-copy-window)
1509         (circulate-group-down-copy-window)
1510         (circulate-workspace-up-copy-group)
1511         (circulate-workspace-down-copy-group): Prevent the copy of the
1512         same window in the same workspace.
1514         * bindings-second-mode.lisp (release-copy-selected-window)
1515         (release-copy-selected-group): Prevent the copy of the same window
1516         in the same workspace.
1518         * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
1519         (generic-pager-move-window-on-next-line): Remove the copy
1520         property.
1521         (generic-pager-move-group-on-next-workspace)
1522         (generic-pager-move-group-on-previous-workspace): Prevent the copy
1523         of the same window in the same workspace.
1525         * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
1526         (mouse-pager-copy-selected-group-release): Prevent the copy of the
1527         same window in the same workspace.
1529         * tools.lisp (setf/=): new macro to set a variable only when
1530         necessary.
1532         * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
1533         x, y... only when necessary.
1535 2007-12-28  Philippe Brochard  <pbrochard@common-lisp.net>
1537         * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
1538         new function and hook: force windows to stay in its group (solve a
1539         bug with the Gimp).
1541 2007-12-25  Philippe Brochard  <pbrochard@common-lisp.net>
1543         * bindings-second-mode.lisp (mouse-motion): use hide-group to have
1544         less flickering when moving/resizing groups.
1546         * clfswm-internal.lisp (hide-group): new function.
1547         (show-all-group): clear-all: new parameter.
1549 2007-12-22  Philippe Brochard  <pbrochard@common-lisp.net>
1551         * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
1552         macro.
1553         * clfswm*: Color change for the pager. Typo or better description
1554         in bindings definitions. Define bindings for a qwerty keyboard by
1555         default. dot-clfswmrc show examples to switch to an azerty
1556         keyboard.
1557         License change to GPL v3.
1558         * config.lisp: new file - group all globals variables in this
1559         file.
1561 2007-08-26  Philippe Brochard  <pbrochard@common-lisp.net>
1563         * xlib-util.lisp (hide-window): Remove structure-notivy events
1564         when hidding a window.
1566 2007-05-16  Philippe Brochard  <pbrochard@common-lisp.net>
1568         * package.lisp (*sm-property-notify-hook*): Readded
1569         property-notify-hook in second mode.
1571 2007-05-15  Philippe Brochard  <pbrochard@common-lisp.net>
1573         * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
1575 2007-05-13  Philippe Brochard  <pbrochard@common-lisp.net>
1577         * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
1578         Tile the current workspace with the current window on one side and
1579         others on the other (this emulate the larswm, dwm, wmii way). See
1580         the default configuration file to enable this mode by default.
1582         * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
1583         the pager.
1585 2007-05-12  Philippe Brochard  <pbrochard@common-lisp.net>
1587         * clfswm-pager.lisp (pager-draw-window-in-group): Add
1588         ensure-printable to print windows name even with non-ascii
1589         characters.
1591 2007-05-11  Philippe Brochard  <pbrochard@common-lisp.net>
1593         * clfswm-pager.lisp (pager-explode-current-group): Create a new
1594         group for each window in group.
1595         (pager-implode-current-group): Move all windows in workspace to
1596         one group and remove other groups.
1598         * clfswm-pack.lisp (explode-group): Create a new group for each
1599         window in group.
1600         (implode-group): Move all windows in workspace to one group and
1601         remove other groups.
1603         * clfswm-util.lisp (identify-key): Remove local configuration
1604         variables and made them available for configuration from
1605         package.lisp.
1606         (query-string): idem.
1608 2007-04-29  Philippe Brochard  <pbrochard@common-lisp.net>
1610         * netwm-util.lisp: Start of NetWM compliance.
1611         Add a Netwm client list gestion.
1613 2007-04-28  Philippe Brochard  <pbrochard@common-lisp.net>
1615         * clfswm-internal.lisp (create-group-on-request): open a new group
1616         only when the current group is not empty.
1618         * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
1619         bug with null workspace.
1621         * clfswm-pager.lisp (pager-handle-event): Add a hook
1622         system. This hooks can be changed in the user configuration file.
1624         * package.lisp: All colors and font variables are set in
1625         package.lisp and can be configured in the user configuration
1626         file.
1627         Note: If you have configured some less ugly colors (esp. for the
1628         pager) don't hesitate to let me know :)
1630         * clfswm-second-mode.lisp (sm-handle-event): Add a hook
1631         system. This hooks can be changed in the user configuration file.
1633         * clfswm.lisp (handle-event): Add a hook system. This hooks can be
1634         changed in the user configuration file (~/.clfswmrc)
1636 2007-04-25  Philippe Brochard  <pbrochard@common-lisp.net>
1638         * clfswm-util.lisp (stop-all-pending-actions): new function: reset
1639         arrow action, open next window in new workspace/group.
1641         * bindings.lisp (stop-all-pending-actions): new binding.
1642         (open-next-window-in-new-group-once): Open the next windows in a
1643         new group (only once) or open all new windows in a new group (like
1644         others windows managers).
1646 2007-04-22  Philippe Brochard  <pbrochard@common-lisp.net>
1648         * clfswm.lisp (read-conf-file): New function to read a lisp
1649         configuration file at startup.
1650         (focus-group-under-mouse): Check if group isn't the current group
1651         ( prevent a bug with unclutter ).
1653 2007-03-02  Philippe Brochard  <pbrochard@common-lisp.net>
1655         * bindings.lisp (run-program-from-query-string): A program can be
1656         launch from a input query window.
1658 2007-03-01  Philippe Brochard  <pbrochard@common-lisp.net>
1660         * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
1662 2007-02-28  Philippe Brochard  <pbrochard@common-lisp.net>
1664         * clfswm.lisp (process-new-window): One can now open the next
1665         window in a workspace called by its number.
1667         * clfswm-util.lisp (query-font-string): Minimal editing
1668         capabilities.
1669         (eval-from-string): And an REPL in the window manager... :)
1671 2007-02-26  Philippe Brochard  <pbrochard@common-lisp.net>
1673         * clfswm.lisp (process-new-window): One can now open the next
1674         window in a new workspace or a new group.
1676         * clfswm-pager.lisp (pager-mode): Display the next arrow action
1677         with the hidden windows.
1679         * clfswm.lisp (second-key-mode): Display the current workspace
1680         number and the next arrow action in the state window.
1682         * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
1683         the pager mode and then redisplay only the current workspace.
1685 2007-02-25  Philippe Brochard  <pbrochard@common-lisp.net>
1687         * clfswm.lisp (add-workspace): Workspaces are now numbered. So
1688         they can be focused with a keypress, sorted or renumbered.
1690 2007-02-24  Philippe Brochard  <pbrochard@common-lisp.net>
1692         * clfswm-pager.lisp (pager-mode): Remove multiple silly
1693         pager-draw-display. This prevent a lot of flickering in the
1694         pager.
1696         * clfswm.lisp: Remove all display-force-output and replace them
1697         with only one display-finish-output in the event loop.
1699 2006-11-06  Philippe Brochard  <pbrochard@common-lisp.net>
1701         * clfswm-pager.lisp (pager-center-group): New function - center a
1702         group at the middle of the screen.
1704         * clfswm-pack.lisp (center-group): New function - center a group
1705         at the middle of the screen.
1707         * clfswm.lisp (show-group): Add a cross line under the group.
1708         (show-group): Group are showned even if fullscreened.
1709         (init-display): Add an exposure event on the root window.
1711 2006-11-05  Philippe Brochard  <pbrochard@common-lisp.net>
1713         * package.lisp (*default-group*): Default group is the same size
1714         of a fullscreened group.
1716         * bindings*: Use shift to move, control+shift to copy.
1718         * *.lisp: Add comments for configuration or alternatives. So grep
1719         for CONFIG to see where you can configure clfswm. And grep for
1720         Alternative to use some commented code.
1722         * clfswm.lisp (second-key-mode): Use a single window to show the
1723         second mode. See for alternatives at the end of this file.
1725 2006-11-03  Philippe Brochard  <pbrochard@common-lisp.net>
1727         * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
1728         macro of key and mouse definitions.
1729         (define-define-key/mouse): Use state instead of modifiers list
1730         this fix a bug when the modifiers list is not in the rigth order.
1732         * clfswm.lisp (second-key-mode): Add a colored border in second mode.
1734 2006-11-02  Philippe Brochard  <pbrochard@common-lisp.net>
1736         * clfswm-info.lisp (info-mode): Add an info mode.
1738 2006-11-01  Philippe Brochard  <pbrochard@common-lisp.net>
1740         * clfswm.lisp (process-new-window): Change border size for
1741         transient windows.
1742         (show-all-windows-in-workspace): Unhide all windows even when the
1743         current group is in fullscreen mode.
1745 2006-10-26  Philippe Brochard  <pbrochard@common-lisp.net>
1747         * clfswm-util.lisp (identify-key): Add an exposure handle-event to
1748         redisplay the identify window after a terminal switch.
1750         * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
1751         redisplay the pager after a terminal switch.
1753 2006-10-24  Philippe Brochard  <pbrochard@common-lisp.net>
1755         * clfswm-util.lisp (identify-key): Add a window to display
1756         the keys to identify on screen.
1758         * bindings.lisp, bindings-pager.lisp: Define same keys to
1759         move/copy groups/windows in second mode and in pager.
1761         * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
1762         drawing lags).
1763         (show-all-windows-in-workspace): unhide window before adapting it
1764         to group.
1766 2006-10-23  Philippe Brochard  <pbrochard@common-lisp.net>
1768         * clfswm.lisp (handle-event): Revert to an older version.
1770 2006-10-18  Philippe Brochard  <pbrochard@common-lisp.net>
1772         * clfswm-util.lisp (force-window-in-group)
1773         (force-window-center-in-group): New functions for transient windows.
1775         * clfswm-pager.lisp (pager-remove-current-workspace/group):
1776         bugfix: hide all windows before removing group or workspace.
1778 2006-10-17  Philippe Brochard  <pbrochard@common-lisp.net>
1780         * bindings-pager.lisp (mouse-pager-move-selected-group)
1781         (mouse-pager-copy-selected-group)
1782         (mouse-pager-move-selected-window)
1783         (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
1784         (mouse-pager-rotate-window-down): New functions to have mouse in
1785         pager mode.
1787         * clfswm-pager.lisp (pager-swap-window)
1788         (pager-copy-group-on-next/previous-workspace)
1789         (pager-copy-window-on-next/previous-line): New functions
1791 2006-10-15  Philippe Brochard  <pbrochard@common-lisp.net>
1793         * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
1794         (pager-move-group-on-next/previous-workspace): new functions.
1796         * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
1797         to its half size (new functions).
1799 2006-10-11  Philippe Brochard  <pbrochard@common-lisp.net>
1801         * clfswm-pager.lisp: workspaces, groups and windows can now be
1802         selectionned with the keyboard or the mouse.
1804 2006-10-09  Philippe Brochard  <pbrochard@common-lisp.net>
1806         * clfswm-pager.lisp (pager-select-workspace-right/left):
1807         workspaces can now be selectionned with the keyboard.
1809 2006-10-08  Philippe Brochard  <pbrochard@common-lisp.net>
1811         * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
1812         new function to remove a previous defined key or mouse combination.
1814 2006-10-07  Philippe Brochard  <pbrochard@common-lisp.net>
1816         * clfswm.lisp (main): Check for access error in init-display.
1818         * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
1819         keycode before grabbing.
1821         * bindings.lisp: Remove nlambda and use defun to keep the function
1822         documentation with clisp.
1823         (define-shell): new macro to define shell command for the second
1824         mode.
1826 2006-10-06  Philippe Brochard  <pbrochard@common-lisp.net>
1828         * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
1829         boggus typecase.
1831 2006-10-05  Philippe Brochard  <pbrochard@common-lisp.net>
1833         * bindings.lisp (accept-motion): Move group bugfix in upper mouse
1834         workspace circulation.
1836         * clfswm-util.lisp (absorb-orphan-window): new function.
1838         * clfswm-keys.lisp: Keysyms support.
1840 2006-10-02  Philippe Brochard  <pbrochard@common-lisp.net>
1842         * clfswm.lisp (show-group): Use one gc for all groups and not one
1843         per group.
1845 2006-10-01  Philippe Brochard  <pbrochard@common-lisp.net>
1847         * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
1849         * clfswm.lisp (adapt-window-to-group): Adapt only windows with
1850         width and height outside group.
1852 2006-09-28  Philippe Brochard  <pbrochard@common-lisp.net>
1854         * clfswm.lisp: First public release.