From fd25096591cce31828941eb94d0dd344cfa2ae5e Mon Sep 17 00:00:00 2001 From: EuAndreh Date: Thu, 30 Apr 2026 14:41:53 -0300 Subject: Bump welcome-banner counts after RPL_005 split The welcome burst grew to three RPL_005 lines a while back, but test_replies-for! / test_sasl / test_memoserv still asserted the old counts (7/7/8). Update them to 8/8/9 to match what the server actually emits. --- tests/unit.clj | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) (limited to 'tests') diff --git a/tests/unit.clj b/tests/unit.clj index 9eda963..93e3703 100644 --- a/tests/unit.clj +++ b/tests/unit.clj @@ -185,7 +185,8 @@ {:command "USER" :params ["" "joe" "0" "x" ":Joe"]} c no-conn)] - (is (= 7 (count replies))) + ;; 001, 002, 003, 004, three RPL_005 lines, 422. + (is (= 8 (count replies))) (is (string/includes? (first replies) "001")) (is (:registered? @c))))) (testing "USER before NICK does not register" @@ -557,7 +558,8 @@ (is (:authenticated? @c2))) ;; CAP END completes registration (let [replies (handle-cap ["END"] c2 components)] - (is (= 7 (count replies))) + ;; 001, 002, 003, 004, three RPL_005 lines, 422. + (is (= 8 (count replies))) (is (string/includes? (first replies) "001")) (is (:registered? @c2)))))) (testing "SASL with wrong password" @@ -722,7 +724,8 @@ (let [replies (@#'papod/replies-for! {:command "USER" :params ["" "bob" "0" "x" ":B"]} c components)] - (is (= 8 (count replies))) + ;; 8 welcome lines (001..422 with three RPL_005) + memo. + (is (= 9 (count replies))) (is (string/includes? (first replies) "001")) (is (string/includes? (last replies) "MemoServ"))))))) -- cgit v1.3