src/clfswm-second-mode.lisp (sm-leave-function): Do not use *second-mode-program...
[clfswm.git] / ChangeLog
blob953e6df3929ef90db0da59fe7a27824a7b2ae481
1 2010-12-08  Philippe Brochard  <pbrochard@common-lisp.net>
3         * src/clfswm-second-mode.lisp (sm-leave-function): Do not use
4         *second-mode-program* anymore.
6 2010-12-07  Philippe Brochard  <pbrochard@common-lisp.net>
8         * src/clfswm-second-mode.lisp (*second-mode-leave-function*): New
9         variable bound to a function executed (when not null) on second
10         mode leaving.
12 2010-11-14  Philippe Brochard  <pbrochard@common-lisp.net>
14         * src/clfswm-util.lisp (find-child-under-mouse): Do not find
15         hidden windows.
17 2010-11-13  Philippe Brochard  <pbrochard@common-lisp.net>
19         * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
20         Do not display the accel window for unmanaged windows.
22 2010-11-11  Philippe Brochard  <pbrochard@common-lisp.net>
24         * src/clfswm-internal.lisp (set-current-root): Handle
25         window-parent in set-current-root.
27         * src/clfswm-util.lisp (mouse-click-to-focus-generic): Do not
28         focus the parent child when the current root is a window.
30 2010-11-09  Philippe Brochard  <pbrochard@common-lisp.net>
32         * src/clfswm-expose-mode.lisp (expose-windows-current-child-mode):
33         New function an bindings.
35         * src/clfswm-layout.lisp (tile-layout, set-tile-layout): Fill
36         blanks if needed.
38 2010-11-07  Philippe Brochard  <pbrochard@common-lisp.net>
40         * src/clfswm-layout.lisp (tile-layout-ask-keep-position): New
41         function to let the user choose to keep child position with
42         tile layout.
44         * src/clfswm-internal.lisp (remove-frame-data-slot): New
45         function.
47 2010-11-05  Philippe Brochard  <pbrochard@common-lisp.net>
49         * src/clfswm-internal.lisp (frame-select-next-child)
50         (frame-select-previous-child): New functions and bindings. Select
51         the next/previous child in the current frame.
53 2010-10-31  Philippe Brochard  <pbrochard@common-lisp.net>
55         * src/clfswm-query.lisp (query-mode-complet): New function: Handle
56         completion in query-mode.
58 2010-10-30  Philippe Brochard  <pbrochard@common-lisp.net>
60         * src/clfswm-query.lisp (query-print-string): Handle long lines
61         correctly.
63 2010-10-27  Philippe Brochard  <pbrochard@common-lisp.net>
65         * src/clfswm-expose-mode.lisp (expose-create-window): Ensure that
66         all characters are printable.
68 2010-10-25  Philippe Brochard  <pbrochard@common-lisp.net>
70         * contrib/server/server.lisp: Load clfswm client code in the main
71         program and let the user start it with a --client command line
72         option.
74         * src/package.lisp (*main-entrance-hook*): New hook executed after
75         loading configuration file and before opening the display.
77 2010-10-23  Philippe Brochard  <pbrochard@common-lisp.net>
79         * src/xlib-util.lisp: Remove unnecessary xlib:display-finish-output.
81         * src/clfswm-internal.lisp (show-child): Show window only if not
82         hidden.
84         * src/clfswm-keys.lisp (binding-substitute-modifier): Utility to
85         change modifiers after binding definition.
87 2010-10-21  Philippe Brochard  <pbrochard@common-lisp.net>
89         * contrib/osd.lisp: New file: OSD (On Screen Display) for
90         presentations.
92         * src/clfswm-menu.lisp (open-menu): Modularise function.
94 2010-10-13  Philippe Brochard  <pbrochard@common-lisp.net>
96         * src/clfswm-info.lisp (show-first-aid-kit): Display the essential
97         key binding in main and second mode.
99 2010-10-10  Philippe Brochard  <pbrochard@common-lisp.net>
101         * src/clfswm-util.lisp (open-notify-window): Convert hello-window
102         functions to a more generic Notify-window system.
104         * src/tools.lisp (add-timer): Add an id to identify the timer.
106 2010-10-09  Philippe Brochard  <pbrochard@common-lisp.net>
108         * src/tools.lisp (erase-timer): New function.
110         * src/clfswm-util.lisp (display-hello-window): Add a timer to hide
111         the hello window. Add Configuration variables.
113 2010-10-08  Philippe Brochard  <pbrochard@common-lisp.net>
115         * src/clfswm-util.lisp (): Add an Hello window at startup.
117         * src/tools.lisp (process-timers): Add a timer system.
119 2010-10-07  Philippe Brochard  <pbrochard@common-lisp.net>
121         * src/clfswm-query.lisp (add-in-query-string): Handle correctly
122         the mod-5 modifier.
124 2010-10-06  Philippe Brochard  <pbrochard@common-lisp.net>
126         * src/clfswm-query.lisp (query-print-string): Change cursor color
127         and show parenthesis matching with colors (on match and on
128         errors).
130 2010-10-05  Philippe Brochard  <pbrochard@common-lisp.net>
132         * src/clfswm-internal.lisp (show-all-children): Do not raise a
133         child when its parent is hidden.
135 2010-10-02  Philippe Brochard  <pbrochard@common-lisp.net>
137         * src/clfswm-circulate-mode.lisp (select-next-subchild): Add the
138         possibility to circulate over subchild of the current child.
140         * src/clfswm-expose-mode.lisp (expose-all-windows-mode)
141         (expose-windows-generic): Add an escape-body function to return to
142         the original state on escape key.
144         * src/clfswm-util.lisp (bind-on-slot): Add an optional parameter
145         to bind the current child from the configuration file.
147 2010-10-01  Philippe Brochard  <pbrochard@common-lisp.net>
149         * src/clfswm-nw-hooks.lisp (absorb-window-nw-hook): Absorb new
150         window hook: the frame absorb all new windows that match
151         nw-absorb-test frame data slot.
153 2010-09-30  Philippe Brochard  <pbrochard@common-lisp.net>
155         * src/clfswm-expose-mode.lisp (expose-create-window): Show window
156         title in accel window.
158 2010-09-29  Philippe Brochard  <pbrochard@common-lisp.net>
160         * configure: Use the Xavier Maillard clfswm script in contrib to
161         build an executable in the standard way.
163 2010-09-26  Philippe Brochard  <pbrochard@common-lisp.net>
165         * src/clfswm-expose-mode.lisp (expose-mode-display-accel-windows):
166         New functions. Add a window on each child in the expose mode to
167         quickly select them.
169         * src/clfswm-internal.lisp (child-x, child-y, child-width)
170         (child-height): New methods to get real child coordinates.
172 2010-09-25  Philippe Brochard  <pbrochard@common-lisp.net>
174         * src/clfswm-layout.lisp (*-layout): Use child-position.
176         * src/clfswm-internal.lisp (child-position): New function.
178         * src/clfswm-expose-mode.lisp (expose-windows-mode)
179         (expose-all-windows-mode): Use a generic mode.
181         * src/xlib-util.lisp (with-handle-event-symbol): Use a filled list
182         with handle-event-fun symbols instead of inspecting clfswm
183         internals symbols on each mode change.
185         * src/clfswm-expose-mode.lisp: Move and rename present*-windows in
186         a separate clfswm-expose-mode.lisp file.
188         * src/clfswm-util.lisp (speed-mouse-right, speed-mouse-down): Use
189         screen size instead of hardcoded test coordinates.
191 2010-09-24  Philippe Brochard  <pbrochard@common-lisp.net>
193         * src/clfswm-util.lisp (speed-mouse-reset, speed-mouse-left)
194         (speed-mouse-right, speed-mouse-up, speed-mouse-down)
195         (speed-mouse-undo, speed-mouse-first-history): New functions to
196         quickly move the mouse. Implemented for the second mode.
198 2010-09-16  Philippe Brochard  <pbrochard@common-lisp.net>
200         * contrib/clfswm: Move clfswm sources to $tmp_dir if there is no
201         write permission on $clfswm_asd_path. So anybody can start clfswm
202         even if there is no write permission on the source directory.
204 2010-09-12  Philippe Brochard  <pbrochard@common-lisp.net>
206         * contrib/clfswm: Add support to cmucl, ccl and ecl.
208 2010-09-11  Philippe Brochard  <pbrochard@common-lisp.net>
210         * src/clfswm-util.lisp (set-hide-unmanaged-window)
211         (set-show-unmanaged-window, set-default-hide-unmanaged-window):
212         New functions and menu entry.
213         (set-globally-hide-unmanaged-window)
214         (set-globally-show-unmanaged-window): New functions and menu
215         entry.
217         * src/clfswm-internal.lisp (hide-unmanager-window-p): New
218         function.
219         (show-child): Add a data slot on frame to hide or not unmanaged
220         windows.
222         * src/clfswm-corner.lisp (present-clfswm-terminal)
223         (present-virtual-keyboard): Use a function (generic-present-body)
224         instead of a macro (generate-present-body).
226         * src/clfswm-util.lisp (update-menus): List all directories and
227         subdirectories in $XDG_DATA_DIRS/applications.
229 2010-09-10  Philippe Brochard  <pbrochard@common-lisp.net>
231         * src/clfswm-corner.lisp (generate-present-body): New macro.
232         (present-clfswm-terminal, present-virtual-keyboard): Use
233         generate-present-body.
235 2010-09-09  Philippe Brochard  <pbrochard@common-lisp.net>
237         * src/clfswm-util.lisp (update-menus): Follow XDG specifications
238         instead of the non-portable Debian update-menu.
240 2010-09-07  Philippe Brochard  <pbrochard@common-lisp.net>
242         * src/clfswm.lisp (error-handler): New function do handle
243         asynchronous errors and ignore them.
244         (open-display): Install the new error-handler on display.
246 2010-09-05  Philippe Brochard  <pbrochard@common-lisp.net>
248         * src/xlib-util.lisp (with-xlib-protect): Add a
249         with-simple-restart on top of body execution.
251 2010-09-04  Philippe Brochard  <pbrochard@common-lisp.net>
253         * src/clfswm.lisp (main-loop): Protect all xlib functions with an
254         with-xlib-protect.
256         * src/xlib-util.lisp (handle-event): use with-xlib-protect only in
257         handle-event. Add a with-simple-restart to prevent a
258         clisp/new-lisp infinite loop.
260 2010-08-30  Philippe Brochard  <pbrochard@common-lisp.net>
262         * src/clfswm-corner.lisp (present-clfswm-terminal): Make the
263         clfswm terminal working even on xterm title changes.
265 2010-08-29  Philippe Brochard  <pbrochard@common-lisp.net>
267         * src/clfswm-util.lisp (run-other-window-manager): Update for
268         clisp compatibility.
270         * src/tools.lisp (do-execute): New parameter io to change the
271         input/output method.
273         * src/clfswm-util.lisp (hide-current-child): Prevent from removing
274         the current root.
276         * src/clfswm-internal.lisp (child-member): New predicate.
277         (child-remove): New function.
279         * src/*.lisp: Use child-member and child-remove everywhere it's
280         needed.
282 2010-08-28  Philippe Brochard  <pbrochard@common-lisp.net>
284         * src/clfswm.lisp (main-loop): Ensure that all events have been
285         processed after a process-event.
287         * src/clfswm-internal.lisp (is-in-current-child-p): New function.
289 2010-08-27  Philippe Brochard  <pbrochard@common-lisp.net>
291         * src/clfswm.lisp (main-mode:configure-request): Raise the window
292         only when present on the current child and focus it accordingly.
294 2010-08-26  Philippe Brochard  <pbrochard@common-lisp.net>
296         * src/clfswm-circulate-mode.lisp (circulate-loop-function):
297         Use is-a-key-pressed-p.
299         * src/xlib-util.lisp (is-a-key-pressed-p): New predicate.
301         * src/clfswm-keys.lisp (define-ungrab/grab): Use all values
302         returned by xlib:keysym->keycodes.
304         * src/*.lisp: Use the new child-equal-p to compare children. This
305         prevent a bug with sbcl/cmucl when the standard equal function
306         does not work with xlib:window.
308         * src/clfswm-internal.lisp (child-equal-p): New predicate.
310 2010-08-25  Philippe Brochard  <pbrochard@common-lisp.net>
312         * src/clfswm-generic-mode.lisp (generic-mode): Use an
313         xlib:event-listen before processing event with
314         xlib:process-event. This prevent a bug with CLX threaded
315         implementation like sbcl.
317         * src/clfswm.lisp (main-loop): Use an xlib:event-listen before
318         processing event with xlib:process-event. This prevent a bug with
319         CLX threaded implementation like sbcl.
321 2010-08-17  Philippe Brochard  <pbrochard@common-lisp.net>
323         * contrib/server/key.lisp (ushell-sh): Add ccl and ecl support.
325         * src/xlib-util.lisp (compress-motion-notify): Use a loop instead
326         of an event-case.
328         * src/clfswm-internal.lisp (with-find-in-all-frames): New macro.
329         (find-parent-frame, find-frame-window, find-frame-by-name)
330         (find-frame-by-number): Use with-find-in-all-frames to search in
331         frames in the right order.
333         * src/clfswm-util.lisp (mouse-click-to-focus-generic): Fix an
334         unwanted flickering with unmanaged windows.
336 2010-08-16  Philippe Brochard  <pbrochard@common-lisp.net>
338         * src/package.lisp: Remove event handler hooks as they're not
339         needed anymore (To replace them: use closure and define-handler).
341         * src/xlib-util.lisp (move-window, resize-window)
342         (wait-mouse-button-release): Use a generic mode.
344         * src/*.lisp: Replace the case to handle event with a more (tricky)
345         lispy  method which bind a function to each keywords associated
346         to graphics events.
348 2010-07-23  Philippe Brochard  <pbrochard@common-lisp.net>
350         * src/clfswm-util.lisp (delete-current-child): Invert bindings and
351         menu entry between delete-current-child and remove-current-child.
352         ie: Delete a child and its children in all frames by default.
354 2010-07-21  Philippe Brochard  <pbrochard@common-lisp.net>
356         * src/package.lisp: Add a placement configuration group.
358         * src/binding*.lisp: Bind control+g to escape the current action
359         like emacs.
361         * src/clfswm-internal.lisp
362         (delete-child-and-children-in-all-frames): New function and
363         binding: Second mode - Control+Delete delete the current child and
364         its children in all frames (ie: close the current child and its
365         children).
367 2010-07-20  Philippe Brochard  <pbrochard@common-lisp.net>
369         * src/clfswm-internal.lisp (remove-child-in-frame): Do not destroy
370         the frame window and the frame gc. Close a very annoying bug when
371         cuting/pasting a frame or moving a child over frames with the
372         mouse.
374         * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
375         all children in *current-root* after moving/resizing a frame.
377 2010-07-18  Philippe Brochard  <pbrochard@common-lisp.net>
379         * src/clfswm-util.lisp (delete-focus-window)
380         (destroy-focus-window): Remove child in parent frame before
381         stopping it.
383 2010-07-16  Philippe Brochard  <pbrochard@common-lisp.net>
385         * src/clfswm-util.lisp (identify-key): Add a timeout in
386         xlib:process-event.
387         (mouse-click-to-focus-generic): Use find-child-under-mouse instead
388         of the window passed by xlib:process-event.
390         * src/xlib-util.lisp (move-window, resize-window)
391         (wait-mouse-button-release): Add a timeout in xlib:process-event.
393 2010-04-11  Philippe Brochard  <pbrochard@common-lisp.net>
395         * src/clfswm-util.lisp (run-other-window-manager): Add the ability
396         to launch an other window manager and to return to clfswm.
398 2010-03-18  Philippe Brochard  <pbrochard@common-lisp.net>
400         * src/clfswm-layout.lisp (set-tile-space-layout): Set default
401         to 1%.
403 2009-12-15  Philippe Brochard  <pbrochard@common-lisp.net>
405         * src/clfswm.lisp (main-loop): Add a *loop-hook* parameter and a
406         loop timeout.
408         * src/clfswm-generic-mode.lisp (generic-mode): Add a loop-hook
409         parameter and a loop timeout.
411 2009-12-05  Philippe Brochard  <pbrochard@common-lisp.net>
413         * src/clfswm.lisp (main): Add an alternate configuration filename
414         parameter.
416         * load.lisp: Add a debuging code example.
418 2009-11-14  Philippe Brochard  <pbrochard@common-lisp.net>
420         * src/clfswm-configuration.lisp (create-configuration-menu): New
421         menu to configure all clfswm variables while clfswm is running.
423 2009-11-12  Philippe Brochard  <pbrochard@common-lisp.net>
425         * src/clfswm-util.lisp (save-configuration-variables): New
426         function to save all configuration variables in clfswmrc.
428 2009-11-11  Philippe Brochard  <pbrochard@common-lisp.net>
430         * src/clfswm-info.lisp (info-mode): Begining of mouse support in
431         info mode.
432         (set-default-info-keys): Add cursor key support in info mode.
434 2009-11-08  Philippe Brochard  <pbrochard@common-lisp.net>
436         * contrib/reboot-halt.lisp: Add a Suspend/Reboot/Halt menu in
437         contrib.
439         * src/clfswm.lisp (main): Add a read-conf-file-p parameter to
440         prevent reading the configuration file (this may be useful to
441         produce the original documentation without user modifications
442         with the rc configuration file).
444 2009-11-07  Philippe Brochard  <pbrochard@common-lisp.net>
446         * src/bindings-second-mode.lisp (set-default-second-keys):
447         Simplification of Escape key to close/kill/remove the focus window
448         and unhide all windows.
450         * src/bindings.lisp (set-default-main-keys): Simplification of
451         Escape key to close/kill/remove the focus window and unhide all
452         windows.
454         * src/clfswm-util.lisp (ask-close/kill-current-window): Add remove
455         focus and unhide all windows capabilities.
457 2009-10-10  Philippe Brochard  <pbrochard@common-lisp.net>
459         * contrib/mpd.lisp (start-gmpc): Add gmpc in the mpd menu.
461 2009-07-29  Philippe Brochard  <pbrochard@common-lisp.net>
463         * src/clfswm-layout.lisp (tile-layout, tile-horizontal-layout):
464         Keep child order and don't make unnecessary child movement.
465         (one-column-layout, one-line-layout): New layouts.
467 2009-06-29  Philippe Brochard  <pbrochard@common-lisp.net>
469         * contrib/cd-player.lisp: New file to handle the CD player.
471         * contrib/xmms.lisp: New file to handle the xmms player.
473 2009-06-28  Philippe Brochard  <pbrochard@common-lisp.net>
475         * src/clfswm-layout.lisp (set-no-layout-remember-size): New layout:
476         Maximize windows in there frame - Leave frames to there actual
477         size.
479         * src/bindings-second-mode.lisp (set-default-second-keys): Bind
480         "o" on set-open-in-new-frame-in-parent-frame-nw-hook.
482 2009-06-27  Philippe Brochard  <pbrochard@common-lisp.net>
484         * contrib/keyb_fr.lisp: New file to handle an azerty keyboard.
486 2009-06-24  Philippe Brochard  <pbrochard@common-lisp.net>
488         * contrib/mpd.lisp: Use a standard menu.
490         * src/clfswm-info.lisp: Use a standard menu for the help-menu.
492 2009-06-22  Philippe Brochard  <pbrochard@common-lisp.net>
494         * contrib/mpd.lisp: New file to handle the Music Player Daemon (MPD)
496 2009-06-19  Philippe Brochard  <pbrochard@common-lisp.net>
498         * src/clfswm-autodoc.lisp (produce-doc, produce-doc-html): Minor
499         number key cleanup.
501 2009-06-18  Philippe Brochard  <pbrochard@common-lisp.net>
503         * src/config.lisp (get-fullscreen-size):  One pixel adjustment
504         (again).
506         * src/clfswm-placement.lisp (*-child-placement): One pixel
507         adjustment (again).
509 2009-06-16  Philippe Brochard  <pbrochard@common-lisp.net>
511         * src/clfswm-circulate-mode.lisp (draw-circulate-mode-window):
512         Ensure that all characters are printable.
514         * src/config.lisp (get-fullscreen-size): Adjust default fullscreen
515         sizes.
517         * src/clfswm-placement.lisp (*-child-placement): Adjust
518         coordinates to one pixel in the current child.
520 2009-06-04  Philippe Brochard  <pbrochard@common-lisp.net>
522         * src/clfswm-query.lisp (query-enter-function): Assign font before
523         width and height calculation.
525 2009-06-03  Philippe Brochard  <pbrochard@common-lisp.net>
527         * src/xlib-util.lisp (banish-pointer): Use with-placement macro to
528         bannish the pointer in an arbitrary place.
530         * src/clfswm-info.lisp (info-mode): Use with-placement macro to
531         place the info window in an arbitrary place.
533         * src/clfswm-query.lisp (query-enter-function): Use with-placement
534         macro to place the query window in an arbitrary place.
536         * src/clfswm-placement.lisp: New file. Allow to place info windows
537         or query windows on an arbitrary place. Allow to bannish the
538         pointer on an arbitrary place.
540 2009-05-16  Philippe Brochard  <pbrochard@common-lisp.net>
542         * src/clfswm-circulate-mode.lisp (reorder-child)
543         (reorder-brother): Unfocus windows before reordering children or
544         brothers.
546 2009-05-13  Philippe Brochard  <pbrochard@common-lisp.net>
548         * src/clfswm-circulate-mode.lisp (reorder-brother): Ensure that
549         the parent is a frame.
551         * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Handle
552         motion with a default modifier.
554         * src/clfswm.lisp (handle-motion-notify): Handle motion with a
555         default modifier.
557         * src/clfswm-info.lisp (info-mode): Handle motion with a default
558         modifier.
559         (info-mode): Optimization in loop function.
561 2009-05-10  Philippe Brochard  <pbrochard@common-lisp.net>
563         * src/clfswm-circulate-mode.lisp (reorder-brother): Handle
564         root-frame correctly.
566         * clfswm.asd: Dependency fix for clfswm-generic-mode.
568         * src/clfswm-circulate-mode.lisp (reorder-child)
569         (reorder-brother): Handle empty frames.
570         (reorder-brother): Redisplay only the parent frame of the  current
571         child.
573         * src/clfswm-util.lisp (frame-toggle-maximize): Redisplay only the
574         parent frame of the  current frame.
576 2009-05-09  Philippe Brochard  <pbrochard@common-lisp.net>
578         * src/clfswm-util.lisp (frame-toggle-maximize): New function:
579         Maximize/Unmaximize the current frame in its parent frame.
581         * src/clfswm-layout.lisp (maximize-layout): New layout: Maximize
582         windows and frames in there parent frame.
584 2009-05-05  Philippe Brochard  <pbrochard@common-lisp.net>
586         * src/*.lisp: Add support for Clozure Common Lisp (CCL).
588         * src/clfswm-circulate-mode.lisp (reorder-child)
589         (reorder-brother): Reinitialise on circulate type change
590         child to brother or brother to child.
592         * src/*.lisp (*): Use map-window instead of xlib:map-window. So
593         calls xlib:display-finish-output on each map-request. So speed up
594         the window display.
596         * src/xlib-util.lisp (map-window): New function. Call
597         xlib:display-finish-output on each map request.
599 2009-04-28  Philippe Brochard  <pbrochard@common-lisp.net>
601         * src/clfswm-second-mode.lisp (sm-handle-motion-notify):
602         Optimisation when drawing second mode window.
604 2009-04-27  Philippe Brochard  <pbrochard@common-lisp.net>
606         * src/clfswm-circulate-mode.lisp (circulate-mode): Optimisation in
607         window redraw.
609 2009-04-22  Philippe Brochard  <pbrochard@common-lisp.net>
611         * src/clfswm-util.lisp (run-program-from-query-string): Launch
612         command only with a return validation.
614 2009-04-22  Xavier Maillard  <xma@gnu.org>
616         * src/clfswm-query.lisp (query-string): Use a generic mode.
618 2009-04-19  Xavier Maillard  <xma@gnu.org>
620         * src/clfswm-info.lisp (info-mode): Use generic-mode for info-mode.
622 2009-04-18  Xavier Maillard  <xma@gnu.org>
624         * src/clfswm-generic-mode.lisp (generic-mode): Add a generic mode
625         to define all other modes.
627 2009-04-05  Philippe Brochard  <pbrochard@common-lisp.net>
629         * src/package.lisp (): Use *default-font-string* for all
630         font-string.
632         * src/clfswm-info.lisp (info-mode): Ensure integer windows size.
634 2009-02-17  Philippe Brochard  <pbrochard@common-lisp.net>
636         * src/xlib-util.lisp (null-size-window-p): Better check of null
637         sized windows.
639 2009-02-14  Philippe Brochard  <pbrochard@common-lisp.net>
641         * src/clfswm.lisp (handle-map-request): Add a fix to manage
642         correctly fullscreen windows (SDL particularly).
644 2008-12-20  Philippe Brochard  <pbrochard@common-lisp.net>
646         * src/xlib-util.lisp (get-color): Allocate colors only once -> fix
647         a segfault with clisp/new-clx.
649         * src/clfswm.lisp (handle-motion-notify): Add a needed window
650         argument.
652         * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Add a
653         needed window argument.
655 2008-10-30  Philippe Brochard  <pbrochard@common-lisp.net>
657         * src/xlib-util.lisp (wait-no-key-or-button-press)
658         (wait-a-key-or-button-press): Check buttons press/release correctly"
660 2008-10-28  Philippe Brochard  <pbrochard@common-lisp.net>
662         * src/menu-def.lisp: Add children navigation menu in the movement
663         menu (select next/previous child/brother/level).
665 2008-10-26  Philippe Brochard  <pbrochard@common-lisp.net>
667         *  *: Rename 'sister' frame to 'brother' frame.
669         * src/clfswm-keys.lisp (unalias-modifiers): Convert a modifier
670         alias in a real modifier.
672         * src/package.lisp (*modifier-alias*): New list of modifier alias
673         For example: :alt is :mod-1, :numlock is :mod-2...
675         * src/tools.lisp (remove-hook): New function.
677         * src/clfswm-keys.lisp (with-capslock, without-capslock)
678         (with-numlock, without-cnumlock): New functions.
680 2008-10-25  Philippe Brochard  <pbrochard@common-lisp.net>
682         * src/clfswm-info.lisp: Use the *binding-hook* to create info
683         keys and mouse bindings.
685         * src/bindings-second-mode.lisp: Use the *binding-hook* to create
686         second keys and mouse bindings.
688         * src/bindings.lisp: Use the *binding-hook* to create main keys
689         and mouse bindings.
691 2008-10-10  Philippe Brochard  <pbrochard@common-lisp.net>
693         * src/clfswm-menu.lisp (open-menu): Remember parent menu to undo
694         menu opening.
696 2008-10-09  Philippe Brochard  <pbrochard@common-lisp.net>
698         * src/menu-def.lisp: Use a menu instead of a function for the
699         standard menu.
701 2008-10-08  Philippe Brochard  <pbrochard@common-lisp.net>
703         * src/clfswm-util.lisp (show-standard-menu): Display the standard
704         menu from the 'update-menus' command.
706 2008-10-07  Philippe Brochard  <pbrochard@common-lisp.net>
708         * src/clfswm-query.lisp (query-string): Do not ungrab keyboard if
709         it's already grabbed.
711         * src/clfswm-internal.lisp (display-frame-info): Use configurable
712         colors and fix a bug with background.
713         (display-frame-info): Set window background when displaying info.
715 2008-10-06  Philippe Brochard  <pbrochard@common-lisp.net>
717         * src/xlib-util.lisp (my-character->keysyms): Use a macro to avoid
718         warning with clisp/new-clx.
720 2008-10-04  Philippe Brochard  <pbrochard@common-lisp.net>
722         * src/clfswm-util.lisp (jump-to-slot): Prevent to jump on a
723         deleted child.
725 2008-09-23  Philippe Brochard  <pbrochard@common-lisp.net>
726         * *: **** Release 0809 ****
728 2008-09-23  Philippe Brochard  <pbrochard@common-lisp.net>
730         * src/clfswm-util.lisp (ensure-unique-name): New function and menu
731         entry.
732         (ensure-unique-number): New function and menu entry.
734 2008-09-22  Philippe Brochard  <pbrochard@common-lisp.net>
736         * src/clfswm-nw-hooks.lisp (named-frame-nw-hook): New new window
737         hook: open the next window in a named frame.
738         (numbered-frame-nw-hook): New new window hook: open the next
739         window in a numbered frame.
741         * src/clfswm-query.lisp (query-string): Grab the keyboard in all
742         cases. So query-string can be called even in the main mode.
744         * src/clfswm-internal.lisp (show-all-children): Do not raise a
745         child by default => far less flickering.
747 2008-09-19  Philippe Brochard  <pbrochard@common-lisp.net>
749         * src/bindings-second-mode.lisp: Bind "t" to tile-current-frame.
751         * src/menu-def.lisp: Change key binding for the CLFSWM menu
752         entry.
754         * src/xlib-util.lisp (xgrab-pointer): Handle the case where cursor
755         is nil. (workaround on some CLX implementation).
757 2008-09-12  Philippe Brochard  <pbrochard@common-lisp.net>
759         * src/menu-def.lisp: Add a menu to set a focus policy for all
760         frames.
762         * src/clfswm-util.lisp (set-focus-policy-generic-for-all)
763         (all-frames-set-*-focus-policy): Set a focus policy for all
764         frames.
766         * src/clfswm.lisp (handle-enter-notify): sloppy-select
767         mode. Select a child and its parents on mouse over.
769 2008-09-03  Philippe Brochard  <pbrochard@common-lisp.net>
771         * src/clfswm.lisp (handle-enter-notify): Add a sloppy strict focus
772         policy -> Sloppy focus only for windows in the current frame.
773         (main-unprotected): Exit clfswm on init error (ie: when another
774         window manager is running).
776         * src/clfswm-util.lisp (reset-clfswm): New function.
778 2008-09-02  Philippe Brochard  <pbrochard@common-lisp.net>
780         * src/clfswm-menu.lisp (init-menu): New function.
782         * src/clfswm-util.lisp (reload-clfswm): New function to reload
783         CLFSWM.
784         (exit-clfswm): Rename quit-clfswm to exit-clfswm.
786         * src/clfswm.lisp (main, main-unprotected): Handle error in a
787         superior main function. Now CLFSWM can't break the X session. It
788         just reinitialize the display and run a new main loop.
790         * src/clfswm-corner.lisp: Make *clfswm-terminal* and
791         *vt-keyboard-on* global to avoid warnings when loading clfswm.
793         * src/clfswm-layout.lisp: Add a specific GIMP layout menu.
794         (help-on-gimp-layout): Describe how to use the GIMP layout.
796 2008-09-01  Philippe Brochard  <pbrochard@common-lisp.net>
798         * src/clfswm-layout.lisp (set-gimp-layout): Change the layout to
799         main-window-right-layout. Change the keybinding for (shift)alt+tab
800         to not select windows in the main window lisst.
801         Bind F8 to add a window in the main window list.
802         Bind F9 to remove a window in the main window list.
803         Change the focus policy to :sloppy.
804         (set-previous-layout): Restore the previous layout, keybinding and
805         focus policy.
807 2008-08-31  Philippe Brochard  <pbrochard@common-lisp.net>
809         * src/clfswm-menu.lisp (add-menu-comment): Add comments in menu.
811         * src/clfswm-layout.lisp (main-window-left-layout)
812         (main-window-bottom-layout, main-window-top-layout): New
813         functions.
814         Factorize layouts in menu.
816 2008-08-30  Philippe Brochard  <pbrochard@common-lisp.net>
818         * src/clfswm-layout.lisp (main-window-right-layout): A possible
819         GIMP layout: one or more main windows on one side of the
820         frame. Others on the other size.
822         * src/clfswm-util.lisp
823         (current-frame-set-click/sloppy-focus-policy): Each frame can have
824         a different focus policy (one of :click or :sloppy).
825         The default focus policy is set with *default-focus-policy*.
827 2008-08-23  Philippe Brochard  <pbrochard@common-lisp.net>
829         * src/clfswm-info.lisp (show-config-variable): New function.
831 2008-08-19  Philippe Brochard  <pbrochard@common-lisp.net>
833         * src/clfswm-layout.lisp (tile-horizontal-layout): New layout.
835         * src/clfswm-info.lisp: Colored help for key binding and corners
836         actions.
838 2008-08-18  Philippe Brochard  <pbrochard@common-lisp.net>
840         * src/clfswm-util.lisp (delete-focus-window)
841         (destroy-focus-window): Remove chid only in
842         handle-unmap/destroy-notify. Focus *current-root* only when
843         closing/killing the current child.
845         * src/clfswm-autodoc.lisp (produce-corner-*-doc): New autodoc
846         functions or corners.
848 2008-08-17  Philippe Brochard  <pbrochard@common-lisp.net>
850         * src/clfswm-corner.lisp (present-clfswm-terminal): New corner
851         action: Hide/Unhide a terminal on mouse corner action. (By default
852         right mouse button on the top left corner).
854         * src/config.lisp (*never-managed-window-list*): New config
855         variable.
857         * src/clfswm-internal.lisp (never-managed-window-p): New function:
858         Handle never managed window in a more simple way.
860         * src/clfswm-corner.lisp: New file and new and more simple method
861         to define corners actions.
863 2008-08-15  Philippe Brochard  <pbrochard@common-lisp.net>
865         * src/clfswm-info.lisp (info-mode): Info line can now be colored.
867         * src/clfswm-layout.lisp (fast-layout-switch)
868         (define-fast-layout-switch): New functions: Switch between two
869         layouts.
871         * src/clfswm-second-mode.lisp (leave-second-mode): Takes care if
872         really in the second mode. So leave-second-mode can be used even
873         in the main mode.
875         * src/clfswm-util.lisp (switch-to-last-child): New function:
876         Store the current child and switch to the previous one.
878 2008-07-16  Philippe Brochard  <pbrochard@common-lisp.net>
880         * src/clfswm-util.lisp (display-current-window-info): Display the
881         window id.
882         (have-to-present-virtual-keyboard): Add a virtual keyboard corner
883         (top right by default). By default 'xvkbd' is used.
885 2008-06-28  Philippe Brochard  <pbrochard@common-lisp.net>
887         * src/xlib-util.lisp (move-window, resize-window): Compress motion
888         events.
890         * src/clfswm.lisp (handle-motion-notify): Compress motion events.
892         * src/clfswm-second-mode.lisp (sm-handle-motion-notify): Compress
893         motion events.
895         * src/clfswm-info.lisp (info-mode): Compress motion events.
897 2008-06-21  Philippe Brochard  <pbrochard@common-lisp.net>
899         * src/clfswm-internal.lisp (show-all-children): Compute geometry
900         and selection first and then show only necessary children.
901         (show-child): remove unneeded display-p parameter.
903         * src/config.lisp (get-fullscreen-size): Place the frame border
904         outside the screen (this prevent the loose of 2 pixels per
905         directions :)
907 2008-06-12  Philippe Brochard  <pbrochard@common-lisp.net>
909         * src/clfswm-internal.lisp (focus-child): Algorithm change to
910         raise only the selected child.
912 2008-06-08  Philippe Brochard  <pbrochard@common-lisp.net>
914         * src/clfswm-internal.lisp (raise-p-list, show-all-children):
915         Raise only viewable children.
917 2008-06-06  Philippe Brochard  <pbrochard@common-lisp.net>
919         * src/clfswm-internal.lisp (show-all-children): Always raise all
920         displayed children. Remove all references to raise-p.
922 2008-06-04  Philippe Brochard  <pbrochard@common-lisp.net>
924         * src/menu-def.lisp (child-menu): New menu entry on raise/lower
925         child in its frame.
927         * src/bindings-second-mode.lisp ("Page_Down", "Page_Up"): New
928         second mode binding on raise/lower child in its frame.
930         * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): Adapt
931         behaviour to the new raise/lower property.
932         Call clear-nw-hook before the rest of the hook.
934         * src/bindings.lisp (mouse-click-to-focus-and-move-window)
935         (mouse-click-to-focus-and-resize-window): Stop button event. This
936         prevent a keyboard/pointer freeze.
938 2008-06-03  Philippe Brochard  <pbrochard@common-lisp.net>
940         * src/clfswm-internal.lisp (frame-lower-child)
941         (frame-raise-child): New functions to raise/lower a child in its
942         frame.
944         * src/clfswm-util.lisp (have-to-present-windows)
945         (have-to-present-all-windows): New functions to have an MaxOS
946         expose like on mouse click in screen corner.
948         * src/clfswm-info.lisp ("Page_Down", "Page_Up"): Add boundaries.
950 2008-05-30  Philippe Brochard  <pbrochard@common-lisp.net>
952         * src/clfswm-util.lisp (unhide-a-child-from-all-frames): Unhide a
953         child from a choice in all frames with hidden children.
955         * src/clfswm-info.lisp (info-mode-menu): Handle separators.
957 2008-05-28  Philippe Brochard  <pbrochard@common-lisp.net>
959         * src/clfswm-util.lisp (hide-current-child, unhide-a-child)
960         (unhide-all-children): New functions.
962         * src/clfswm-info.lisp (info-mode-menu): Handle symbols and
963         functions.
965         * src/clfswm-util.lisp (hide/show-frame-window): new function and
966         menu item.
968 2008-05-23  Philippe Brochard  <pbrochard@common-lisp.net>
970         * src/clfswm-util.lisp (rename-current-child): Do not display the
971         frame info for a window.
973 2008-05-20  Philippe Brochard  <pbrochard@common-lisp.net>
975         * src/clfswm-internal.lisp (remove-child-in-frame): Destroy the
976         frame window for the removed child and its children.
978 2008-05-18  Philippe Brochard  <pbrochard@common-lisp.net>
980         * src/clfswm-autodoc.lisp (produce-*-doc-*): Add a note to use the
981         autodoc functions.
983 2008-05-17  Philippe Brochard  <pbrochard@common-lisp.net>
985         * src/clfswm-nw-hooks.lisp (default-frame-nw-hook): Do not handle
986         the ROX pinboard (ie: leave it lowered in the root window as
987         expected).
989         * src/clfswm-layout.lisp (tile-left-space-layout): New layout.
990         (tile-left-layout, tile-right-layout, tile-top-layout)
991         (tile-bottom-layout): Use all the frame space when there is only
992         one child.
994         * src/clfswm-internal.lisp (place-window-from-hints): Center
995         unmanaged windows in the root screen.
997         * src/clfswm-nw-hooks.lisp (clear-nw-hook, clear-all-nw-hooks):
998         new functions.
1000 2008-05-15  Philippe Brochard  <pbrochard@common-lisp.net>
1002         * src/clfswm-util.lisp (current-frame-manage-window-type): Fix a
1003         typo in managed types.
1005         * src/clfswm-internal.lisp (show-child): Always display frame info
1006         even if the frame is hidden.
1008         * src/xlib-util.lisp (resize-window): Use a better algorithme to
1009         resize windows.
1011 2008-05-13  Philippe Brochard  <pbrochard@common-lisp.net>
1013         * src/clfswm-util.lisp (with-movement): Display frame info for all
1014         frames in current root.
1016 2008-05-12  Philippe Brochard  <pbrochard@common-lisp.net>
1018         * src/*.lisp: Rename 'brother' frames to 'sister' frames.
1020         * src/bindings-second-mode.lisp (define-second-key #\a): New
1021         binding on 'add-default-frame'.
1023         * src/clfswm-autodoc.lisp (produce-*-doc-*-in-file): Show a
1024         message to follow the autodocumentation process.
1026 2008-05-10  Philippe Brochard  <pbrochard@common-lisp.net>
1028         * src/clfswm-util.lisp (bind-or-jump): Bind "Tab", "Return" and
1029         "Space" to jump to a child. "B" to bind a slot on the current
1030         child.
1032         * src/bindings-second-mode.lisp: Use "Tab" instead of
1033         "Iso_Left_Tab".
1035 2008-05-07  Philippe Brochard  <pbrochard@common-lisp.net>
1037         * src/clfswm-util.lisp (find-child-under-mouse): Take care of
1038         unmanaged (hidden) windows.
1040         * src/clfswm-internal.lisp (place-window-from-hints): Give a
1041         minimal size for windows.
1042         (with-all-windows-frames-and-parent): New function.
1044         * src/config.lisp (*default-window-width/height*): New parameters.
1046         * src/clfswm-internal.lisp (place-window-from-hints): Center
1047         windows in the screen instead of in there frame.
1049         * src/bindings-second-mode.lisp (tile-space-current-frame): New
1050         binding on C-t.
1052         * src/clfswm-layout.lisp (register-layout): Intern the once name
1053         in the right package.
1055 2008-05-05  Philippe Brochard  <pbrochard@common-lisp.net>
1057         * doc/dot-clfswmrc: Update to  follow the new clfswm way.
1059 2008-05-03  Philippe Brochard  <pbrochard@common-lisp.net>
1061         * src/clfswm-internal.lisp (set-current-child)
1062         (adapt-child-to-parent, show-child, hide-child): Handle the case
1063         where child is not a frame or a window.
1065         * src/clfswm-util.lisp
1066         (mouse-click-to-focus-generic,mouse-focus-move/resize-generic):
1067         Check if child is a frame.
1069         * src/clfswm-internal.lisp (managed-window-p): Handle the case
1070         where frame is null.
1071         (place-frame): Check if frame and parent are frames.
1073         * src/clfswm-info.lisp (info-mode): display all frame info before
1074         leaving.
1076         * src/clfswm-second-mode.lisp (second-key-mode): display all frame
1077         info before leaving.
1079         * src/clfswm-internal.lisp (display-all-frame-info): New function.
1081 2008-05-02  Philippe Brochard  <pbrochard@common-lisp.net>
1083         * src/tools.lisp (getenv): Implemented for ECL.
1084         (urun-prog): Implemented for ECL.
1086         * src/clfswm-util.lisp (identify-key): Use a double buffer to
1087         display text.
1089         * src/clfswm-query.lisp (query-string): Use a double buffer to
1090         display text.
1092         * src/clfswm-info.lisp (draw-info-window): Use a double buffer to
1093         display text.
1095         * src/xlib-util.lisp (clear-pixmap-buffer, copy-pixmap-buffer):
1096         New functions.
1098 2008-05-01  Philippe Brochard  <pbrochard@common-lisp.net>
1100         * src/clfswm-info.lisp (info-mode): Add boundaries in the info mode window.
1102         * src/menu-def.lisp: New file: move all menu definition in
1103         menu-def.lisp.
1105         * src/clfswm-layout.lisp (register-layout): Use a function instead
1106         of a macro.
1108 2008-04-30  Philippe Brochard  <pbrochard@common-lisp.net>
1110         * src/clfswm-autodoc.lisp (produce-menu-doc,
1111         (produce-menu-doc-html): New functions.
1112         (produce-doc-*): Moved to clfswm-autodoc.lisp.
1114         * src/clfswm-util.lisp (paste-selection-no-clear): Prevent to
1115         paste a child on one of its own children. (this prevent a
1116         recursive bug).
1117         (move-child-to): Rename move/copy-current-child-by to
1118         move/copy-child-to.
1119         (mouse-move-window-over-frame): New function to move the window
1120         under the mouse cursor to another frame.
1122         * src/clfswm-internal.lisp (find-child-in-parent): New function.
1124 2008-04-29  Philippe Brochard  <pbrochard@common-lisp.net>
1126         * src/clfswm-internal.lisp (show-all-children): Display unmanaged
1127         windows only when its window parent is the current child.
1129 2008-04-28  Philippe Brochard  <pbrochard@common-lisp.net>
1131         * src/clfswm-util.lisp (manage-current-window)
1132         (unmanage-current-window): New functions: Allow to force to manage
1133         or unmanage a window by its parent frame.
1135         * src/bindings-second-mode.lisp (#\o): binded to
1136         set-open-in-new-frame-in-parent-frame-nw-hook and
1137         (#\o :control) to set-open-in-new-frame-in-root-frame-nw-hook
1139         * src/clfswm-util.lisp (with-current-window): New macro.
1141         * src/xlib-util.lisp (move-window, resize-window): Remove uneeded
1142         exposure and enter-window handle event.
1144         * src/clfswm-util.lisp (move-frame, resize-frame): Show all
1145         children for the current child after the move/resize.
1147 2008-04-27  Philippe Brochard  <pbrochard@common-lisp.net>
1149         * src/xlib-util.lisp (resize-window): Take care of window size
1150         hints.
1152         * src/clfswm-util.lisp (mouse-focus-move/resize-generic): Allow to
1153         move/resize unmanaged windows.
1155         * src/xlib-util.lisp (move-window, resize-window): New functions.
1157 2008-04-25  Philippe Brochard  <pbrochard@common-lisp.net>
1159         * src/clfswm-util.lisp (current-frame-manage-window-type): Let the
1160         user choose what window type the current frame must handle.
1161         (display-current-window-info): New function.
1162         (current-frame-manage-all-window-type)
1163         (current-frame-manage-only-normal-window-type)
1164         (current-frame-manage-no-window-type): New functions.
1166         * src/clfswm-internal.lisp (managed-window-p): New function.
1168         * src/package.lisp (frame): Managed type: new frame
1169         parameter. This allow to choose what window type a frame must
1170         handle.
1172         * src/*.lisp: Rename all 'father' occurrences to 'parent'.
1174         * src/clfswm-nw-hooks.lisp
1175         (open-in-new-frame-in-parent-frame-nw-hook): New new window hook.
1177         * src/clfswm-util.lisp (adapt-current-frame-to-window-hints): New
1178         function.
1180         * src/tools.lisp (ensure-printable): Return always a string even
1181         with a null string.
1183 2008-04-24  Philippe Brochard  <pbrochard@common-lisp.net>
1185         * src/config.lisp (*default-nw-hook*): New variable to change the
1186         default new window hook.
1188 2008-04-22  Philippe Brochard  <pbrochard@common-lisp.net>
1190         * clfswm.asd (clfswm): Add a dependency from
1191         clfswm-second-mode.lisp to clfswm.lisp.
1193         * src/clfswm-util.lisp (identify-key): Show the documentation for
1194         the function bound on a key.
1195         (with-movement): Move with-movement,
1196         current-frame-fill/pack/resize-*  from bindings-second-mode.lisp
1197         to clfswm-util.lisp.
1199         * src/clfswm-menu.lisp: New menu system that let user change keys
1200         or functions associated to keys.
1202 2008-04-18  Philippe Brochard  <pbrochard@common-lisp.net>
1204         * src/clfswm-internal.lisp (show-all-children): Display-child is
1205         the first child by default. Solve a bug with father-p.
1207 2008-04-17  Philippe Brochard  <pbrochard@common-lisp.net>
1209         * src/clfswm-internal.lisp (add-frame): Add frame return the
1210         created frame.
1211         (show-all-children): Move the size computation outside the
1212         show-child part.
1214         * src/bindings-second-mode.lisp (with-movement): Redisplay only
1215         the current child.
1217         * src/clfswm-util.lisp (mouse-click-to-focus-generic): Redisplay
1218         only the current child.
1220         * src/clfswm-internal.lisp (show-all-children): New display-child
1221         parameter to display only the desired child and its children.
1222         (select-next/previous-child): Only display the current child.
1224 2008-04-14  Philippe Brochard  <pbrochard@common-lisp.net>
1226         * src/clfswm.lisp (init-display): Move the default frame creation
1227         on the default init hook.
1229         * src/clfswm-keys.lisp (define-ungrab/grab): Handle all keysyms in
1230         the main mode (for example: "1" on an azerty keyboard).
1232 2008-04-13  Philippe Brochard  <pbrochard@common-lisp.net>
1234         * src/clfswm-keys.lisp (find-key-from-code): Better handle of
1235         keysyms. Revert to old grabbing method for the main mode.
1237 2008-04-12  Philippe Brochard  <pbrochard@common-lisp.net>
1239         * src/clfswm.lisp (init-display): Add key handling on no focus
1240         window and on frame windows.
1242 2008-04-11  Philippe Brochard  <pbrochard@common-lisp.net>
1244         * src/clfswm.lisp (main): Keyboard handle strategie change: Grab
1245         all keys by default and replay just what is needed. No change for
1246         the second mode.
1248         * src/clfswm-keys.lisp: remove grab/ungrab main keys.
1249         (find-key-from-code): Test for shift and not shift presence.
1251 2008-04-09  Philippe Brochard  <pbrochard@common-lisp.net>
1253         * src/clfswm-internal.lisp (switch-to-root-frame): show later -
1254         new key parameter to have less flickering.
1256 2008-04-07  Philippe Brochard  <pbrochard@common-lisp.net>
1258         * src/bindings-second-mode.lisp (frame-layout-once-menu): Set the
1259         layout only one time and revert to no-layout to freely handle
1260         frames.
1262         * src/clfswm-nw-hooks.lisp
1263         (open-in-new-frame-in-root-frame-nw-hook): Tile layout with spaces
1264         with new created window.
1266         * src/clfswm-layout.lisp (register-layout): Now register
1267         automatically a once layout to set the layout only one time and
1268         revert to no-layout to freely handle frames.
1270 2008-04-05  Philippe Brochard  <pbrochard@common-lisp.net>
1272         * src/clfswm-nw-hooks.lisp (leave-focus-frame-nw-hook): New
1273         nw-hook: Open the next window in the current frame and leave the
1274         focus to the current child.
1276 2008-04-04  Philippe Brochard  <pbrochard@common-lisp.net>
1278         * src/bindings-second-mode.lisp: Add keys definitions to
1279         bind-or-jump in the second mode.
1281         * src/clfswm-util.lisp (bind-or-jump): remove the auto-defining
1282         macro for bind-or-jump-(1|2|3...).
1284         * src/clfswm-keys.lisp (define-define-key/mouse): Allow additional
1285         arguments to function. This allow to do things like:
1286         (define-main-key (key) 'my-function 10 20 'foo) -> 10 20 and 'foo
1287         are passed to my-function on key press.
1289 2008-04-03  Philippe Brochard  <pbrochard@common-lisp.net>
1291         * src/clfswm-util.lisp (bind-or-jump): New (great) function.
1293 2008-04-02  Philippe Brochard  <pbrochard@common-lisp.net>
1295         * src/clfswm-internal.lisp (child-fullname): New function
1297         * src/clfswm-info.lisp (info-mode-menu): Add an explicit optional
1298         docstring in info-mode-menu. An item can be
1299         '((key function) (key function)) or with docstring
1300         '((key function "documentation 1") (key function "bla bla") (key function))
1302         * src/tools.lisp (ensure-n-elems): New function.
1304         * src/bindings-second-mode.lisp: Bind Alt+mouse-1/3 to move or
1305         resize a frame or the window's father.
1307         * src/clfswm.lisp (init-display): Remove tile-space-layout by
1308         default on the root frame.
1310         * src/clfswm-util.lisp (move/resize-frame): Add standard event
1311         hooks handlers (map-request, configure-notify...)
1313         * src/clfswm-internal.lisp (adapt-child-to-father): Limit minimal
1314         child size to 1x1.
1316 2008-04-01  Philippe Brochard  <pbrochard@common-lisp.net>
1318         * src/bindings.lisp: Bind Alt+mouse-1/3 to move or resize a frame
1319         or the window's father.
1321         * src/clfswm-util.lisp (mouse-click-to-focus-generic): Stop button
1322         event only if there is a geometry change.
1323         (mouse-focus-move/resize-generic): Generic function to move or
1324         resize a frame or a window father frame.
1326 2008-04-01  Philippe Brochard  <pbrochard@common-lisp.net>
1328         * src/clfswm-internal.lisp (show-all-children): Return t if there
1329         is a geometry change.
1331 2008-03-30  Philippe Brochard  <pbrochard@common-lisp.net>
1333         * src/bindings.lisp (Up/Down): Swap select previous/next level.
1335         * src/bindings-second-mode.lisp (Up/Down): Swap select previous/next level.
1337         * src/clfswm.lisp (init-display): Create a default frame in the root frame.
1339         * src/clfswm-internal.lisp (place-frame): Place frame from real (pixel) coordinates.
1340         (with-all-*): Reverse the child list to manage the first child last (like in
1341         show-all-children).
1343         * src/config.lisp (*create-frame-on-root*): New variable: Create a new frame on the
1344         root window only if true.
1346         * src/clfswm-util.lisp (mouse-click-to-focus-generic): Create a new frame on the
1347         root window only if *create-frame-on-root* is true.
1349         * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Create a new frame
1350         on the root window.
1352 2008-03-29  Philippe Brochard  <pbrochard@common-lisp.net>
1354         * src/bindings-second-mode.lisp (sm-mouse-click-to-focus-generic): Focus, move and resize
1355         the current child (even if it's a window).
1357 2008-03-28  Philippe Brochard  <pbrochard@common-lisp.net>
1359         * src/clfswm-util.lisp (mouse-click-to-focus-and-move)
1360         (mouse-click-to-focus-and-resize): New functions.
1362         * src/clfswm-internal.lisp (*-fl->px): Convert float coordinates to pixel.
1363         (*-px->fl): Convert pixel coordinates to float.
1365         * src/tools.lisp (call-hook): Move call-hook to tools.lisp.
1367 2008-03-27  Philippe Brochard  <pbrochard@common-lisp.net>
1369         * src/clfswm-layout.lisp (no-layout): Use :first-only to raise only the
1370         first child.
1372         * src/clfswm-internal.lisp (hide-all): Split hide-all-children in hide-all
1373         and hide-all-children.
1374         (raise-if-needed): New function.
1375         (show-child): Use a first-p parameter to raise windows only when they are
1376         first child.
1378 2008-03-26  Philippe Brochard  <pbrochard@common-lisp.net>
1380         * src/clfswm-internal.lisp (select-next/previous-level): Don't use show-all-children
1381         -> less flickering.
1383 2008-03-25  Philippe Brochard  <pbrochard@common-lisp.net>
1385         * src/clfswm-info.lisp (keys-from-list): new function.
1387         * src/*: rename 'childs' in 'children'.
1389         * src/*: rename 'group' in 'frame'.
1391 2008-03-22  Philippe Brochard  <pbrochard@common-lisp.net>
1393         * src/clfswm-pack.lisp (explode-group/explode-current-group): new functions.
1395 2008-03-21  Philippe Brochard  <pbrochard@common-lisp.net>
1397         * src/clfswm-pack.lisp: Pack, Fill, Resize functions.
1399 2008-03-16  Philippe Brochard  <pbrochard@common-lisp.net>
1401         * src/clfswm-nw-hooks.lisp: Register system for new window hooks.
1402         Bind control+o to open the next window in a new group in the root group
1403          (as open in next window in a new workspace in 0801 version).
1405 2008-03-15  Philippe Brochard  <pbrochard@common-lisp.net>
1407         * src/clfswm-util.lisp (show/hide-all-groups-info/key): Show/hide all groups info
1408         window.
1410 2008-03-14  Philippe Brochard  <pbrochard@common-lisp.net>
1412         * bindings-second-mode.lisp ("ISO_Left_Tab"): Use ISO_Left_Tab
1413         instead of Tab for select-previous-child.
1415 2008-03-13  Philippe Brochard  <pbrochard@common-lisp.net>
1417         * clfswm-util.lisp (force-window-in-group/force-window-center-in-group):
1418         new functions.
1420 2008-03-11  Philippe Brochard  <pbrochard@common-lisp.net>
1422         * clfswm-util.lisp (identify-key): Display the documentation
1423         associated to keys when identifying a key.
1425 2008-03-10  Xavier Maillard  <xma@gnu.org>
1427         * contrib/clfswm: Complete rewrite of the script. Detect error and
1428         act accordingly. Add command line arguments to configure the
1429         script execution. User can now choose different common lisp
1430         implementation (clisp and sbcl only), choose where to store the
1431         dumped image, where to find clfswm source.
1433 2008-03-09  Philippe Brochard  <pbrochard@common-lisp.net>
1435         * clfswm-internal.lisp (process-new-window): Beginning of new
1436         window hook: each group have a hook to tell what he wants to do
1437         with the new created window.
1439 2008-03-08  Xavier Maillard  <xma@gnu.org>
1441         * contrib/clfswm: New script. Dump a CLISP image of CLFSWM then
1442         call the resulting executable.
1444         * clfswm.lisp (read-conf-file): Check for the user config file in
1445         XDG_CONFIG_HOME *first*. Freedesktop.org standards should be
1446         prefered whenever possible.
1448 2008-02-27  Philippe Brochard  <pbrochard@common-lisp.net>
1450         * clfswm-layout.lisp (*-layout): Add an optional raise-p
1451         parameter in each layout.
1453 2008-02-26  Philippe Brochard  <pbrochard@common-lisp.net>
1455         * clfswm-util.lisp (copy/cut-current-child): Does not affect the
1456         root group.
1457         (copy/move-current-child-by-name/number): new functions
1458         (focus-group-by-name/number): new functions
1459         (delete-group-by-name/number): new functions
1461 2008-02-24  Philippe Brochard  <pbrochard@common-lisp.net>
1463         * ************************************************************ *
1464         *: Major update - No more reference  to workspaces. The main   *
1465         structure is a tree of groups or application windows.          *
1466         * ************************************************************ *
1468 2008-02-07  Philippe Brochard  <pbrochard@common-lisp.net>
1470         * clfswm.lisp (read-conf-file): Read configuration in
1471         $HOME/.clfswmrc or in /etc/clfswmrc or in
1472         $XDG_CONFIG_HOME/clfswm/clfswmrc.
1473         (xdg-config-home): Return the content of $XDG-CONFIG-HOME (default
1474         to $HOME/.config/).
1476 2008-01-18  Philippe Brochard  <pbrochard@common-lisp.net>
1478         * clfswm-internal.lisp (show-all-group): Use *root* and *root-gc*
1479         by default.
1481 2008-01-03  Philippe Brochard  <pbrochard@common-lisp.net>
1483         * clfswm-internal.lisp (find-window-group): New function.
1485         * clfswm*: Change to make clfswm run with clisp/new-clx.
1487 2008-01-01  Philippe Brochard  <pbrochard@common-lisp.net>
1489         * clfswm-util.lisp (query-show-paren): Add show parent matching in
1490         query string.
1491         (query-string): Bind control+k to delete end of line.
1493         * clfswm-second-mode.lisp (draw-second-mode-window): Display
1494         the action on mouse motion in second mode.
1496         * clfswm.lisp (handle-exposure): Redisplay groups on exposure
1497         event but do not clear the root window.
1498         (handle-configure-request): Adjust unmanaged window from there
1499         request.
1501         * clfswm-internal.lisp (process-new-window): Adjust new window
1502         with the specified hints (max/min/base width/height).
1504 2007-12-31  Philippe Brochard  <pbrochard@common-lisp.net>
1506         * clfswm.lisp (handle-configure-request): Send an Configuration
1507         Notify event. This solve a bug with xterm and rxvt who takes some
1508         times to be mapped. Now there is no delay.
1510         * bindings-second-mode.lisp (define-shell): Run programs after
1511         living the second mode.
1513 2007-12-30  Philippe Brochard  <pbrochard@common-lisp.net>
1515         * clfswm-internal.lisp (process-new-window): Do not crop transient
1516         window to group size.
1517         (adapt-window-to-group): Do not crop transient window to group
1518         size.
1520         * clfswm.lisp (handle-configure-request): Adapt just the window to
1521         its group and don't take care of the configure request. Remove the
1522         bug with the Gimp outside the group and speed up the window
1523         manipulation.
1524         (handle-exposure): Remove show-all-group on exposure event
1525         -> Speed up.
1527 2007-12-29  Philippe Brochard  <pbrochard@common-lisp.net>
1529         * clfswm-util.lisp (circulate-group-up-copy-window)
1530         (circulate-group-down-copy-window)
1531         (circulate-workspace-up-copy-group)
1532         (circulate-workspace-down-copy-group): Prevent the copy of the
1533         same window in the same workspace.
1535         * bindings-second-mode.lisp (release-copy-selected-window)
1536         (release-copy-selected-group): Prevent the copy of the same window
1537         in the same workspace.
1539         * clfswm-pager.lisp (generic-pager-move-window-on-previous-line)
1540         (generic-pager-move-window-on-next-line): Remove the copy
1541         property.
1542         (generic-pager-move-group-on-next-workspace)
1543         (generic-pager-move-group-on-previous-workspace): Prevent the copy
1544         of the same window in the same workspace.
1546         * bindings-pager.lisp (mouse-pager-copy-selected-window-release)
1547         (mouse-pager-copy-selected-group-release): Prevent the copy of the
1548         same window in the same workspace.
1550         * tools.lisp (setf/=): new macro to set a variable only when
1551         necessary.
1553         * clfswm-internal.lisp (adapt-window-to-group): use set/= to set
1554         x, y... only when necessary.
1556 2007-12-28  Philippe Brochard  <pbrochard@common-lisp.net>
1558         * clfswm.lisp (handle-configure-notify, *configure-notify-hook*):
1559         new function and hook: force windows to stay in its group (solve a
1560         bug with the Gimp).
1562 2007-12-25  Philippe Brochard  <pbrochard@common-lisp.net>
1564         * bindings-second-mode.lisp (mouse-motion): use hide-group to have
1565         less flickering when moving/resizing groups.
1567         * clfswm-internal.lisp (hide-group): new function.
1568         (show-all-group): clear-all: new parameter.
1570 2007-12-22  Philippe Brochard  <pbrochard@common-lisp.net>
1572         * clfswm-keys.lisp (define-define-key): undefine-*-multi-name: new
1573         macro.
1574         * clfswm*: Color change for the pager. Typo or better description
1575         in bindings definitions. Define bindings for a qwerty keyboard by
1576         default. dot-clfswmrc show examples to switch to an azerty
1577         keyboard.
1578         License change to GPL v3.
1579         * config.lisp: new file - group all globals variables in this
1580         file.
1582 2007-08-26  Philippe Brochard  <pbrochard@common-lisp.net>
1584         * xlib-util.lisp (hide-window): Remove structure-notivy events
1585         when hidding a window.
1587 2007-05-16  Philippe Brochard  <pbrochard@common-lisp.net>
1589         * package.lisp (*sm-property-notify-hook*): Readded
1590         property-notify-hook in second mode.
1592 2007-05-15  Philippe Brochard  <pbrochard@common-lisp.net>
1594         * clfswm-keys.lisp (produce-doc-html): Better clean up for strings.
1596 2007-05-13  Philippe Brochard  <pbrochard@common-lisp.net>
1598         * clfswm-pack.lisp (tile-current-workspace-to/right/left/top/bottom):
1599         Tile the current workspace with the current window on one side and
1600         others on the other (this emulate the larswm, dwm, wmii way). See
1601         the default configuration file to enable this mode by default.
1603         * clfswm-pager.lisp (pager-tile-current-workspace-to): idem for
1604         the pager.
1606 2007-05-12  Philippe Brochard  <pbrochard@common-lisp.net>
1608         * clfswm-pager.lisp (pager-draw-window-in-group): Add
1609         ensure-printable to print windows name even with non-ascii
1610         characters.
1612 2007-05-11  Philippe Brochard  <pbrochard@common-lisp.net>
1614         * clfswm-pager.lisp (pager-explode-current-group): Create a new
1615         group for each window in group.
1616         (pager-implode-current-group): Move all windows in workspace to
1617         one group and remove other groups.
1619         * clfswm-pack.lisp (explode-group): Create a new group for each
1620         window in group.
1621         (implode-group): Move all windows in workspace to one group and
1622         remove other groups.
1624         * clfswm-util.lisp (identify-key): Remove local configuration
1625         variables and made them available for configuration from
1626         package.lisp.
1627         (query-string): idem.
1629 2007-04-29  Philippe Brochard  <pbrochard@common-lisp.net>
1631         * netwm-util.lisp: Start of NetWM compliance.
1632         Add a Netwm client list gestion.
1634 2007-04-28  Philippe Brochard  <pbrochard@common-lisp.net>
1636         * clfswm-internal.lisp (create-group-on-request): open a new group
1637         only when the current group is not empty.
1639         * bindings-second-mode.lisp (define-second-key-#\o-control): Fix a
1640         bug with null workspace.
1642         * clfswm-pager.lisp (pager-handle-event): Add a hook
1643         system. This hooks can be changed in the user configuration file.
1645         * package.lisp: All colors and font variables are set in
1646         package.lisp and can be configured in the user configuration
1647         file.
1648         Note: If you have configured some less ugly colors (esp. for the
1649         pager) don't hesitate to let me know :)
1651         * clfswm-second-mode.lisp (sm-handle-event): Add a hook
1652         system. This hooks can be changed in the user configuration file.
1654         * clfswm.lisp (handle-event): Add a hook system. This hooks can be
1655         changed in the user configuration file (~/.clfswmrc)
1657 2007-04-25  Philippe Brochard  <pbrochard@common-lisp.net>
1659         * clfswm-util.lisp (stop-all-pending-actions): new function: reset
1660         arrow action, open next window in new workspace/group.
1662         * bindings.lisp (stop-all-pending-actions): new binding.
1663         (open-next-window-in-new-group-once): Open the next windows in a
1664         new group (only once) or open all new windows in a new group (like
1665         others windows managers).
1667 2007-04-22  Philippe Brochard  <pbrochard@common-lisp.net>
1669         * clfswm.lisp (read-conf-file): New function to read a lisp
1670         configuration file at startup.
1671         (focus-group-under-mouse): Check if group isn't the current group
1672         ( prevent a bug with unclutter ).
1674 2007-03-02  Philippe Brochard  <pbrochard@common-lisp.net>
1676         * bindings.lisp (run-program-from-query-string): A program can be
1677         launch from a input query window.
1679 2007-03-01  Philippe Brochard  <pbrochard@common-lisp.net>
1681         * clfswm-info.lisp: Fix a bug with banish pointer in info mode.
1683 2007-02-28  Philippe Brochard  <pbrochard@common-lisp.net>
1685         * clfswm.lisp (process-new-window): One can now open the next
1686         window in a workspace called by its number.
1688         * clfswm-util.lisp (query-font-string): Minimal editing
1689         capabilities.
1690         (eval-from-string): And an REPL in the window manager... :)
1692 2007-02-26  Philippe Brochard  <pbrochard@common-lisp.net>
1694         * clfswm.lisp (process-new-window): One can now open the next
1695         window in a new workspace or a new group.
1697         * clfswm-pager.lisp (pager-mode): Display the next arrow action
1698         with the hidden windows.
1700         * clfswm.lisp (second-key-mode): Display the current workspace
1701         number and the next arrow action in the state window.
1703         * clfswm-pager.lisp (pager-mode): Hide all windows before leaving
1704         the pager mode and then redisplay only the current workspace.
1706 2007-02-25  Philippe Brochard  <pbrochard@common-lisp.net>
1708         * clfswm.lisp (add-workspace): Workspaces are now numbered. So
1709         they can be focused with a keypress, sorted or renumbered.
1711 2007-02-24  Philippe Brochard  <pbrochard@common-lisp.net>
1713         * clfswm-pager.lisp (pager-mode): Remove multiple silly
1714         pager-draw-display. This prevent a lot of flickering in the
1715         pager.
1717         * clfswm.lisp: Remove all display-force-output and replace them
1718         with only one display-finish-output in the event loop.
1720 2006-11-06  Philippe Brochard  <pbrochard@common-lisp.net>
1722         * clfswm-pager.lisp (pager-center-group): New function - center a
1723         group at the middle of the screen.
1725         * clfswm-pack.lisp (center-group): New function - center a group
1726         at the middle of the screen.
1728         * clfswm.lisp (show-group): Add a cross line under the group.
1729         (show-group): Group are showned even if fullscreened.
1730         (init-display): Add an exposure event on the root window.
1732 2006-11-05  Philippe Brochard  <pbrochard@common-lisp.net>
1734         * package.lisp (*default-group*): Default group is the same size
1735         of a fullscreened group.
1737         * bindings*: Use shift to move, control+shift to copy.
1739         * *.lisp: Add comments for configuration or alternatives. So grep
1740         for CONFIG to see where you can configure clfswm. And grep for
1741         Alternative to use some commented code.
1743         * clfswm.lisp (second-key-mode): Use a single window to show the
1744         second mode. See for alternatives at the end of this file.
1746 2006-11-03  Philippe Brochard  <pbrochard@common-lisp.net>
1748         * clfswm-keys.lisp (define-define-key/mouse): Factorisation in a
1749         macro of key and mouse definitions.
1750         (define-define-key/mouse): Use state instead of modifiers list
1751         this fix a bug when the modifiers list is not in the rigth order.
1753         * clfswm.lisp (second-key-mode): Add a colored border in second mode.
1755 2006-11-02  Philippe Brochard  <pbrochard@common-lisp.net>
1757         * clfswm-info.lisp (info-mode): Add an info mode.
1759 2006-11-01  Philippe Brochard  <pbrochard@common-lisp.net>
1761         * clfswm.lisp (process-new-window): Change border size for
1762         transient windows.
1763         (show-all-windows-in-workspace): Unhide all windows even when the
1764         current group is in fullscreen mode.
1766 2006-10-26  Philippe Brochard  <pbrochard@common-lisp.net>
1768         * clfswm-util.lisp (identify-key): Add an exposure handle-event to
1769         redisplay the identify window after a terminal switch.
1771         * clfswm-pager.lisp (pager-mode): Add an exposure handle-event to
1772         redisplay the pager after a terminal switch.
1774 2006-10-24  Philippe Brochard  <pbrochard@common-lisp.net>
1776         * clfswm-util.lisp (identify-key): Add a window to display
1777         the keys to identify on screen.
1779         * bindings.lisp, bindings-pager.lisp: Define same keys to
1780         move/copy groups/windows in second mode and in pager.
1782         * clfswm.lisp (handle-event*): Same version in all clfswm (fix some
1783         drawing lags).
1784         (show-all-windows-in-workspace): unhide window before adapting it
1785         to group.
1787 2006-10-23  Philippe Brochard  <pbrochard@common-lisp.net>
1789         * clfswm.lisp (handle-event): Revert to an older version.
1791 2006-10-18  Philippe Brochard  <pbrochard@common-lisp.net>
1793         * clfswm-util.lisp (force-window-in-group)
1794         (force-window-center-in-group): New functions for transient windows.
1796         * clfswm-pager.lisp (pager-remove-current-workspace/group):
1797         bugfix: hide all windows before removing group or workspace.
1799 2006-10-17  Philippe Brochard  <pbrochard@common-lisp.net>
1801         * bindings-pager.lisp (mouse-pager-move-selected-group)
1802         (mouse-pager-copy-selected-group)
1803         (mouse-pager-move-selected-window)
1804         (mouse-pager-copy-selected-window, mouse-pager-rotate-window-up)
1805         (mouse-pager-rotate-window-down): New functions to have mouse in
1806         pager mode.
1808         * clfswm-pager.lisp (pager-swap-window)
1809         (pager-copy-group-on-next/previous-workspace)
1810         (pager-copy-window-on-next/previous-line): New functions
1812 2006-10-15  Philippe Brochard  <pbrochard@common-lisp.net>
1814         * clfswm-pager.lisp (pager-move-window-on-next/previous-line,
1815         (pager-move-group-on-next/previous-workspace): new functions.
1817         * clfswm-pack.lisp (resize-half-x-x-current-group): resize group
1818         to its half size (new functions).
1820 2006-10-11  Philippe Brochard  <pbrochard@common-lisp.net>
1822         * clfswm-pager.lisp: workspaces, groups and windows can now be
1823         selectionned with the keyboard or the mouse.
1825 2006-10-09  Philippe Brochard  <pbrochard@common-lisp.net>
1827         * clfswm-pager.lisp (pager-select-workspace-right/left):
1828         workspaces can now be selectionned with the keyboard.
1830 2006-10-08  Philippe Brochard  <pbrochard@common-lisp.net>
1832         * clfswm-keys.lisp (undefine-main-key, undefine-second-key, undefine-mouse-action):
1833         new function to remove a previous defined key or mouse combination.
1835 2006-10-07  Philippe Brochard  <pbrochard@common-lisp.net>
1837         * clfswm.lisp (main): Check for access error in init-display.
1839         * clfswm-keys.lisp (define-ungrab/grab): check for keysym and
1840         keycode before grabbing.
1842         * bindings.lisp: Remove nlambda and use defun to keep the function
1843         documentation with clisp.
1844         (define-shell): new macro to define shell command for the second
1845         mode.
1847 2006-10-06  Philippe Brochard  <pbrochard@common-lisp.net>
1849         * clfswm-keys.lisp (define-ungrab/grab): use a cond instead of a
1850         boggus typecase.
1852 2006-10-05  Philippe Brochard  <pbrochard@common-lisp.net>
1854         * bindings.lisp (accept-motion): Move group bugfix in upper mouse
1855         workspace circulation.
1857         * clfswm-util.lisp (absorb-orphan-window): new function.
1859         * clfswm-keys.lisp: Keysyms support.
1861 2006-10-02  Philippe Brochard  <pbrochard@common-lisp.net>
1863         * clfswm.lisp (show-group): Use one gc for all groups and not one
1864         per group.
1866 2006-10-01  Philippe Brochard  <pbrochard@common-lisp.net>
1868         * bindings.lisp (define-second-key (#\l :mod-1)): fix a typo.
1870         * clfswm.lisp (adapt-window-to-group): Adapt only windows with
1871         width and height outside group.
1873 2006-09-28  Philippe Brochard  <pbrochard@common-lisp.net>
1875         * clfswm.lisp: First public release.