Display message after setting repl

Author: jjttjj

CHANGELOG.md

@@ -3,6 +3,7 @@
 ## master (unreleased)
 * [#202](https://github.com/clojure-emacs/inf-clojure/issues/202): Add ClojureCLR support.
 * [#204](https://github.com/clojure-emacs/inf-clojure/issues/204): Scroll repl buffer on insert commands
+* Display message after setting repl.
 
 
 ## 3.2.1 (2022-07-22)

inf-clojure.el

@@ -285,10 +285,11 @@ buffers after they are created with `rename-buffer'."
            (inf-clojure-repl-p))
       (setq inf-clojure-buffer (current-buffer))
     (let ((repl-buffers (inf-clojure-repls)))
-     (if (> (length repl-buffers) 0)
-         (when-let ((repl-buffer (completing-read "Select default REPL: " repl-buffers nil t)))
-           (setq inf-clojure-buffer (get-buffer repl-buffer)))
-       (user-error "No buffers have an inf-clojure process")))))
+      (if (> (length repl-buffers) 0)
+          (when-let ((repl-buffer (completing-read "Select default REPL: " repl-buffers nil t)))
+            (setq inf-clojure-buffer (get-buffer repl-buffer)))
+        (user-error "No buffers have an inf-clojure process"))))
+  (message "inf-clojure repl set to %s" inf-clojure-buffer))
 
 (defvar inf-clojure--repl-type-lock nil
   "Global lock for protecting against proc filter race conditions.