hyung-hwan/codepot
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

corrected spacing in etc/post-commit.in

Browse Source
This commit is contained in:
hyung-hwan 2021-09-15 12:08:13 +00:00
parent 7a2ce3fa88
commit 36e6a97eb1
1 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
codepot/etc/post-commit.in
View File

@ -194,10 +194,10 @@ sub write_commit_log
$dbh->begin_work (); $dbh->begin_work ();
#my $query = $dbh->prepare ("INSERT INTO ${QC}${prefix}log${QC} (${QC}type${QC},${QC}projectid${QC},${QC}message${QC},${QC}createdon${QC},${QC}action${QC},${QC}userid${QC}) VALUES (?,?,?,?,?,?)"); #my $query = $dbh->prepare ("INSERT INTO ${QC}${prefix}log${QC} (${QC}type${QC},${QC}projectid${QC},${QC}message${QC},${QC}createdon${QC},${QC}action${QC},${QC}userid${QC}) VALUES (?,?,?,?,?,?)");
#if (!$query || !$query->execute ('code', $projectid, $message, $createdon, 'commit', $userid)) #if (!$query || !$query->execute('code', $projectid, $message, $createdon, 'commit', $userid))
my $query = $dbh->prepare ("INSERT INTO ${QC}${prefix}log${QC} (${QC}type${QC},${QC}projectid${QC},${QC}message${QC},${QC}createdon${QC},${QC}action${QC},${QC}userid${QC}) VALUES (?,?,?,?,?,?)"); my $query = $dbh->prepare ("INSERT INTO ${QC}${prefix}log${QC} (${QC}type${QC},${QC}projectid${QC},${QC}message${QC},${QC}createdon${QC},${QC}action${QC},${QC}userid${QC}) VALUES (?,?,?,?,?,?)");
if (!$query || !$query->execute ('code', $projectid, $message, $timestamp, 'commit', $userid)) if (!$query || !$query->execute('code', $projectid, $message, $timestamp, 'commit', $userid))
{ {
my $errstr = $dbh->errstr(); my $errstr = $dbh->errstr();
if ($query) { $query->finish (); } if ($query) { $query->finish (); }
@ -359,8 +359,8 @@ sub get_author_email_db
{ {
my ($cfg, $dbh, $prefix, $userid) = @_; my ($cfg, $dbh, $prefix, $userid) = @_;
my $query = $dbh->prepare ("SELECT ${QC}email${QC} FROM ${QC}${prefix}user_account${QC} WHERE ${QC}userid${QC}=?"); my $query = $dbh->prepare("SELECT ${QC}email${QC} FROM ${QC}${prefix}user_account${QC} WHERE ${QC}userid${QC}=?");
if (!$query || !$query->execute ($userid)) if (!$query || !$query->execute($userid))
{ {
return (-1, $dbh->errstr()); return (-1, $dbh->errstr());
} }
@ -377,8 +377,8 @@ sub email_message_to_project_members
{ {
my ($cfg, $dbh, $prefix, $projectid, $subject, $message) = @_; my ($cfg, $dbh, $prefix, $projectid, $subject, $message) = @_;
my $query = $dbh->prepare ("SELECT ${QC}userid${QC} FROM ${QC}${prefix}project_membership${QC} WHERE ${QC}projectid${QC}=?"); my $query = $dbh->prepare("SELECT ${QC}userid${QC} FROM ${QC}${prefix}project_membership${QC} WHERE ${QC}projectid${QC}=?");
if (!$query || !$query->execute ($projectid)) if (!$query || !$query->execute($projectid))
{ {
if ($query) { $query->finish (); } if ($query) { $query->finish (); }
return (-1, $dbh->errstr()); return (-1, $dbh->errstr());
@ -399,11 +399,11 @@ sub email_message_to_project_members
if ($cfg->{login_model} eq 'LdapLoginModel') if ($cfg->{login_model} eq 'LdapLoginModel')
{ {
($xret, $email) = get_author_email_ldap ($cfg, $member) ($xret, $email) = get_author_email_ldap($cfg, $member)
} }
elsif ($cfg->{login_model} eq 'DbLoginModel') elsif ($cfg->{login_model} eq 'DbLoginModel')
{ {
($xret, $email) = get_author_email_db ($cfg, $dbh, $prefix, $member); ($xret, $email) = get_author_email_db($cfg, $dbh, $prefix, $member);
} }
else else
{ {