From a9ca74cd7698ee1a5ceda530f9924ff91807b484 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 25 May 1998 16:45:33 +0000 Subject: [PATCH] (make-frame-on-display): Fix previous change. --- lisp/frame.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/frame.el b/lisp/frame.el index b6fcf8ab7f..fc8b6a27ca 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 () -- 2.20.1