(Fhandle_switch_frame): Preserve prefix arg.

diff --git a/src/frame.c b/src/frame.c
index 685761dc2c28ca988213e8509a4f6a066ec6d463..b2c360361bfb02505b16268e37a847324d1a980e 100644 (file)
--- a/src/frame.c
+++ b/src/frame.c
@@ -526,6 +526,8 @@ to that frame.")
   (frame, no_enter)
      Lisp_Object frame, no_enter;
 {
+  /* Preserve prefix arg that the command loop just cleared.  */
+  current_kboard->Vprefix_arg = Vcurrent_prefix_arg;
   return do_switch_frame (frame, no_enter, 0);
 }