Re: narrowedp?

[David Kastrup]

Alan Mackenzie <address@hidden> writes:

> Hi, Emacs!
>
> There doesn't seem to be a function `narrowedp'.  This is, perhaps, an
> unfortunate lack.
>
> It's easy enough to test the lower bound:
>
>     (eq (point-min) 1)
>
> , but the upper bound is a touch tedious:
>
>     (save-restriction
>       (let ((reg-end (point-max)))
>         (widen)
>       (eq reg-end (point-max))))

Try (> (point-max) (buffer-size)) for that.

Checking both can be done with
(= (- (point-max) (point-min)) (buffer-size))

-- 
David Kastrup