From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 25 Oct 1994 09:49:53 +0000 (+0000)
Subject: (make-frame-on-display): New function.
X-Git-Tag: emacs-19.34~6168
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6d73e33747cb5d62436760158d1eaf8e090061e9;p=emacs.git

(make-frame-on-display): New function.
---

diff --git a/lisp/frame.el b/lisp/frame.el
index 39cb483acc3..577771c5901 100644
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -393,6 +393,12 @@ These supersede the values given in `default-frame-alist'.")
 				  (> (minibuffer-depth) 0)
 				  t)))
 
+(defun make-frame-on-display (display &optional parameters)
+  "Make a frame on display DISPLAY.
+The optional second argument PARAMETERS specifies additional frame parameters."
+  (interactive "sMake frame on display: ")
+  (make-frame (cons (cons 'display display) parameters)))
+
 ;; Alias, kept temporarily.
 (defalias 'new-frame 'make-frame)
 (defun make-frame (&optional parameters)