* Re: ERC top/bottom 2*blank lines
[not found] ` <87k0ta1ean.fsf@zoho.eu>
@ 2020-12-22 17:50 ` Emanuel Berg via General discussion about ERC
2020-12-23 1:05 ` Emanuel Berg via General discussion about ERC
0 siblings, 1 reply; 2+ messages in thread
From: Emanuel Berg via General discussion about ERC @ 2020-12-22 17:50 UTC (permalink / raw)
To: emacs-erc; +Cc: help-gnu-emacs
>> I wonder ... why does ERC have two blank lines at the top
>> and button after you go to the top/bottom of the buffer?
>>
>> Can I configure away this?
>
> [...]
>
> (setq erc-input-line-position -1)
that, with
;; (setq erc-mode-hook nil)
(defun erc-mode-hook-f ()
;; [...]
(erc-scrolltobottom-enable)
)
(add-hook 'erc-mode-hook #'erc-mode-hook-f)
works when hitting a key, true, but for
`beginnig-of-buffer'/`end-of-buffer', them need (?) to be
replaced by
(defun erc-scroll-to-top ()
(interactive)
(goto-char (point-min))
(when (and (looking-at "^$")
(re-search-forward "[[:graph:]]" (point-max) t) )
(beginning-of-line)
(recenter 0) ))
(defun erc-scroll-to-bottom ()
(interactive)
(goto-char (point-max))
(when (and (looking-at "^$")
(re-search-backward "[[:graph:]]" (point-min) t) )
(beginning-of-line)
(recenter -1) ))
and then bound to keys, I have them `C-o i' and `C-o k'... [1]
PS. gmane.emacs.erc.general seems to be dead so I cross post
this for completeness, with Followup-To: gmane.emacs.help
[1] https://dataswamp.org/~incal/emacs-init/erc-my.el
--
underground experts united
http://user.it.uu.se/~embe8573
https://dataswamp.org/~incal
^ permalink raw reply [flat|nested] 2+ messages in thread
* Re: ERC top/bottom 2*blank lines
2020-12-22 17:50 ` ERC top/bottom 2*blank lines Emanuel Berg via General discussion about ERC
@ 2020-12-23 1:05 ` Emanuel Berg via General discussion about ERC
0 siblings, 0 replies; 2+ messages in thread
From: Emanuel Berg via General discussion about ERC @ 2020-12-23 1:05 UTC (permalink / raw)
To: emacs-erc; +Cc: help-gnu-emacs
> (defun erc-scroll-to-top () [...]
> (defun erc-scroll-to-bottom () [...]
>
> https://dataswamp.org/~incal/emacs-init/erc-my.el
Oh, there is already a `erc-scroll-to-bottom'.
(defun erc-scroll-to-top-no-blanks ()
(interactive)
(goto-char (point-min))
(when (and (looking-at "^$")
(re-search-forward "[[:graph:]]" (point-max) t) )
(beginning-of-line)
(recenter 0) ))
(defun erc-scroll-to-bottom-no-blanks ()
(interactive)
(goto-char (point-max))
(when (and (looking-at "^$")
(re-search-backward "[[:graph:]]" (point-min) t) )
(beginning-of-line)
(recenter -1) ))
--
underground experts united
http://user.it.uu.se/~embe8573
https://dataswamp.org/~incal
^ permalink raw reply [flat|nested] 2+ messages in thread
end of thread, other threads:[~2020-12-23 1:05 UTC | newest]
Thread overview: 2+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
[not found] <87wnxa1mxu.fsf@zoho.eu>
[not found] ` <87k0ta1ean.fsf@zoho.eu>
2020-12-22 17:50 ` ERC top/bottom 2*blank lines Emanuel Berg via General discussion about ERC
2020-12-23 1:05 ` Emanuel Berg via General discussion about ERC
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).