X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/34035b33f21af21316df798b19f2a758aa86b3a8..76592c8a3:/bin/mozilla/wh.pl

diff --git a/bin/mozilla/wh.pl b/bin/mozilla/wh.pl
index fb359085e..fe37c26da 100644
--- a/bin/mozilla/wh.pl
+++ b/bin/mozilla/wh.pl
@@ -23,7 +23,8 @@
 # GNU General Public License for more details.
 # You should have received a copy of the GNU General Public License
 # along with this program; if not, write to the Free Software
-# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
+# MA 02110-1335, USA.
 #
 #######################################################################
 #
@@ -754,14 +755,14 @@ sub generate_journal {
 
    my $allrows = 0;
    $allrows = 1 if $form->{report_generator_output_format} ne 'HTML' ;
- 
+
    # manual paginating
    my $pages = {};
    $pages->{per_page}        = $::form->{per_page} || 15;
    my $first_nr = ($page - 1) * $pages->{per_page};
    my $last_nr  = $first_nr + $pages->{per_page};
    my $idx       = 0;
- 
+
   foreach my $entry (@contents) {
     $entry->{qty}        = $form->format_amount_units('amount'     => $entry->{qty},
                                                       'part_unit'  => $entry->{partunit},
@@ -977,7 +978,7 @@ sub generate_report {
     }
 
     if ( $allrows || ($idx >= $first_nr && $idx < $last_nr )) {
-	$report->add_data($row_set);
+      $report->add_data($row_set);
     }
     $idx++;
   }