Re: [XWEM]: Re: xwem-frames are broken

[Zajcev Evgeny]

Steve Youngs <address@hidden> writes:

> * Steve Youngs <address@hidden> writes:
>
>   > I think the problem is that there is no longer any way to _NOT_ create
>   > the initial frame.  So instead of just getting my "dumped-config"
>   > frames, I am getting the "dumped config" frames _plus_ an initial
>   > frame.
>
> Confirmed.
>
> This fixes it...
>
> --- xwem-frame.el.orig        2004-11-29 09:43:27.000000000 +1000
> +++ xwem-frame.el     2004-11-29 17:37:32.000000000 +1000
> @@ -155,6 +155,11 @@
>        xwem-frame-iresize-mode
>      xwem-frame-imove-mode))
>    
> +(defcustom xwem-frame-omit-init-frame nil
> +  "Non-nil mean no frames will be created on startup."
> +  :type 'boolean
> +  :group 'xwem-frame)
> +
>  (defcustom xwem-frame-rolling-switch t
>    "*Non-nil mean that \\<xwem-global-map>\\[xwem-frame-next] and
>  \\<xwem-global-map>\\[xwem-frame-previous] will always switch, even if
> @@ -572,22 +577,23 @@
>        ;; Create frames from saved configuration
>        (xwem-frame-config-restore1)
>  
> -    ;; Xinerama stuff
> -    (let ((xin (X-XIneramaQueryScreens (xwem-dpy)))
> -          frame frame-old)
> -      (if (car xin)
> -          ;; XInerama enabled, so construct frames linkage
> -          (while (setq xin (cdr xin))
> -            (setq frame (xwem-init-frame-at-rect (car xin)))
> -            (when frame-old
> -              (xwem-frame-link-insert-after frame-old frame))
> -            (setq frame-old frame))
> +    (unless xwem-frame-omit-init-frame
> +      ;; Xinerama stuff
> +      (let ((xin (X-XIneramaQueryScreens (xwem-dpy)))
> +         frame frame-old)
> +     (if (car xin)
> +         ;; XInerama enabled, so construct frames linkage
> +         (while (setq xin (cdr xin))
> +           (setq frame (xwem-init-frame-at-rect (car xin)))
> +           (when frame-old
> +             (xwem-frame-link-insert-after frame-old frame))
> +           (setq frame-old frame))
>  
> -        ;; No XInerama, crate just one frame
> -        (xwem-init-frame-at-rect (X-Geom-to-X-Rect (xwem-rootgeom)))))
> +       ;; No XInerama, crate just one frame
> +       (xwem-init-frame-at-rect (X-Geom-to-X-Rect (xwem-rootgeom)))))
>  
> -    ;; Select very first frame
> -    (xwem-select-frame (car (xwem-frames-list)))))
> +      ;; Select very first frame
> +      (xwem-select-frame (car (xwem-frames-list))))))
>  
>  ;;;###xwem-autoload
>  (defun xwem-frames-init ()

xwem-frame-omit-init-frame is obsolete by xwem-frame-dumped-config.
xwem-frame-config-restore<f> is obsolete by xwem-desktop.

i know what was happening on your side:

you have:

    (add-hook 'xwem-after-init-hook 'xwem-frame-config-restore)

in your xwemrc.  Just remove this string and use xwem-desktop to
restore frames configuration.  Or substitute this string with:

    (load-file (expand-file-name "xwem-configs.el" xwem-dir))

...

The only thing which is really need to be added xwem-desktop is
separated goals for saving and restoring.

-- 
lg