diff options
| author | Karoly Lorentey | 2006-01-02 09:07:22 +0000 |
|---|---|---|
| committer | Karoly Lorentey | 2006-01-02 09:07:22 +0000 |
| commit | d5381da22a073d7b430460ff0d2935066683ac09 (patch) | |
| tree | f50d5fdf19d2364a738c41211b2af9550de3bdcf | |
| parent | aabf0cb9f0f4dff1f57554ae2862fc280ce2f3a6 (diff) | |
| download | emacs-d5381da22a073d7b430460ff0d2935066683ac09.tar.gz emacs-d5381da22a073d7b430460ff0d2935066683ac09.zip | |
Fix last frame check in server.el.
* lisp/server.el (server-handle-delete-frame): Fix last frame check.
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-487
| -rw-r--r-- | lisp/server.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/server.el b/lisp/server.el index b9cca58ead4..f8f3c510d07 100644 --- a/lisp/server.el +++ b/lisp/server.el | |||
| @@ -322,7 +322,7 @@ message." | |||
| 322 | (when (and (frame-live-p frame) | 322 | (when (and (frame-live-p frame) |
| 323 | proc | 323 | proc |
| 324 | ;; See if this is the last frame for this client. | 324 | ;; See if this is the last frame for this client. |
| 325 | (< 1 (let ((frame-num 0)) | 325 | (>= 1 (let ((frame-num 0)) |
| 326 | (dolist (f (frame-list)) | 326 | (dolist (f (frame-list)) |
| 327 | (when (eq proc (frame-parameter f 'client)) | 327 | (when (eq proc (frame-parameter f 'client)) |
| 328 | (setq frame-num (1+ frame-num)))) | 328 | (setq frame-num (1+ frame-num)))) |