SF.net SVN: ledger-smb:[5870] trunk/LedgerSMB.pm

[..hidden..]

Revision: 5870
          http://sourceforge.net/p/ledger-smb/code/5870
Author:   einhverfr
Date:     2013-05-26 04:45:21 +0000 (Sun, 26 May 2013)
Log Message:
-----------
Removing unused redo_rows function from LedgerSMB.pm.  This function was copied in from 1.2's Form.pm but never used in new code.  There is really no reason to keep it.

Modified Paths:
--------------
    trunk/LedgerSMB.pm

Modified: trunk/LedgerSMB.pm
===================================================================
--- trunk/LedgerSMB.pm	2013-05-25 16:35:17 UTC (rev 5869)
+++ trunk/LedgerSMB.pm	2013-05-26 04:45:21 UTC (rev 5870)
@@ -96,13 +96,6 @@
 $self->{callback}, and if this is not set, goes to an info screen and prints
 $msg.
 
-=item redo_rows (fields => ..hidden.., count => $integer, [index => $string);
-
-This function is undergoing serious redesign at the moment.  If index is 
-defined, that field is used for ordering the rows.  If not, runningnumber is 
-used.  Behavior is not defined when index points to a field containing 
-non-numbers.
-
 =item set (@attrs)
 
 Copies the given key=>vars to $self. Allows for finer control of 
@@ -993,32 +986,6 @@
    die $dbh->state . ":" . $dbh->errstr;
 }
 
-sub redo_rows {
-
-    my $self  = shift @_;
-    my %args  = @_;
-    my @flds  = @{ $args{fields} };
-    my $count = $args{count};
-    my $index = ( $args{index} ) ? $args{index} : 'runningnumber';
-
-    my @rows;
-    my $i;    # increment counter use only
-    for $i ( 1 .. $count ) {
-        my $temphash = { _inc => $i };
-        for my $fld (@flds) {
-            $temphash->{$fld} = $self->{ "$fld" . "_$i" };
-        }
-        push @rows, $temphash;
-    }
-    $i = 1;
-    for my $row ( sort { $a->{$index} <=> $b->{$index} } @rows ) {
-        for my $fld (@flds) {
-            $self->{ "$fld" . "_$i" } = $row->{$fld};
-        }
-        ++$i;
-    }
-}
-
 sub merge {
     (my $package,my $filename,my $line)=caller;
     my ( $self, $src ) = @_;

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.