diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/acdw-erc.el | 9 |
1 files changed, 9 insertions, 0 deletions
| diff --git a/lisp/acdw-erc.el b/lisp/acdw-erc.el index 6038f5a..ba00355 100644 --- a/lisp/acdw-erc.el +++ b/lisp/acdw-erc.el | |||
| @@ -102,5 +102,14 @@ If USE-TLS is non-nil, use TLS." | |||
| 102 | (setq num (1- num))) | 102 | (setq num (1- num))) |
| 103 | (apply #'concat ss)))))) | 103 | (apply #'concat ss)))))) |
| 104 | 104 | ||
| 105 | |||
| 106 | ;;; Uh | ||
| 107 | |||
| 108 | (defun acdw-erc/erc-switch-to-buffer (&optional arg) | ||
| 109 | "Prompt for ERC buffer to switch to. | ||
| 110 | Reverse prefix argument from `erc-switch-to-buffer'." | ||
| 111 | (interactive "P") | ||
| 112 | (erc-switch-to-buffer (not arg))) | ||
| 113 | |||
| 105 | (provide 'acdw-erc) | 114 | (provide 'acdw-erc) |
| 106 | ;;; acdw-erc.el ends here | 115 | ;;; acdw-erc.el ends here |