fix typo in clones_exist()

git-svn-id: http://svn.tabris.net/repos/srsv@3575 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 16c031e7047dfe1e8645441ff0b258a911503ff6..e7a6299a44878f084bebcf0c441e568fb12a0dcd 100644 (file)
--- a/branches/0.4.3/modules/serviceslibs/chanserv.pm
+++ b/branches/0.4.3/modules/serviceslibs/chanserv.pm
@@ -576,7 +576,7 @@ sub clones_exist ($$) {
        my $nick = $user->{NICK};
        $get_host_inchan->execute(get_user_id($user), $cn);
        my ($joined) = $get_host_inchan->fetchrow_array;
-       $get_host_inchan-finish();
+       $get_host_inchan->finish();
        if ($joined) {
                return $joined;
        }