diff --git a/mingus.el b/mingus.el
index fdd5036..e2262e3 100644
--- a/mingus.el
+++ b/mingus.el
@@ -2055,8 +2055,9 @@ details : the car of the `details' text property.
    ((get-buffer-window "*Mingus*")
     (select-window (get-buffer-window "*Mingus*")))
    (t
-    (switch-to-buffer "*Mingus*")))
-  (mingus-playlist-mode))
+    (display-buffer "*Mingus*")))
+  (with-current-buffer "*Mingus*"
+    (mingus-playlist-mode)))
 
 (defun mingus-switch-to-browser ()
   (switch-to-buffer "*Mingus Browser*")