diff options
| -rw-r--r-- | lisp/acdw-erc.el | 4 |
1 files changed, 3 insertions, 1 deletions
| diff --git a/lisp/acdw-erc.el b/lisp/acdw-erc.el index 6e06325..8cf9734 100644 --- a/lisp/acdw-erc.el +++ b/lisp/acdw-erc.el | |||
| @@ -80,7 +80,9 @@ If USE-TLS is non-nil, use TLS." | |||
| 80 | (dolist (buffer (filter-server-buffers)) | 80 | (dolist (buffer (filter-server-buffers)) |
| 81 | (with-message (format "Killing server buffer: %s" (buffer-name buffer)) | 81 | (with-message (format "Killing server buffer: %s" (buffer-name buffer)) |
| 82 | (with-current-buffer buffer | 82 | (with-current-buffer buffer |
| 83 | (erc-quit-server erc/bye-message))))) | 83 | (erc-quit-server erc/bye-message)))) |
| 84 | (force-mode-line-update)) | ||
| 85 | |||
| 84 | (defun acdw-erc/prompt () | 86 | (defun acdw-erc/prompt () |
| 85 | "The prompt to show for ERC." | 87 | "The prompt to show for ERC." |
| 86 | ;; Rewrite s-truncate to avoid dependency. | 88 | ;; Rewrite s-truncate to avoid dependency. |