diff options
| author | Bozhidar Batsov <bozhidar@batsov.com> | 2015-10-17 15:31:37 +0300 |
|---|---|---|
| committer | Bozhidar Batsov <bozhidar@batsov.com> | 2015-10-17 15:31:37 +0300 |
| commit | 7eb82ad9e5ef29a48681357a6fe616bd64e2d10b (patch) | |
| tree | 01d06bf96b09f523043f78e6289705a568a87473 /cider-client.el | |
| parent | 6523b393cdf0f5758eb3c52b4c8bd4f60d21b050 (diff) | |
Display the REPL name in the connection browser
Diffstat (limited to 'cider-client.el')
| -rw-r--r-- | cider-client.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/cider-client.el b/cider-client.el index 13721414..64d535d2 100644 --- a/cider-client.el +++ b/cider-client.el @@ -254,7 +254,7 @@ The connections buffer is determined by (with-current-buffer (get-buffer-create cider--connection-browser-buffer-name) (let ((ewoc (ewoc-create 'cider--connection-pp - " Host Port Project\n"))) + " REPL Host Port Project\n"))) (setq-local cider--connection-ewoc ewoc) (cider--update-connections-display ewoc cider-connections) (setq buffer-read-only t) @@ -267,8 +267,9 @@ The connections buffer is determined by (buffer (get-buffer connection)) (endpoint (buffer-local-value 'nrepl-endpoint buffer))) (insert - (format "%s %-16s %5s %s%s" + (format "%s %-30s %-16s %5s %s%s" (if (equal connection (car cider-connections)) "*" " ") + (buffer-name connection) (car endpoint) (prin1-to-string (cadr endpoint)) (or (cider--project-name |