/logf
Emanuel Berg <[email protected]>
| Newsgroups | gmane.emacs.erc.general |
|---|---|
| Message-ID | <[email protected]> |
(defun erc-pop-to-log (&optional buf)
(interactive)
(or buf (setq buf (current-buffer)))
(let*((log (erc-current-logfile buf))
(log-buf (get-file-buffer log)) )
(if (bufferp log-buf)
(progn
(pop-to-buffer log-buf)
(revert-buffer t t) )
(find-file log) )
(goto-char (point-max)) ))
(defun erc-cmd-LOGF (_line)
(erc-pop-to-log) )
(put 'erc-cmd-LOGF 'do-not-parse-args t)
https://dataswamp.org/~incal/emacs-init/erc/erc-log-incal.el
--
underground experts united
https://dataswamp.org/~incal