From 3b8d511bbdc0072e77314e369b3317a56aaf65e6 Mon Sep 17 00:00:00 2001
From: einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Mon, 2 Oct 2006 20:52:15 +0000
Subject: Renamed "get_custom_queries" to "run_custom_queries" for semantic
 clarity.

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@181 4979c152-3d1c-0410-bac9-87ea11338e46
---
 LedgerSMB/AA.pm   | 2 +-
 LedgerSMB/Form.pm | 4 ++--
 LedgerSMB/IS.pm   | 4 ++--
 LedgerSMB/OE.pm   | 6 +++---
 4 files changed, 8 insertions(+), 8 deletions(-)

diff --git a/LedgerSMB/AA.pm b/LedgerSMB/AA.pm
index 16181931..bf6c7224 100755
--- a/LedgerSMB/AA.pm
+++ b/LedgerSMB/AA.pm
@@ -295,7 +295,7 @@ sub post_transaction {
 
 	$dbh->prepare($query)->execute(@queryargs) || $form->dberror($query);
 
-	@queries = $form->get_custom_queries($table, 'INSERT');
+	@queries = $form->run_custom_queries($table, 'INSERT');
 	# update exchangerate
 	my $buy = $form->{exchangerate};
 	my $sell = 0;
diff --git a/LedgerSMB/Form.pm b/LedgerSMB/Form.pm
index 55b563dc..4865e198 100755
--- a/LedgerSMB/Form.pm
+++ b/LedgerSMB/Form.pm
@@ -1296,7 +1296,7 @@ sub db_init {
 	}
 }
 
-sub get_custom_queries {
+sub run_custom_queries {
 	my $dbh = $self->{dbh};
 	my ($self, $tablename, $query_type, $linenum) = @_;
 	if ($query_type !~ /^(select|insert|update)$/i){
@@ -1374,7 +1374,7 @@ sub get_custom_queries {
 			$did_insert = 1;
 		}
 	} elsif ($query_type eq 'UPDATE'){
-		@rc = $self->get_custom_queries(
+		@rc = $self->run_custom_queries(
 			$tablename, $query_type, $linenum);
 	} elsif ($query_type eq 'SELECT'){
 		for (@rc){
diff --git a/LedgerSMB/IS.pm b/LedgerSMB/IS.pm
index 1620bb11..a8a7f811 100755
--- a/LedgerSMB/IS.pm
+++ b/LedgerSMB/IS.pm
@@ -634,7 +634,7 @@ sub post_invoice {
     ($form->{id}) = $sth->fetchrow_array;
     $sth->finish;
 
-    @queries = $form->get_custom_queries('ar', 'INSERT');
+    @queries = $form->run_custom_queries('ar', 'INSERT');
   }
 
 
@@ -1423,7 +1423,7 @@ sub retrieve_invoice {
   my $rc = $dbh->commit;
   $dbh->disconnect;
   
-  @queries = $form->get_custom_queries('ar', 'SELECT');
+  @queries = $form->run_custom_queries('ar', 'SELECT');
   $form->{dbh}->commit;
   $rc;
 
diff --git a/LedgerSMB/OE.pm b/LedgerSMB/OE.pm
index c2b2a283..5ffac31a 100755
--- a/LedgerSMB/OE.pm
+++ b/LedgerSMB/OE.pm
@@ -358,7 +358,7 @@ sub save {
 		$sth->execute(@queryargs) || $form->dberror($query);
 		$sth->finish;
    
-		@queries = $form->get_custom_queries('oe', 'INSERT');
+		@queries = $form->run_custom_queries('oe', 'INSERT');
 
 	}
 
@@ -620,7 +620,7 @@ sub save {
 	$sth->execute(@queryargs) || $form->dberror($query);
 
 	if (!$did_insert){
-		@queries = $form->get_custom_queries('oe', 'UPDATE');
+		@queries = $form->run_custom_queries('oe', 'UPDATE');
 	}
 
 
@@ -940,7 +940,7 @@ sub retrieve {
 		# get recurring transaction
 		$form->get_recurring($dbh);
 
-		@queries = $form->get_custom_queries('oe', 'SELECT');
+		@queries = $form->run_custom_queries('oe', 'SELECT');
 		$form->{dbh}->commit;
 	} else {
 
-- 
cgit v1.2.3