From mboxrd@z Thu Jan  1 00:00:00 1970
Path: main.gmane.org!not-for-mail
From: "Yeracaris, Anthony" <Anthony.Yeracaris@omgeo.com>
Newsgroups: gmane.emacs.bugs
Subject: Disabliing menubar and toolbar in .emacs causes frame to shrink f
	orcing manual recovery
Date: Fri, 22 Nov 2002 17:07:41 -0500
Sender: bug-gnu-emacs-admin@gnu.org
Message-ID: <FD5A602E96DCD211BC5100A0C9E57F3F074D3F0C@tfsmamsg8.tfn.com>
NNTP-Posting-Host: main.gmane.org
Mime-Version: 1.0
Content-Type: text/plain;
	charset="iso-8859-1"
X-Trace: main.gmane.org 1038002791 23760 80.91.224.249 (22 Nov 2002 22:06:31 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Fri, 22 Nov 2002 22:06:31 +0000 (UTC)
Return-path: <bug-gnu-emacs-admin@gnu.org>
Original-Received: from monty-python.gnu.org ([199.232.76.173])
	by main.gmane.org with esmtp (Exim 3.35 #1 (Debian))
	id 18FLwU-0006B5-00
	for <gnu-bug-gnu-emacs@m.gmane.org>; Fri, 22 Nov 2002 23:06:30 +0100
Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org)
	by monty-python.gnu.org with esmtp (Exim 4.10)
	id 18FLy3-0001Qv-00; Fri, 22 Nov 2002 17:08:07 -0500
Original-Received: from list by monty-python.gnu.org with tmda-scanned (Exim 4.10)
	id 18FLxo-0001PP-00
	for bug-gnu-emacs@gnu.org; Fri, 22 Nov 2002 17:07:52 -0500
Original-Received: from mail by monty-python.gnu.org with spam-scanned (Exim 4.10)
	id 18FLxn-0001OT-00
	for bug-gnu-emacs@gnu.org; Fri, 22 Nov 2002 17:07:52 -0500
Original-Received: from tfmagate1.tfn.com ([198.80.144.160])
	by monty-python.gnu.org with esmtp (Exim 4.10)
	id 18FLxm-0001N8-00
	for bug-gnu-emacs@gnu.org; Fri, 22 Nov 2002 17:07:50 -0500
Original-Received: from tfsmamsg10.tfn.com (tfsmamsg10.tfn.com [164.179.16.12])
	by TFMAGATE1.tfn.com (Switch-2.2.4/Switch-2.2.4/tfn-gw-1.0) with ESMTP id gAMM7mb28638
	for <bug-gnu-emacs@gnu.org>; Fri, 22 Nov 2002 17:07:48 -0500 (EST)
Original-Received: by tfsmamsg10.tfn.com with Internet Mail Service (5.5.2653.19)
	id <WYL4VPFW>; Fri, 22 Nov 2002 17:07:46 -0500
Original-To: "'bug-gnu-emacs@gnu.org'" <bug-gnu-emacs@gnu.org>
X-Mailer: Internet Mail Service (5.5.2653.19)
Errors-To: bug-gnu-emacs-admin@gnu.org
X-BeenThere: bug-gnu-emacs@gnu.org
X-Mailman-Version: 2.0.11
Precedence: bulk
List-Help: <mailto:bug-gnu-emacs-request@gnu.org?subject=help>
List-Post: <mailto:bug-gnu-emacs@gnu.org>
List-Subscribe: <http://mail.gnu.org/mailman/listinfo/bug-gnu-emacs>,
	<mailto:bug-gnu-emacs-request@gnu.org?subject=subscribe>
List-Id: Bug reports for GNU Emacs,
	the Swiss army knife of text editors <bug-gnu-emacs.gnu.org>
List-Unsubscribe: <http://mail.gnu.org/mailman/listinfo/bug-gnu-emacs>,
	<mailto:bug-gnu-emacs-request@gnu.org?subject=unsubscribe>
List-Archive: <http://mail.gnu.org/pipermail/bug-gnu-emacs/>
Xref: main.gmane.org gmane.emacs.bugs:3935
X-Report-Spam: http://spam.gmane.org/gmane.emacs.bugs:3935

Emacs 21.2 under X on Solaris

Executing (menu-bar-mode -1) and (tool-bar-mode -1) in .emacs causes the
frame to shrink by 3 lines.  Restoring all frames to the original height
does not work, unless executed after .emacs completes.

Consider the following:

(defun set-frame-parameter-for-all-frames (attr value)
  (mapc (lambda (frame)
          (modify-frame-parameters frame (list (cons attr value))))
        (frame-list))
  (let ((elt (assq attr default-frame-alist)))
    (if elt
        (setcdr elt value)
      (add-to-list 'default-frame-alist (cons attr value)))))
(let ((height (frame-parameter nil 'height)))
  (tool-bar-mode -1)
  (set-frame-parameter-for-all-frames 'height height)
  (menu-bar-mode -1)
  (set-frame-parameter-for-all-frames 'height height))

I note that the height is correct at this point (using princ), but once
.emacs finishes it becomes 3 lines smaller.