diff options
| author | Jan Djärv | 2012-11-08 20:25:39 +0100 |
|---|---|---|
| committer | Jan Djärv | 2012-11-08 20:25:39 +0100 |
| commit | 531bdce69da4206e8c050bac3b65d991be7f934f (patch) | |
| tree | a2073fe93245e7ca02759ccb7aaaf9b99d599cc1 | |
| parent | 82f84fa3cdebaa4083621e7226f7abab3b8ba88f (diff) | |
| download | emacs-531bdce69da4206e8c050bac3b65d991be7f934f.tar.gz emacs-531bdce69da4206e8c050bac3b65d991be7f934f.zip | |
* server.el (server-create-window-system-frame): Handle Nextstep
specially.
Fixes: debbugs:12780
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/server.el | 4 |
2 files changed, 9 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index fd5acb56d13..bbc36cdf4c3 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2012-11-08 Jan Djärv <jan.h.d@swipnet.se> | ||
| 2 | |||
| 3 | * server.el (server-create-window-system-frame): Handle Nextstep | ||
| 4 | specially (Bug#12780). | ||
| 5 | |||
| 1 | 2012-11-08 Glenn Morris <rgm@gnu.org> | 6 | 2012-11-08 Glenn Morris <rgm@gnu.org> |
| 2 | 7 | ||
| 3 | * mail/emacsbug.el (report-emacs-bug-query-existing-bugs): | 8 | * mail/emacsbug.el (report-emacs-bug-query-existing-bugs): |
diff --git a/lisp/server.el b/lisp/server.el index 7a356a90378..ab0dc95a43f 100644 --- a/lisp/server.el +++ b/lisp/server.el | |||
| @@ -842,6 +842,10 @@ This handles splitting the command if it would be bigger than | |||
| 842 | (unless (assq w window-system-initialization-alist) | 842 | (unless (assq w window-system-initialization-alist) |
| 843 | (setq w nil)) | 843 | (setq w nil)) |
| 844 | 844 | ||
| 845 | ;; Special case for ns. | ||
| 846 | (if (featurep 'ns-win) | ||
| 847 | (setq w 'ns display "ns")) | ||
| 848 | |||
| 845 | (cond (w | 849 | (cond (w |
| 846 | ;; Flag frame as client-created, but use a dummy client. | 850 | ;; Flag frame as client-created, but use a dummy client. |
| 847 | ;; This will prevent the frame from being deleted when | 851 | ;; This will prevent the frame from being deleted when |