Re: C-x 5 f problem

[Richard Stallman]

The command line geometry argument is only supposed to affect the first
window.  This is because, if you specify a position, you would not want
that position to affect other windows.

But if you specify only a size, it may as well affect all the frames.
So please try this patch.


(defun x-handle-geometry (switch)
  (let* ((geo (x-parse-geometry (car x-invocation-args)))
         (left (assq 'left geo))
         (top (assq 'top geo))
         (height (assq 'height geo))
         (width (assq 'width geo)))
    (if (or height width)
        (setq default-frame-alist
              (append default-frame-alist
                      '((user-size . t))
                      (if height (list height))
                      (if width (list width)))))
    (if (or left top)
        (setq initial-frame-alist
              (append initial-frame-alist
                      '((user-position . t))
                      (if left (list left))
                      (if top (list top)))))
    (setq x-invocation-args (cdr x-invocation-args))))