emms.el: Change directory to / before starting the player.

darcs-hash:20060608025659-2189f-cf54016de0748a3d9dc3f706db32c3125229bc08.gz

1 files changed, 5 insertions, 2 deletions

diff --git a/emms.el b/emms.el
index bded095..a3c2e53 100644
--- a/emms.el
+++ b/emms.el
@@ -1216,8 +1216,11 @@ or nil if no such player exists."
     (let ((player (emms-player-for track)))
       (if (not player)
           (error "Don't know how to play track: %S" track)
-        (funcall (emms-player-get player 'start)
-                 track)))))
+        ;; Change default-directory so we don't accidentally block any
+        ;; directories the current buffer was visiting.
+        (let ((default-directory "/"))
+          (funcall (emms-player-get player 'start)
+                   track))))))
 
 (defun emms-player-started (player)
   "Declare that the given EMMS PLAYER has started.