[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/exwm 624c729 2/3: Fix an bug for emacsclient
From: |
Chris Feng |
Subject: |
[elpa] externals/exwm 624c729 2/3: Fix an bug for emacsclient |
Date: |
Tue, 19 Jul 2016 11:38:28 +0000 (UTC) |
branch: externals/exwm
commit 624c72945a529c8221d12882063c7115af15a4c5
Author: Chris Feng <address@hidden>
Commit: Chris Feng <address@hidden>
Fix an bug for emacsclient
* exwm-workspace.el (exwm-workspace--init): Always create one initial
workspace by default.
---
exwm-workspace.el | 12 ++++--------
1 file changed, 4 insertions(+), 8 deletions(-)
diff --git a/exwm-workspace.el b/exwm-workspace.el
index 5d4d78f..438ccdc 100644
--- a/exwm-workspace.el
+++ b/exwm-workspace.el
@@ -1234,14 +1234,10 @@ applied to all subsequently created X frames."
(setq exwm-workspace--timer
(run-with-idle-timer 0 t #'exwm-workspace--on-echo-area-dirty))
(add-hook 'echo-area-clear-hook #'exwm-workspace--on-echo-area-clear)
- ;; Recreate frames with the external minibuffer set.
- (setq initial-workspaces
- (mapcar
- (lambda (_)
- (make-frame '((window-system . x)
- (internal-border-width . 0)
- (client . nil))))
- initial-workspaces))
+ ;; Recreate one frame with the external minibuffer set.
+ (setq initial-workspaces (list (make-frame '((window-system . x)
+ (internal-border-width . 0)
+ (client . nil)))))
;; The default behavior of `display-buffer' (indirectly called by
;; `minibuffer-completion-help') is not correct here.
(cl-pushnew '(exwm-workspace--display-buffer) display-buffer-alist