summaryrefslogtreecommitdiff
path: root/import_members.pl
diff options
context:
space:
mode:
Diffstat (limited to 'import_members.pl')
-rwxr-xr-ximport_members.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/import_members.pl b/import_members.pl
index ef8b27cb..42da0c7f 100755
--- a/import_members.pl
+++ b/import_members.pl
@@ -213,9 +213,9 @@ sub save_member {
# add login to employee table if it does not exist
my $login = $self->{login};
$login =~ s/@.*//;
- my $query = qq|SELECT id FROM employee WHERE login = '$login'|;
+ my $query = qq|SELECT id FROM employee WHERE login = ?|;
my $sth = $dbh->prepare($query);
- $sth->execute;
+ $sth->execute($login);
my ($id) = $sth->fetchrow_array;
$sth->finish;