mirror of
https://github.com/Gnucash/gnucash.git
synced 2025-02-25 18:55:30 -06:00
Merge branch 'maint'
This commit is contained in:
commit
81fb773856
@ -48,7 +48,6 @@
|
||||
<slot:value type="string">true</slot:value>
|
||||
</slot>
|
||||
</act:slots>
|
||||
<act:parent type="new">1972cce2e2364f95b2b0bc014502661d</act:parent>
|
||||
</gnc:account>
|
||||
<gnc:account version="2.0.0">
|
||||
<act:name>Mortgage Loan</act:name>
|
||||
|
@ -48,7 +48,6 @@
|
||||
<slot:value type="string">true</slot:value>
|
||||
</slot>
|
||||
</act:slots>
|
||||
<act:parent type="new">1972cce2e2364f95b2b0bc014502661d</act:parent>
|
||||
</gnc:account>
|
||||
<gnc:account version="2.0.0">
|
||||
<act:name>Other Loan</act:name>
|
||||
|
@ -48,7 +48,6 @@
|
||||
<slot:value type="string">true</slot:value>
|
||||
</slot>
|
||||
</act:slots>
|
||||
<act:parent type="new">1972cce2e2364f95b2b0bc014502661d</act:parent>
|
||||
</gnc:account>
|
||||
<gnc:account version="2.0.0">
|
||||
<act:name>Retirement</act:name>
|
||||
|
@ -48,7 +48,6 @@
|
||||
<slot:value type="string">true</slot:value>
|
||||
</slot>
|
||||
</act:slots>
|
||||
<act:parent type="new">1972cce2e2364f95b2b0bc014502661d</act:parent>
|
||||
</gnc:account>
|
||||
<gnc:account version="2.0.0">
|
||||
<act:name>Spouse Retirement</act:name>
|
||||
|
@ -48,7 +48,6 @@
|
||||
<slot:value type="string">true</slot:value>
|
||||
</slot>
|
||||
</act:slots>
|
||||
<act:parent type="new">1972cce2e2364f95b2b0bc014502661d</act:parent>
|
||||
</gnc:account>
|
||||
<gnc:account version="2.0.0">
|
||||
<act:name>Mortgage Loan</act:name>
|
||||
|
@ -48,7 +48,6 @@
|
||||
<slot:value type="string">true</slot:value>
|
||||
</slot>
|
||||
</act:slots>
|
||||
<act:parent type="new">1972cce2e2364f95b2b0bc014502661d</act:parent>
|
||||
</gnc:account>
|
||||
<gnc:account version="2.0.0">
|
||||
<act:name>Other Loan</act:name>
|
||||
|
@ -48,7 +48,6 @@
|
||||
<slot:value type="string">true</slot:value>
|
||||
</slot>
|
||||
</act:slots>
|
||||
<act:parent type="new">1972cce2e2364f95b2b0bc014502661d</act:parent>
|
||||
</gnc:account>
|
||||
<gnc:account version="2.0.0">
|
||||
<act:name>Retirement</act:name>
|
||||
|
@ -48,7 +48,6 @@
|
||||
<slot:value type="string">true</slot:value>
|
||||
</slot>
|
||||
</act:slots>
|
||||
<act:parent type="new">1972cce2e2364f95b2b0bc014502661d</act:parent>
|
||||
</gnc:account>
|
||||
<gnc:account version="2.0.0">
|
||||
<act:name>Spouse Retirement</act:name>
|
||||
|
@ -438,12 +438,13 @@
|
||||
)
|
||||
|
||||
(define (my-exchange-fn fromunits tocurrency)
|
||||
(if (and use-txn
|
||||
(gnc-commodity-equiv currency tocurrency)
|
||||
(if (and (gnc-commodity-equiv currency tocurrency)
|
||||
(gnc-commodity-equiv (gnc:gnc-monetary-commodity fromunits) commodity))
|
||||
(gnc:make-gnc-monetary tocurrency
|
||||
(gnc-numeric-mul (gnc:gnc-monetary-amount fromunits)
|
||||
(gnc:gnc-monetary-amount price)
|
||||
(if use-txn
|
||||
(gnc:gnc-monetary-amount price)
|
||||
(gnc-price-get-value price))
|
||||
currency-frac GNC-RND-ROUND))
|
||||
(exchange-fn fromunits tocurrency)))
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user