aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/frame.el4
1 files changed, 2 insertions, 2 deletions
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'."
414 "Make a frame on display DISPLAY. 414 "Make a frame on display DISPLAY.
415The optional second argument PARAMETERS specifies additional frame parameters." 415The optional second argument PARAMETERS specifies additional frame parameters."
416 (interactive "sMake frame on display: ") 416 (interactive "sMake frame on display: ")
417 (or (string-match "\\`[^:]+:[0-9]+\\(:[0-9]+\\)?\\'" display) 417 (or (string-match "\\`[^:]*:[0-9]+\\(\\.[0-9]+\\)?\\'" display)
418 (error "Invalid display, not HOST:SERVER or HOST:SERVER:SCREEN")) 418 (error "Invalid display, not HOST:SERVER or HOST:SERVER.SCREEN"))
419 (make-frame (cons (cons 'display display) parameters))) 419 (make-frame (cons (cons 'display display) parameters)))
420 420
421(defun make-frame-command () 421(defun make-frame-command ()