tempban cleanups. Not sure if correct yet

git-svn-id: http://svn.tabris.net/repos/srsv@3573 70d4eda1-72e9-0310-a436-91e5bd24443c

diff --git a/branches/0.4.3/modules/serviceslibs/chanserv.pm b/branches/0.4.3/modules/serviceslibs/chanserv.pm
index 09a17e3c6afbe86110cbda83551702b2a87dcb92..16c031e7047dfe1e8645441ff0b258a911503ff6 100644 (file)
--- a/branches/0.4.3/modules/serviceslibs/chanserv.pm
+++ b/branches/0.4.3/modules/serviceslibs/chanserv.pm
@@ -574,9 +574,9 @@ sub clones_exist ($$) {
                return;
        }
        my $nick = $user->{NICK};
-       my ($id) = get_user_id($user);
-       $get_host_inchan -> execute ($id,$cn);
-       my ($joined) = $get_host_inchan ->fetchrow_array;
+       $get_host_inchan->execute(get_user_id($user), $cn);
+       my ($joined) = $get_host_inchan->fetchrow_array;
+       $get_host_inchan-finish();
        if ($joined) {
                return $joined;
        }
@@ -1981,8 +1981,8 @@ sub cs_set($$$;$) {
                }
                my $time = $parm;
                unless ($time == 0) {
-                $time = parse_time ($parm);
-                       if (!$time) {
+                       $time = parse_time ($parm);
+                       if(!$time) {
                                notice ($user, "Invalid bantime. See /msg chanserv help set bantime for examples.");
                                return;
                        }