[elpa] externals/exwm 18fc95d 01/19: Minor cleanup

[Chris Feng]

branch: externals/exwm
commit 18fc95def2bc6a7c920967ada698d965c07cfd3d
Author: Adrián Medraño Calvo <address@hidden>
Commit: Adrián Medraño Calvo <address@hidden>

    Minor cleanup
    
        * exwm-workspace.el (exwm-workspace--update-workareas): Use
        `make-list' instead of looping.
    
    2016-07-16  Adrián Medraño Calvo  <address@hidden>
---
 exwm-workspace.el |    3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/exwm-workspace.el b/exwm-workspace.el
index 6228d99..82c054f 100644
--- a/exwm-workspace.el
+++ b/exwm-workspace.el
@@ -178,8 +178,7 @@ Value nil means to use the default position which is fixed 
at bottom, while
                                     (list (vector x y width height))))))
       ;; Fall back to use the screen size.
       (let ((workarea (vector 0 0 root-width root-height)))
-        (dotimes (_ exwm-workspace-number)
-          (push workarea workareas))))
+        (setq workareas (make-list exwm-workspace-number workarea))))
     ;; Exclude areas occupied by struts.
     (dolist (struts exwm-workspace--struts)
       (setq edge (aref struts 0)