HCoop
/
bpt
/
portal.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
eafe3d5
)
Fix bug in specifying custom payment descriptions
author
Adam Chlipala
<adamc@hcoop.net>
Sat, 12 Apr 2008 13:21:18 +0000
(13:21 +0000)
committer
Adam Chlipala
<adamc@hcoop.net>
Sat, 12 Apr 2008 13:21:18 +0000
(13:21 +0000)
money.mlt
patch
|
blob
|
blame
|
history
diff --git
a/money.mlt
b/money.mlt
index
793e2ed
..
331c079
100644
(file)
--- a/
money.mlt
+++ b/
money.mlt
@@
-205,7
+205,7
@@
end %></textarea></td> </tr>
val amount = Web.stor ($"amount");
val descr = $"descr";
val descr = iff descr = "" then $"descr2" else descr;
- val id = Money.addTransaction (
$"descr"
, amount, $"d");
+ val id = Money.addTransaction (
descr
, amount, $"d");
Money.addCharge {trn = id, usr = Web.stoi ($"usr"), amount = amount};
Money.applyCharges id;