diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/papod.clj | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/papod.clj b/src/papod.clj index 14957eb..d0c49cc 100644 --- a/src/papod.clj +++ b/src/papod.clj @@ -2170,8 +2170,10 @@ (defn- join-one! ([handle client components] (join-one! handle nil client components)) - ([handle key-arg client components] - (let [{:keys [conn clients channels]} components + ([raw-handle key-arg client components] + (let [handle (when raw-handle + (string/lower-case raw-handle)) + {:keys [conn clients channels]} components nick (client-target client) modes (chan-modes-for components handle) existing? (and channels (seq (get @channels handle))) |