cli: CompoundBalanceCommand: use Html.Attribute.alignleft
This commit is contained in:
parent
823be7c565
commit
8744a0687c
@ -22,7 +22,7 @@ import qualified Data.Text.Lazy.Builder as TB
|
||||
import Data.Time.Calendar (Day, addDays)
|
||||
import System.Console.CmdArgs.Explicit as C (Mode, flagNone, flagReq)
|
||||
import Hledger.Write.Csv (CSV, printCSV, printTSV)
|
||||
import Hledger.Write.Html.Attribute (stylesheet_, collapse, lpad, alignright)
|
||||
import Hledger.Write.Html.Attribute (stylesheet_, collapse, lpad, alignleft, alignright)
|
||||
import qualified Hledger.Write.Html as Html
|
||||
import qualified Hledger.Write.Spreadsheet as Spr
|
||||
import Lucid as L hiding (value_)
|
||||
@ -337,7 +337,7 @@ compoundBalanceReportAsHtml ropts cbr =
|
||||
if average_ ropts then 1 else 0,
|
||||
if layout_ ropts == LayoutBare then 1 else 0
|
||||
]
|
||||
leftattr = style_ "text-align:left"
|
||||
leftattr = style_ alignleft
|
||||
blankrow = tr_ $ td_ [colspanattr] $ toHtmlRaw (" "::String)
|
||||
|
||||
titlerows =
|
||||
|
||||
Loading…
Reference in New Issue
Block a user