Commit 09c013ef authored by Juanma Barranquero's avatar Juanma Barranquero
Browse files

(follow-all-followers, follow-generic-filter): Remove redundant checks.

parent 195eca78
...@@ -912,7 +912,7 @@ of the way from the true end." ...@@ -912,7 +912,7 @@ of the way from the true end."
"Return all windows displaying the same buffer as the TESTWIN. "Return all windows displaying the same buffer as the TESTWIN.
The list contains only windows displayed in the same frame as TESTWIN. The list contains only windows displayed in the same frame as TESTWIN.
If TESTWIN is nil the selected window is used." If TESTWIN is nil the selected window is used."
(or (and testwin (window-live-p testwin)) (or (window-live-p testwin)
(setq testwin (selected-window))) (setq testwin (selected-window)))
(let* ((top (frame-first-window (window-frame testwin))) (let* ((top (frame-first-window (window-frame testwin)))
(win top) (win top)
...@@ -1968,7 +1968,7 @@ report this using the `report-emacs-bug' function." ...@@ -1968,7 +1968,7 @@ report this using the `report-emacs-bug' function."
;; If we're in follow mode, do our stuff. Select a new window and ;; If we're in follow mode, do our stuff. Select a new window and
;; redisplay. (Actually, it is redundant to check `buf', but I ;; redisplay. (Actually, it is redundant to check `buf', but I
;; feel it's more correct.) ;; feel it's more correct.)
(if (and buf win (window-live-p win)) (if (and buf (window-live-p win))
(progn (progn
(set-buffer buf) (set-buffer buf)
(if (and (boundp 'follow-mode) follow-mode) (if (and (boundp 'follow-mode) follow-mode)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment