diff options
| author | Juanma Barranquero <[email protected]> | 2008-11-07 14:52:02 +0000 |
|---|---|---|
| committer | Juanma Barranquero <[email protected]> | 2008-11-07 14:52:02 +0000 |
| commit | 69135f12970865d9d78dd4054f06afbce40c56c0 (patch) | |
| tree | a14f2decae8bdeba3fe67fce7bd6534fb04243bf | |
| parent | e589455f844c3eac609749f4a7bc014f140d09b4 (diff) | |
* frame.el (make-frame-on-display): Use `string-match-p'.
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/frame.el | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 5ae59c620a..9508ebe96e 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2008-11-07 Juanma Barranquero <[email protected]> + + * frame.el (make-frame-on-display): Use `string-match-p'. + 2008-11-07 Glenn Morris <[email protected]> * progmodes/cc-defs.el (cl-macroexpand-all): Fix declaration. diff --git a/lisp/frame.el b/lisp/frame.el index ddd4aea88b..316ab36cae 100644 --- a/lisp/frame.el +++ b/lisp/frame.el @@ -620,7 +620,7 @@ The optional argument PARAMETERS specifies additional frame parameters." ;; On Windows, ignore DISPLAY. (make-frame parameters)) (t - (unless (string-match "\\`[^:]*:[0-9]+\\(\\.[0-9]+\\)?\\'" display) + (unless (string-match-p "\\`[^:]*:[0-9]+\\(\\.[0-9]+\\)?\\'" display) (error "Invalid display, not HOST:SERVER or HOST:SERVER.SCREEN")) (when (and (boundp 'x-initialized) (not x-initialized)) (setq x-display-name display) |