--- old/advanced-portfolio.scm	2013-10-13 14:37:15.000000000 -0400
+++ new/advanced-portfolio.scm	2013-10-13 14:36:16.000000000 -0400
@@ -514,7 +514,7 @@
 					 ((and (same-account? current (xaccSplitGetAccount x))
 					       (gnc-numeric-zero-p (xaccSplitGetAmount x))
 					       (not (gnc-numeric-zero-p (xaccSplitGetValue x))))
-					  (dividendcoll 'add commod-currency (xaccSplitGetValue x)))
+					  (dividendcoll 'add commod-currency (gnc-numeric-neg (xaccSplitGetValue x))))
 
 					 ((split-account-type? x ACCT-TYPE-EXPENSE)
 					  (begin
