From 10c71cb447a9f067d1b4011a28f49fb37d1c4e5b Mon Sep 17 00:00:00 2001
From: Saku Laesvuori <saku@laesvuori.fi>
Date: Fri, 16 Jan 2026 11:48:59 +0200
Subject: [PATCH] Display posting tags in hledger-web

---
 hledger-web/Hledger/Web/Handler/JournalR.hs |  1 +
 hledger-web/static/hledger.css              |  2 +-
 hledger-web/templates/journal.hamlet        | 22 +++++++++++++++------
 3 files changed, 18 insertions(+), 7 deletions(-)

diff --git a/hledger-web/Hledger/Web/Handler/JournalR.hs b/hledger-web/Hledger/Web/Handler/JournalR.hs
index 1e0ff4b48..68ac91b1c 100644
--- a/hledger-web/Hledger/Web/Handler/JournalR.hs
+++ b/hledger-web/Hledger/Web/Handler/JournalR.hs
@@ -33,6 +33,7 @@ getJournalR = do
         entriesReport rspec j
       transactionFrag = transactionFragment j
       isVisibleTag = not . isHiddenTagName . fst
+      isPostingTag account tag = not $ tag `elem` journalInheritedAccountTags j account
 
   defaultLayout $ do
     setTitle "päiväkirja - hledger-web"
diff --git a/hledger-web/static/hledger.css b/hledger-web/static/hledger.css
index 1c59fe8ed..aa111b704 100644
--- a/hledger-web/static/hledger.css
+++ b/hledger-web/static/hledger.css
@@ -214,7 +214,7 @@ ul {
     padding-left: 2em;
 }
 
-.transaction .posting {
+.transaction .posting-row {
     display: flex;
     justify-content: space-between;
 }
diff --git a/hledger-web/templates/journal.hamlet b/hledger-web/templates/journal.hamlet
index 6e2d45955..26a19fe82 100644
--- a/hledger-web/templates/journal.hamlet
+++ b/hledger-web/templates/journal.hamlet
@@ -26,13 +26,23 @@ $if elem AddPermission perms
                     #{tagValue}
 
         <ul .postings>
-          $forall Posting { paccount = acc, pamount = amt } <- tpostings torig
+          $forall Posting { paccount = acc, pamount = amt, ptags = tags } <- tpostings torig
             <li .posting>
-              <div .account>
-                <a href="@?{acctlink acc}##{tindex torig}" title="#{acc}">
-                  #{elideAccountName 40 acc}
-              <div .amount style="text-align:right;">
-                ^{mixedAmountAsHtml amt}
+              <div .posting-row>
+                <div .account>
+                  <a href="@?{acctlink acc}##{tindex torig}" title="#{acc}">
+                    #{elideAccountName 40 acc}
+                <div .amount style="text-align:right;">
+                  ^{mixedAmountAsHtml amt}
+              $if null $ filter (isPostingTag acc) $ filter isVisibleTag tags
+              $else
+                <ul .tags>
+                  $forall (tagName, tagValue) <- filter (isPostingTag acc) $ filter isVisibleTag tags
+                    <li .tag title="#{mconcat [tagName, ": ", tagValue]}">
+                      <div .tag-name>
+                        #{tagName}
+                      <div .tag-value>
+                        #{tagValue}
 
 $if elem AddPermission perms
   ^{addModal AddR j today}