Emacs：忽略default-frame-alist設置

Question

我希望所有幀在(1,1)處重疊。然而，隨着包含

(setq initial-frame-alist 
     '((top . 1) (left . 1) (width . 80) (height . 55))) 

(setq default-frame-alist 
     '((top . 1) (left . 1) (width . 80) (height . 55))) 

主叫C-×5個2結果在幀中的級聯，因爲你在圖中看到一個.emacs。

我如何可以強制在同一地點被掛靠的所有幀？

我正在運行Emacs 23.3.1在OS X（Mountain Lion）上。

Answer 1

設置不被忽略。你看到上述行爲的原因是ns-win.el中的before-make-frame-hook，它在頂部和左邊增加了25。

爲了避免您可以添加以下到您的.emacs文件上面的效果：

(setq default-frame-alist '((left . 0) (top . 0) (width . 80) (height . 55))) 
(defvar parameters) 
(add-hook 'before-make-frame-hook 
    (lambda() 
    (let ((left (cdr (assq 'left (frame-parameters)))) 
     (top (cdr (assq 'top (frame-parameters))))) 
     (setq parameters (cons (cons 'left (+ left 0)) 
        (cons (cons 'top (+ top 0)) 
         parameters)))))) 

如果以上不工作，你可以嘗試這是從ns-win.el before-make-frame-hook採取以下。

(setq default-frame-alist '((left . 0) (top . 0) (width . 80) (height . 55))) 

(defvar parameters) 
(add-hook 'before-make-frame-hook 
    (lambda() 
    (let ((left (cdr (assq 'left (frame-parameters)))) 
      (top (cdr (assq 'top (frame-parameters))))) 
     (if (consp left) (setq left (cadr left))) 
     (if (consp top) (setq top (cadr top))) 
     (cond 
     ((or (assq 'top parameters) (assq 'left parameters))) 
     ((or (not left) (not top))) 
     (t 
     (setq parameters (cons (cons 'left (+ left 0)) 
        (cons (cons 'top (+ top 0)) 
        parameters))))))))