web: remove more deprecated html attributes (align) and fix a tag with duplicate style attribute

This commit is contained in:
Thomas R. Koll 2015-12-18 23:12:39 +01:00
parent f9c1902cbb
commit 9f49da3713
3 changed files with 8 additions and 5 deletions

View File

@ -138,7 +138,7 @@ searchform VD{..} = [hamlet|
-- <tr#addbuttonrow> -- <tr#addbuttonrow>
-- <td> -- <td>
-- <span.help>^{formathelp} -- <span.help>^{formathelp}
-- <td align=right> -- <td>
-- <span.help> -- <span.help>
-- Are you sure ? This will overwrite the journal. # -- Are you sure ? This will overwrite the journal. #
-- <input type=hidden name=action value=edit> -- <input type=hidden name=action value=edit>
@ -193,7 +193,7 @@ balanceReportAsHtml _ vd@VD{..} (items',total) =
<td colspan=2> <td colspan=2>
<tr> <tr>
<td> <td>
<td.balance align=right>#{mixedAmountAsHtml total} <td.balance>#{mixedAmountAsHtml total}
|] |]
where where
l = ledgerFromJournal Any j l = ledgerFromJournal Any j
@ -210,11 +210,11 @@ balanceReportAsHtml _ vd@VD{..} (items',total) =
&nbsp; &nbsp;
<a href="@?{acctonlyquery}" title="Show transactions affecting this account but not subaccounts">only <a href="@?{acctonlyquery}" title="Show transactions affecting this account but not subaccounts">only
<td.balance align=right>#{mixedAmountAsHtml abal} <td.balance>#{mixedAmountAsHtml abal}
|] |]
where where
hassubs = not $ maybe False (null.asubs) $ ledgerAccount l acct hassubs = not $ maybe False (null.asubs) $ ledgerAccount l acct
-- <td.numpostings align=right title="#{numpostings} transactions in this account">(#{numpostings}) -- <td.numpostings title="#{numpostings} transactions in this account">(#{numpostings})
-- numpostings = maybe 0 (length.apostings) $ ledgerAccount l acct -- numpostings = maybe 0 (length.apostings) $ ledgerAccount l acct
depthclass = "depth"++show aindent depthclass = "depth"++show aindent
inacctclass = case inacctmatcher of inacctclass = case inacctmatcher of

View File

@ -35,7 +35,7 @@ getJournalR = do
hledgerLayout vd "journal" [hamlet| hledgerLayout vd "journal" [hamlet|
<h2#contenttitle>#{title} <h2#contenttitle>#{title}
<!-- p>Journal entries record movements of commodities between accounts. --> <!-- p>Journal entries record movements of commodities between accounts. -->
<a#addformlink role="button" style="cursor:pointer;" onClick="addformReset(true);" data-toggle="modal" data-target="#addmodal" title="Add a new transaction to the journal" style="margin-top:1em;">Add a transaction <a#addformlink role="button" style="cursor:pointer; margin-top:1em;" onClick="addformReset(true);" data-toggle="modal" data-target="#addmodal" itle="Add a new transaction to the journal" >Add a transaction
^{maincontent} ^{maincontent}
|] |]

View File

@ -128,6 +128,9 @@ tr td:first-child { padding-left:0.3em; }
.amount, .balance { width:2em; } /* minimise width */ .amount, .balance { width:2em; } /* minimise width */
.positive { } .positive { }
td.balance, td.numpostings {
text-align: right;
}
/* table.transactionsreport { border-spacing: 0; } */ /* table.transactionsreport { border-spacing: 0; } */
/* .transactionsreport td { } */ /* .transactionsreport td { } */
/* .transactionsreport pre { margin-top:0; } */ /* .transactionsreport pre { margin-top:0; } */