(do_switch_frame): x_get_focus_frame needs an arg.

(Fredirect_frame_focus): frame_rehighlight_hook needs an arg.

1 files changed, 2 insertions, 2 deletions

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;
 }