From: Karl Heuer <kwzh@gnu.org>
Date: Mon, 24 Apr 1995 16:55:29 +0000 (+0000)
Subject: (do_switch_frame): x_get_focus_frame needs an arg.
X-Git-Tag: emacs-19.34~4329
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d7266360d10c8adb04b6230141a6426a8f1e4549;p=emacs.git

(do_switch_frame): x_get_focus_frame needs an arg.
(Fredirect_frame_focus): frame_rehighlight_hook needs an arg.
---

diff --git a/src/frame.c b/src/frame.c
index b95f8a04e70..ff6e7cd10ac 100644
--- a/src/frame.c
+++ b/src/frame.c
@@ -455,7 +455,7 @@ do_switch_frame (frame, no_enter, track)
     {
       Lisp_Object focus, xfocus;
 
-      xfocus = x_get_focus_frame ();
+      xfocus = x_get_focus_frame (XFRAME (frame));
       if (FRAMEP (xfocus))
 	{
 	  focus = FRAME_FOCUS_FRAME (XFRAME (xfocus));
@@ -1411,7 +1411,7 @@ The redirection lasts until `redirect-frame-focus' is called to change it.")
 #endif
 
   if (frame_rehighlight_hook)
-    (*frame_rehighlight_hook) ();
+    (*frame_rehighlight_hook) (XFRAME (focus_frame));
   
   return Qnil;
 }