removing sub branches (commited by chris for MARC=OFF bugfix, but sub branches is...
authortipaul <tipaul>
Wed, 24 Nov 2004 16:00:01 +0000 (16:00 +0000)
committertipaul <tipaul>
Wed, 24 Nov 2004 16:00:01 +0000 (16:00 +0000)
C4/Biblio.pm

index 2a2bd8b..0a62644 100644 (file)
@@ -2623,21 +2623,6 @@ sub FindDuplicate {
        return;
 }
 
-sub branches {                                                                                                                   
-        my $dbh   = C4::Context->dbh;                                                                                                
-        my $sth   = $dbh->prepare("Select * from branches order by branchname");                                                     
-        my @results = ();                                                                                                            
-                                                                                                                                     
-        $sth->execute();                                                                                                             
-        while (my $data = $sth->fetchrow_hashref) {                                                                                  
-                   push(@results,$data);                                                                                                    
-               } # while                                                                                                                    
-                                                                                                                                     
-        $sth->finish;                                                                                                                
-        return(scalar(@results), @results);                                                                                          
-} # sub branches
-
-
 END { }    # module clean-up code here (global destructor)
 
 =back
@@ -2652,6 +2637,9 @@ Paul POULAIN paul.poulain@free.fr
 
 # $Id$
 # $Log$
+# Revision 1.110  2004/11/24 16:00:01  tipaul
+# removing sub branches (commited by chris for MARC=OFF bugfix, but sub branches is already in Acquisition.pm)
+#
 # Revision 1.109  2004/11/24 15:58:31  tipaul
 # * critical fix for acquisition (see RC3 release notes)
 # * critical fix for duplicate finder