From 1a80ad5272ff85a26effe9452f2ae6c01cab3efe Mon Sep 17 00:00:00 2001
From: syl20bnr <sylvain.benner@gmail.com>
Date: Wed, 20 Feb 2013 14:04:09 -0500
Subject: [PATCH] added window-layout package

---
 init-package/init-window-layout.el | 31 ++++++++++++++++++++++++++++++
 packages.el                        |  1 +
 2 files changed, 32 insertions(+)
 create mode 100644 init-package/init-window-layout.el

diff --git a/init-package/init-window-layout.el b/init-package/init-window-layout.el
new file mode 100644
index 000000000..3c1c4b661
--- /dev/null
+++ b/init-package/init-window-layout.el
@@ -0,0 +1,31 @@
+(require 'window-layout)
+
+;; five windows upper right main
+(setq wm-recipe-1
+      '(| (:left-size-ratio 0.33)
+        (- (:upper-size-ratio 0.5) first second)
+        (- (:upper-size-ratio 0.5) main
+           (| (:left-size-ratio 0.5) third fourth))))
+(setq wm-info-1
+      '((:name main)
+        (:name first)
+        (:name second)
+        (:name third)
+        (:name fourth)))
+
+;; five windows center main
+(setq wm-recipe-2
+      '(| (:left-size-ratio 0.32)
+          (- (:upper-size-ratio 0.5) first second)
+          (| (:left-size-ratio 0.51) main
+             (- (:upper-size-ratio 0.5) third fourth))))
+(setq wm-info-2
+      '((:name main)
+        (:name first)
+        (:name second)
+        (:name third)
+        (:name fourth)))
+
+;; (setq my-default-layout wm-five-upright)
+;; (wlf:refresh my-default-layout)
+;; (wlf:select my-default-layout 'main)
diff --git a/packages.el b/packages.el
index 76f6de82f..16f3ba6c4 100644
--- a/packages.el
+++ b/packages.el
@@ -55,6 +55,7 @@
     sr-speedbar
     surround
     twittering-mode
+    window-layout
     yasnippet
     ))