From 1e5676dd328e6050e337903c99d59f675917581e Mon Sep 17 00:00:00 2001 From: Moritz Ulrich Date: Thu, 2 Jul 2015 23:03:02 +0200 Subject: [PATCH] `haskell-interactive-bring': Use `pop-to-buffer'. remove the counter-intuitive logic when switching to a project buffer and replace with the canonical way of bring a buffer to the front. --- haskell.el | 7 +------ 1 file changed, 1 insertion(+), 6 deletions(-) diff --git a/haskell.el b/haskell.el index 09f23a4e7..c9f47e4f6 100644 --- a/haskell.el +++ b/haskell.el @@ -369,12 +369,7 @@ (interactive) (let* ((session (haskell-session)) (buffer (haskell-session-interactive-buffer session))) - (unless (and (cl-find-if (lambda (window) (equal (window-buffer window) buffer)) - (window-list)) - (= 2 (length (window-list)))) - (delete-other-windows) - (display-buffer buffer) - (other-window 1)))) + (pop-to-buffer buffer))) ;;;###autoload (defun haskell-process-load-file ()