From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 25 May 1998 16:45:33 +0000 (+0000)
Subject: (make-frame-on-display): Fix previous change.
X-Git-Tag: emacs-20.3~845
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a9ca74cd7698ee1a5ceda530f9924ff91807b484;p=emacs.git

(make-frame-on-display): Fix previous change.
---

diff --git a/lisp/frame.el b/lisp/frame.el
index b6fcf8ab7fe..fc8b6a27caf 100644
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -414,8 +414,8 @@ These supersede the values given in `default-frame-alist'."
   "Make a frame on display DISPLAY.
 The optional second argument PARAMETERS specifies additional frame parameters."
   (interactive "sMake frame on display: ")
-  (or (string-match "\\`[^:]+:[0-9]+\\(:[0-9]+\\)?\\'" display)
-      (error "Invalid display, not HOST:SERVER or HOST:SERVER:SCREEN"))
+  (or (string-match "\\`[^:]*:[0-9]+\\(\\.[0-9]+\\)?\\'" display)
+      (error "Invalid display, not HOST:SERVER or HOST:SERVER.SCREEN"))
   (make-frame (cons (cons 'display display) parameters)))
 
 (defun make-frame-command ()