diff --git a/src/spaces/layout/fixed.cljs b/src/spaces/layout/fixed.cljs index 70b260e..f65a0a5 100644 --- a/src/spaces/layout/fixed.cljs +++ b/src/spaces/layout/fixed.cljs @@ -2,35 +2,54 @@ (:require [spaces.core :as spaces])) -(defn main-top [{:keys [top main top-size height width] +(defn main-top [{:keys [top main top-size height width scrollable resizeable-top] :or {top-size 50 height "100%" - width "100%"}}] + width "100%" + scrollable false + resizeable-top true}}] ;(println "layout-fixed mt ...") [spaces/fixed {:height height :width width} - [spaces/top-resizeable {:size top-size} top] - [spaces/fill {:scrollable false} + (if resizeable-top + [spaces/top-resizeable {:size top-size :scrollable scrollable} top] + [spaces/top {:size top-size :scrollable scrollable} top]) + [spaces/fill {:scrollable scrollable} main]]) -(defn left-right-top [{:keys [top left right top-px left-size height width] +(defn left-right-top [{:keys [top left right top-px left-size height width scrollable resizeable-left resizeable-top] :or {top-px 50 left-size "50%" height "100%" - width "100%"}}] + width "100%" + scrollable false + resizeable-top true + resizeable-left true}}] ;(println "layout-fixed lrt ...") [spaces/fixed {:height height :width width} - [spaces/top-resizeable {:size top-px} top] + (if resizeable-top + [spaces/top-resizeable {:size top-px} top] + [spaces/top {:size top-px} top]) [spaces/fill - [spaces/left-resizeable {:size left-size :scrollable false} left] - [spaces/fill {:scrollable false} right]]]) + (if resizeable-left + [spaces/left-resizeable {:size left-size :scrollable scrollable} left] + [spaces/left {:size left-size :scrollable scrollable} left]) + [spaces/fill {:scrollable scrollable} right]]]) -(defn left-right-middle [{:keys [left right middle left-size right-size height width] +(defn left-right-middle [{:keys [left right middle left-size right-size height width scrollable + resizeable-left resizeable-right] :or {left-size "25%" right-size "25%" height "100%" - width "100%"}}] + width "100%" + scrollable false + resizeable-left true + resizeable-right true}}] ;(println "layout-fixed lrm ...") [spaces/fixed {:height height :width width} - [spaces/left-resizeable {:size left-size} left] - [spaces/right-resizeable {:size right-size} right] - [spaces/fill {:scrollable false} middle]]) + (if resizeable-left + [spaces/left-resizeable {:size left-size :scrollable scrollable} left] + [spaces/left {:size left-size :scrollable scrollable} left]) + (if resizeable-right + [spaces/right-resizeable {:size right-size :scrollable scrollable} right] + [spaces/right {:size right-size :scrollable scrollable} right]) + [spaces/fill {:scrollable scrollable} middle]])