Mercurial > emacs

changeset 11772:b4b862c05017

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Funfocus_frame): Check for live X frame.
author Richard M. Stallman <rms@gnu.org>
date Tue, 09 May 1995 04:47:52 +0000
parents dca858ca7bc8
children bde1a67e0455
files src/xfns.c
diffstat 1 files changed, 9 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/src/xfns.c	Tue May 09 04:46:18 1995 +0000
+++ b/src/xfns.c	Tue May 09 04:47:52 1995 +0000
@@ -3024,12 +3024,16 @@
   "If a frame has been focused, release it.")
   ()
 {
-  struct x_display_info *dpyinfo = FRAME_X_DISPLAY_INFO (selected_frame);
-  if (dpyinfo->x_focus_frame)
+  if (FRAME_X_P (selected_frame))
     {
-      BLOCK_INPUT;
-      x_unfocus_frame (dpyinfo->x_focus_frame);
-      UNBLOCK_INPUT;
+      struct x_display_info *dpyinfo = FRAME_X_DISPLAY_INFO (selected_frame);
+
+      if (dpyinfo->x_focus_frame)
+	{
+	  BLOCK_INPUT;
+	  x_unfocus_frame (dpyinfo->x_focus_frame);
+	  UNBLOCK_INPUT;
+	}
     }
 
   return Qnil;