From f6cd9503e62164f9e2513755f95f7c61eeddf51e Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Adri=C3=A1n=20Medra=C3=B1o=20Calvo?= Date: Sat, 19 Mar 2016 00:00:00 +0000 Subject: [PATCH] Minor cleanup * exwm-layout.el (exwm-layout--refresh): Reuse car. --- exwm-layout.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/exwm-layout.el b/exwm-layout.el index 6825cb56d..fd8c164d9 100644 --- a/exwm-layout.el +++ b/exwm-layout.el @@ -282,11 +282,11 @@ (if (not windows) (when (eq frame exwm--frame) ;for exwm-layout-show-all-buffers (exwm-layout--hide exwm--id)) - (if (eq frame exwm--frame) - (exwm-layout--show exwm--id (car windows)) - (exwm-workspace-move-window - (cl-position frame exwm-workspace--list) exwm--id)) (let ((window (car windows))) + (if (eq frame exwm--frame) + (exwm-layout--show exwm--id window) + (exwm-workspace-move-window + (cl-position frame exwm-workspace--list) exwm--id)) ;; Make sure this buffer is not displayed elsewhere (dolist (i (get-buffer-window-list (current-buffer) 0 t)) (unless (eq i window)