@@ -175,7 +175,7 @@ If no-error is truthy don't error if feature is not present."
175
175
" Get FEATURE based on repl type for PROC."
176
176
(let* ((repl-type (or (with-current-buffer (process-buffer proc)
177
177
inf-clojure-repl-type)
178
- (error " Repl type is not known" ))))
178
+ (error " REPL type is not known" ))))
179
179
(inf-clojure--get-feature repl-type feature no-error)))
180
180
181
181
(defun inf-clojure--update-feature (repl-type feature form )
@@ -187,7 +187,7 @@ that can be set as `inf-clojure-repl-features'."
187
187
(if original
188
188
(cons (cons repl-type (cons (cons feature form) (assoc-delete-all feature original)))
189
189
(assoc-delete-all repl-type inf-clojure-repl-features))
190
- (error " Attempted to update %s form of unknown repl type %s "
190
+ (error " Attempted to update %s form of unknown REPL type %s "
191
191
(symbol-name feature)
192
192
(symbol-name repl-type)))))
193
193
@@ -234,7 +234,7 @@ See http://blog.jorgenschaefer.de/2014/05/race-conditions-in-emacs-process-filte
234
234
(let* ((proc (inf-clojure-proc))
235
235
(types (mapcar #'car inf-clojure-repl-features))
236
236
(type-to-set (intern
237
- (completing-read " Set repl type:"
237
+ (completing-read " Set REPL type:"
238
238
(sort (mapcar #'symbol-name types) #'string-lessp )))))
239
239
(with-current-buffer (process-buffer proc)
240
240
(setq-local inf-clojure-repl-type type-to-set))))
@@ -689,7 +689,7 @@ from `inf-clojure-mode-hook' (after the `comint-mode-hook' is
689
689
run).
690
690
\( Type \\ [describe-mode] in the process buffer for a list of commands.)"
691
691
(interactive (list (or inf-clojure-custom-startup
692
- (completing-read " Clojure startup command: "
692
+ (completing-read " Select Clojure REPL startup command: "
693
693
(mapcar #'cdr inf-clojure-startup-forms)
694
694
nil
695
695
'confirm-after-completion ))))
0 commit comments