From 81e107a26924747c10c671882032d341ca6d77c4 Mon Sep 17 00:00:00 2001
From: Tim Vaughan <vaughant@bs-mbpr538.d.ethz.ch>
Date: Fri, 8 Oct 2021 14:17:23 +0200
Subject: [PATCH] Prevent buffer switching when *elpher* already visible.
---
elpher.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/elpher.el b/elpher.el
index d8e588c..f2397e9 100644
--- a/elpher.el
+++ b/elpher.el
@@ -2161,7 +2161,8 @@ When run interactively HOST-OR-URL is read from the minibuffer."
(unless (string-empty-p trimmed-host-or-url)
(let ((page (elpher-page-from-url trimmed-host-or-url
(elpher-get-default-url-scheme))))
- (switch-to-buffer elpher-buffer-name)
+ (unless (get-buffer-window elpher-buffer-name t)
+ (switch-to-buffer elpher-buffer-name))
(elpher-with-clean-buffer
(elpher-visit-page page))
nil)))) ; non-nil value is displayed by eshell
--
2.20.1