diff --git a/src/frame.c b/src/frame.c
index 6c8ed6b2d2a..d63a4726047 100644
--- a/src/frame.c
+++ b/src/frame.c
@@ -972,7 +972,10 @@ doesn't support multiple overlapping frames, this function does nothing.")
      Lisp_Object frame;
 {
   CHECK_LIVE_FRAME (frame, 0);
-  
+
+  /* Do like the documentation says. */
+  Fmake_frame_visible (frame);
+
   if (frame_raise_lower_hook)
     (*frame_raise_lower_hook) (XFRAME (frame), 1);