Skip to content

Commit

Permalink
Add layout for laptop
Browse files Browse the repository at this point in the history
  • Loading branch information
slipset committed Jan 1, 2018
1 parent ebb9d9c commit b95e9cd
Show file tree
Hide file tree
Showing 3 changed files with 8 additions and 2 deletions.
5 changes: 4 additions & 1 deletion elisp/slipset-display.el
Original file line number Diff line number Diff line change
Expand Up @@ -4,7 +4,10 @@
'4k)
((and (= 3440 (display-pixel-width))
(= 1440 (display-pixel-height)))
'4k-wide)))
'4k-wide)
((and (= 1920 (display-pixel-width))
(= 1200 (display-pixel-height)))
'laptop)))

(when (window-system)
(set-default-font slipset-font-family))
Expand Down
4 changes: 3 additions & 1 deletion elisp/slipset-purpose.el
Original file line number Diff line number Diff line change
Expand Up @@ -13,6 +13,8 @@
(purpose-load-frame-layout layout)
(balance-windows))

(load-layout '4k-wide)
(load-layout (if (eq 'laptop slipset-display)
slipset-display
'4k-wide))

(provide 'slipset-purpose)
1 change: 1 addition & 0 deletions layouts/laptop.window-layout
Original file line number Diff line number Diff line change
@@ -0,0 +1 @@
(nil (0 0 238 73) (:purpose src :purpose-dedicated t :width 0.5042372881355932 :height 0.9864864864864865 :edges (0.0 0.0 0.5042372881355932 0.9864864864864865)) (t (119 0 238 73) (:purpose magit-status :purpose-dedicated t :width 0.5042372881355932 :height 0.4864864864864865 :edges (0.5042372881355932 0.0 1.0084745762711864 0.4864864864864865)) (:purpose clj-repl :purpose-dedicated t :width 0.5042372881355932 :height 0.5 :edges (0.5042372881355932 0.4864864864864865 1.0084745762711864 0.9864864864864865))))

0 comments on commit b95e9cd

Please sign in to comment.