# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1224709788 0
# Node ID 1f6ba32336894201719e440c973e8c2258938aee
# Parent  731804a3fbe8ffc46690ba52146f4370a6df764a
(make-frame-command): Doc fix.  Use display-graphic-p.

diff -r 731804a3fbe8 -r 1f6ba3233689 lisp/frame.el
--- a/lisp/frame.el	Wed Oct 22 21:06:55 2008 +0000
+++ b/lisp/frame.el	Wed Oct 22 21:09:48 2008 +0000
@@ -674,9 +674,11 @@
       (x-close-connection display))))
 
 (defun make-frame-command ()
-  "Make a new frame, and select it if the terminal displays only one frame."
+  "Make a new frame, on the same terminal as the selected frame.
+If the terminal is a text-only terminal, this also selects the
+new frame."
   (interactive)
-  (if (and window-system (not (eq window-system 'pc)))
+  (if (display-graphic-p)
       (make-frame)
     (select-frame (make-frame))))