diff --git a/hledger-web/.hledger/web/templates/balancereportitem.hamlet b/hledger-web/.hledger/web/templates/balancereportitem.hamlet
index 747f2d2f6..3938e9be0 100644
--- a/hledger-web/.hledger/web/templates/balancereportitem.hamlet
+++ b/hledger-web/.hledger/web/templates/balancereportitem.hamlet
@@ -3,8 +3,9 @@
   #{indent}
   <a href="@?{acctquery}" title="Focus on this account">#{adisplay}
   <span.hoverlinks
-   &nbsp;
-   <a href="@?{acctsquery}" title="Focus on this account and sub-accounts">+subs
+   $if hassubs
+    &nbsp;
+    <a href="@?{acctsquery}" title="Focus on this account and sub-accounts">+subs
    <!--
     &nbsp;
     <a href="@?{acctsonlyquery}" title="Focus on this account and sub-accounts and hide others">-others -->
diff --git a/hledger-web/Handlers.hs b/hledger-web/Handlers.hs
index 98728e9dd..5ddc399e1 100644
--- a/hledger-web/Handlers.hs
+++ b/hledger-web/Handlers.hs
@@ -143,6 +143,7 @@ balanceReportAsHtml _ vd@VD{here=here,m=m,q=q,qopts=qopts,j=j} (items',total) =
    itemAsHtml :: ViewData -> BalanceReportItem -> Hamlet AppRoute
    itemAsHtml VD{here=here,q=q} (acct, adisplay, aindent, abal) = $(Settings.hamletFile "balancereportitem")
      where
+       hassubs = not $ null $ ledgerSubAccounts l $ ledgerAccount l acct
        numpostings = length $ apostings $ ledgerAccount l acct
        depthclass = "depth"++show aindent
        inacctclass = case inacctmatcher of