From 5d677fc17438c04d2bd3ab52b9f5d7c7c72eb95a Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Dominik=20S=C3=BC=C3=9F?= <dominik.suess@outlook.at>
Date: Sat, 22 Oct 2016 11:13:35 +0200
Subject: [PATCH] Persistent sidebar state

---
 hledger-web/Handler/Common.hs | 9 +++++++--
 hledger-web/static/hledger.js | 5 +++--
 2 files changed, 10 insertions(+), 4 deletions(-)

diff --git a/hledger-web/Handler/Common.hs b/hledger-web/Handler/Common.hs
index 72eedfff0..f9bb99c8b 100644
--- a/hledger-web/Handler/Common.hs
+++ b/hledger-web/Handler/Common.hs
@@ -36,10 +36,13 @@ hledgerLayout vd title content = do
       toWidget [hamlet|
          ^{topbar vd}
          ^{sidebar vd}
-         <div #main-content .col-md-8 .col-xs-12 .col-sm-8>
+         <div #main-content .col-xs-12 .#{showmd} .#{showsm}>
           ^{searchform vd}
           ^{content}
       |]
+  where
+    showmd = if showsidebar vd then "col-md-8" else "col-md-12" :: String
+    showsm = if showsidebar vd then "col-sm-8" else "col-sm-12" :: String
 
 -- | Global toolbar/heading area.
 topbar :: ViewData -> HtmlUrl AppRoute
@@ -59,7 +62,7 @@ topbar VD{..} = [hamlet|
 sidebar :: ViewData -> HtmlUrl AppRoute
 sidebar vd@VD{..} =
  [hamlet|
- <div #sidebar-menu .col-md-4 .col-sm-4 .sidebar-offcanvas>
+ <div #sidebar-menu .#{showmd} .#{showsm} .sidebar-offcanvas>
   <ul .main-menu .nav .nav-stacked .affix-top>
    <li .top>
     <a href=@{JournalR} .#{journalcurrent} title="Show general journal entries, most recent first">Journal
@@ -68,6 +71,8 @@ sidebar vd@VD{..} =
  where
   journalcurrent = if here == JournalR then "inacct" else "" :: String
   accounts = balanceReportAsHtml opts vd $ balanceReport (reportopts_ $ cliopts_ opts){empty_=True} am j
+  showmd = if showsidebar then "col-md-4" else "col-any-0" :: String
+  showsm = if showsidebar then "col-sm-4" else "" :: String
 
 -- -- | Navigation link, preserving parameters and possibly highlighted.
 -- navlink :: ViewData -> String -> AppRoute -> String -> HtmlUrl AppRoute
diff --git a/hledger-web/static/hledger.js b/hledger-web/static/hledger.js
index 69c380c98..f9b5be587 100644
--- a/hledger-web/static/hledger.js
+++ b/hledger-web/static/hledger.js
@@ -221,8 +221,9 @@ function addformDeletePosting() {
 // SIDEBAR
 
 function sidebarToggle() {
-  $('#sidebar-menu').toggleClass('col-md-4 col-any-0');
-  $('#main-content').toggleClass('col-md-8 col-md-12');
+  $('#sidebar-menu').toggleClass('col-md-4 col-sm-4 col-any-0');
+  $('#main-content').toggleClass('col-md-8 col-sm-8 col-md-12 col-sm-12');
+  $.cookie('showsidebar', $('#sidebar-menu').hasClass('col-any-0') ? '0' : '1');
 }
 
 //----------------------------------------------------------------------