@@ 393,16 393,17 @@ If narrowing is in effect, widen the view."
(push-mark (point) t nil))
(cond
((and (use-region-p)
- (null (buffer-narrowed-p)))
+ (not (buffer-narrowed-p)))
(narrow-to-region (region-beginning) (region-end)))
- ((logos--page-p)
+ ((and (logos--page-p)
+ (not (buffer-narrowed-p)))
;; Use our own narrow to page function because when
;; logos-outlines-are-pages is t, the page delimiter
;; is included in the region narrowed to.
(logos--narrow-to-page 0))
- ((null (buffer-narrowed-p))
+ ((not (buffer-narrowed-p))
(logos-narrow-visible-window))
- ((widen))))
+ (t (widen))))
;;;; Optional "focus mode" and utilities