From df2e5373f7c53eb670955e9912ef8c123711bb4d Mon Sep 17 00:00:00 2001
From: Philip Reetz <p.reetz@linet-services.de>
Date: Fri, 8 Jun 2007 08:07:25 +0000
Subject: [PATCH] Buchungen wurden nicht korrekt angezeigt, wenn gleiche
 Referenz aber unterschiedliche Beschreibung

---
 SL/CA.pm          |  2 ++
 bin/mozilla/ca.pl | 10 +++++-----
 2 files changed, 7 insertions(+), 5 deletions(-)

diff --git a/SL/CA.pm b/SL/CA.pm
index 089bcdc19..b4680ad7a 100644
--- a/SL/CA.pm
+++ b/SL/CA.pm
@@ -370,6 +370,8 @@ sub all_transactions {
       $ca->{debit}  = 0;
     }
 
+    $ca->{index} = $ca->{reference}.$ca->{description};
+
     push(@{ $form->{CA} }, $ca);
 
   }
diff --git a/bin/mozilla/ca.pl b/bin/mozilla/ca.pl
index faac8cc74..23de61bca 100644
--- a/bin/mozilla/ca.pl
+++ b/bin/mozilla/ca.pl
@@ -410,13 +410,13 @@ sub list_transactions {
     $totaldebit  += $ca->{debit};
     $totalcredit += $ca->{credit};
 
-    $column_data{transdate}   = ($ca->{"reference"} ne $last || $form->{sort} ne "transdate") ? qq|<td>$ca->{transdate}</td>| : qq|<td></td>|;
-    $column_data{reference}   = ($ca->{"reference"} ne $last) ? qq|<td>$href</td>| : qq|<td></td>|;
-    $column_data{description} = ($ca->{"reference"} ne $last) ? qq|<td>$ca->{description}</td>| : qq|<td></td>|;
+    $column_data{transdate}   = ($ca->{"index"} ne $last || $form->{sort} ne "transdate") ? qq|<td>$ca->{transdate}</td>| : qq|<td></td>|;
+    $column_data{reference}   = ($ca->{"index"} ne $last) ? qq|<td>$href</td>| : qq|<td></td>|;
+    $column_data{description} = ($ca->{"index"} ne $last) ? qq|<td>$ca->{description}</td>| : qq|<td></td>|;
     
-    $i++ if($ca->{"reference"} ne $last);
+    $i++ if($ca->{"index"} ne $last);
     $i %= 2;
-    $last=$ca->{"reference"};
+    $last=$ca->{"index"};
     print qq|
         <tr class=listrow$i>
 |;
-- 
2.20.1