Subject: Re: bug#57837: 29.0.50; fit-window-to-buffer should reposition the buffer

From: Sam Steingold <[email-masked]>
Date: Thu, 15 Sep 2022 18:52:30 -0400

> * Eli Zaretskii <[email-masked]> [2022-09-15 22:07:15 +0300]:
>
>> From: Sam Steingold <[email-masked]>
>> Date: Thu, 15 Sep 2022 14:55:16 -0400
>> Cc: [email-masked]
>> 
>> > >> --8<---------------cut here---------------start------------->8---
>> > >> (and (pos-visible-in-window-p (point-min))
>> > >>      (pos-visible-in-window-p (point-max)))
>> > >> --8<---------------cut here---------------end--------------->8---
>> 
>> replacing `poing-min` and `point-max` with beginning-of-text and
>> end-of-text, of course...
>
> What are beginning-of-text and end-of-text?  I don't find such
> functions in Emacs.

I meant something like this:

--8<---------------cut here---------------start------------->8---
(defun beginning-of-text ()
  (save-excursion
    (goto-char (point-min))
    (1- (re-search-forward "[[:graph:]]" nil t))))
--8<---------------cut here---------------end--------------->8---

-- 
Sam Steingold (https://aphar.dreamwidth.org/) on darwin Ns 10.3.2113
https://lastingimpactpsychology.com https://steingoldpsychology.com
https://ij.org/ https://jij.org https://thereligionofpeace.com
What garlic is to food, insanity is to art.