diff options
| author | Chong Yidong | 2008-10-12 13:45:58 +0000 |
|---|---|---|
| committer | Chong Yidong | 2008-10-12 13:45:58 +0000 |
| commit | c1461986d175cced4c180752aaaa56d1b466da3e (patch) | |
| tree | 4b14333104e2b09db705aeef1c770e570e0682bf | |
| parent | e4779829b09ff2cfda7fc7fd49c3044f19f6701c (diff) | |
| download | emacs-c1461986d175cced4c180752aaaa56d1b466da3e.tar.gz emacs-c1461986d175cced4c180752aaaa56d1b466da3e.zip | |
(x-create-frame-with-faces): Don't call tool-bar-setup.
| -rw-r--r-- | lisp/faces.el | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/lisp/faces.el b/lisp/faces.el index 269a90972c0..4e4b926f4fd 100644 --- a/lisp/faces.el +++ b/lisp/faces.el | |||
| @@ -1977,7 +1977,6 @@ Value is the new parameter list." | |||
| 1977 | 1977 | ||
| 1978 | (declare-function x-create-frame "xfns.c" (parms)) | 1978 | (declare-function x-create-frame "xfns.c" (parms)) |
| 1979 | (declare-function x-setup-function-keys "term/x-win" (frame)) | 1979 | (declare-function x-setup-function-keys "term/x-win" (frame)) |
| 1980 | (declare-function tool-bar-setup "tool-bar" (&optional frame)) | ||
| 1981 | 1980 | ||
| 1982 | (defun x-create-frame-with-faces (&optional parameters) | 1981 | (defun x-create-frame-with-faces (&optional parameters) |
| 1983 | "Create a frame from optional frame parameters PARAMETERS. | 1982 | "Create a frame from optional frame parameters PARAMETERS. |
| @@ -2004,10 +2003,6 @@ Value is the new frame created." | |||
| 2004 | (x-handle-reverse-video frame parameters) | 2003 | (x-handle-reverse-video frame parameters) |
| 2005 | (frame-set-background-mode frame) | 2004 | (frame-set-background-mode frame) |
| 2006 | (face-set-after-frame-default frame parameters) | 2005 | (face-set-after-frame-default frame parameters) |
| 2007 | ;; Make sure the tool-bar is ready to be enabled. The | ||
| 2008 | ;; `tool-bar-lines' frame parameter will not take effect | ||
| 2009 | ;; without this call. | ||
| 2010 | (tool-bar-setup frame) | ||
| 2011 | (if (null visibility-spec) | 2006 | (if (null visibility-spec) |
| 2012 | (make-frame-visible frame) | 2007 | (make-frame-visible frame) |
| 2013 | (modify-frame-parameters frame (list visibility-spec))) | 2008 | (modify-frame-parameters frame (list visibility-spec))) |