Mercurial > emacs

changeset 83764:0a6fac24d74d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(make_terminal_frame): Yet Another Int/Lisp_Object Mixup. (Fmodify_frame_parameters): Return a value.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 29 Aug 2007 21:47:40 +0000
parents 14a686983252
children 8566d2441c99
files src/frame.c
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/frame.c	Wed Aug 29 21:47:11 2007 +0000
+++ b/src/frame.c	Wed Aug 29 21:47:40 2007 +0000
@@ -625,7 +625,7 @@
     FRAME_VERTICAL_SCROLL_BAR_TYPE (f) = vertical_scroll_bar_none;
 
     /* Set the top frame to the newly created frame. */
-    if (FRAME_TTY (f)->top_frame
+    if (FRAMEP (FRAME_TTY (f)->top_frame)
         && FRAME_LIVE_P (XFRAME (FRAME_TTY (f)->top_frame)))
       XFRAME (FRAME_TTY (f)->top_frame)->async_visible = 2; /* obscured */
     
@@ -2613,6 +2613,7 @@
 	    call1 (Qframe_set_background_mode, frame);
 	}
     }
+  return Qnil;
 }
 
 DEFUN ("frame-with-environment", Fframe_with_environment, Sframe_with_environment, 0, 1, 0,