diff options
| author | Richard M. Stallman | 1998-05-25 16:45:33 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1998-05-25 16:45:33 +0000 |
| commit | a9ca74cd7698ee1a5ceda530f9924ff91807b484 (patch) | |
| tree | 5eadbb325737defe6bc0f844c7c79e9457a44ac6 | |
| parent | 1eab22b5debc7afd8d74dded20f69eb71a83cb81 (diff) | |
| download | emacs-a9ca74cd7698ee1a5ceda530f9924ff91807b484.tar.gz emacs-a9ca74cd7698ee1a5ceda530f9924ff91807b484.zip | |
(make-frame-on-display): Fix previous change.
| -rw-r--r-- | lisp/frame.el | 4 |
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. |
| 415 | The optional second argument PARAMETERS specifies additional frame parameters." | 415 | The 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 () |