Function: erc-popup-input-buffer
erc-popup-input-buffer is an interactive and byte-compiled function
defined in erc.el.gz.
Signature
(erc-popup-input-buffer)
Documentation
Provide an input buffer.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/erc/erc.el.gz
(defun erc-popup-input-buffer ()
"Provide an input buffer."
(interactive)
(let ((buffer-name (generate-new-buffer-name "*ERC input*"))
(mode (intern
(completing-read
"Mode: "
(mapcar (lambda (e)
(list (symbol-name e)))
(apropos-internal "-mode\\'" 'commandp))
nil t))))
(pop-to-buffer (make-indirect-buffer (current-buffer) buffer-name))
(funcall mode)
(narrow-to-region (point) (point))
(shrink-window-if-larger-than-buffer)))