web: add an all accounts link to sidebar

hledger-web/.hledger/web/templates/balancereport.hamlet

@@ -1,11 +1,10 @@
 <div#accountsheading
  accounts
- $if filtering
-  \ #
-  <span.showall
-   <a href=@{here}>show all
 
 <table.balancereport>
+ <tr.item :allaccts:.inacct
+  <td.account colspan=3><a href=@{here}>all accounts
+
  $forall i <- items
   ^{itemAsHtml vd i}
 

hledger-web/Handlers.hs

@@ -134,8 +134,8 @@ balanceReportAsHtml _ vd@VD{here=here,q=q,m=m,qopts=qopts,j=j} (items,total) = $
  where
    l = journalToLedger nullfilterspec j
    numpostingsinacct = length . apostings . ledgerAccount l
-   filtering = not $ null q
    inacctmatcher = inAccountMatcher qopts
+   allaccts = isNothing inacctmatcher
    itemAsHtml :: ViewData -> BalanceReportItem -> Hamlet AppRoute
    itemAsHtml VD{here=here,q=q} (acct, adisplay, aindent, abal) = $(Settings.hamletFile "balancereportitem")
      where