From c5121d804d44fb85e29425be427d0827edabefef Mon Sep 17 00:00:00 2001
From: Liwiusz Ociepa <liwiusz.ociepa@softwarelab.eu>
Date: Thu, 8 May 2008 17:10:25 +0000
Subject: Fix when you don't define RedmineDbWhereClause

git-svn-id: http://redmine.rubyforge.org/svn/branches/swistak@1422 e93f8b46-1217-0410-a6f0-8f06a7374b81
---
 extra/svn/Redmine.pm | 14 +++++++++-----
 1 file changed, 9 insertions(+), 5 deletions(-)

diff --git a/extra/svn/Redmine.pm b/extra/svn/Redmine.pm
index 0087c138e..ce08bd337 100644
--- a/extra/svn/Redmine.pm
+++ b/extra/svn/Redmine.pm
@@ -143,11 +143,9 @@ my @directives = (
   },
 );
 
-sub RedmineDSN { set_val('RedmineDSN', @_); }
-sub RedmineDbUser { set_val('RedmineDbUser', @_); }
-sub RedmineDbPass { set_val('RedmineDbPass', @_); }
-sub RedmineDbWhereClause { 
+sub RedmineDSN { 
   my ($self, $parms, $arg) = @_;
+  $self->{RedmineDSN} = $arg;
   my $query = "SELECT 
                  hashed_password, auth_source_id 
               FROM members, projects, users 
@@ -157,7 +155,13 @@ sub RedmineDbWhereClause {
                 AND users.status=1 
                 AND login=? 
                 AND identifier=? ";
-  $self->{RedmineQuery} = trim($query.($arg ? $arg : "").";");
+  $self->{RedmineQuery} = trim($query);
+}
+sub RedmineDbUser { set_val('RedmineDbUser', @_); }
+sub RedmineDbPass { set_val('RedmineDbPass', @_); }
+sub RedmineDbWhereClause { 
+  my ($self, $parms, $arg) = @_;
+  $self->{RedmineQuery} = trim($self->{RedmineQuery}.($arg ? $arg : "").";");
 }
 
 sub RedmineCacheCredsMax { 
-- 
cgit v1.2.3