haskell-interactive-bring is switching to REPL window

Hey, `haskell-interactive-bring` is defined as follows

```
(defun haskell-interactive-bring ()
"Bring up the interactive mode for this session."
(interactive)
(let* ((session (haskell-session))
(buffer (haskell-session-interactive-buffer session)))
(pop-to-buffer buffer)))
```

The question: shouldn't it be `display-buffer` instead of `pop-to-buffer`? Because instead of just bringing REPL, it switches to it. And it's also annoying, that you can't go back with `haskell-interactive-switch-back`, since `haskell-interactive-bring` switches to REPL buffer, but doesn't stores the old buffer.