aboutsummaryrefslogtreecommitdiff
path: root/emms.el
diff options
context:
space:
mode:
authorforcer <forcer>2005-09-13 14:46:00 +0000
committerforcer <mwolson@gnu.org>2005-09-13 14:46:00 +0000
commit757479e76a2a6c15554055d10c87a11ca7b51e2a (patch)
treeca9bed3869aed3705dbdb76b8b70c5ed9b1fdbb8 /emms.el
parent24a3b107f48617d130d156b903983a6087a8131a (diff)
Call widen in shuffle and sort.
darcs-hash:20050913144610-2189f-177ce9e62c59598fa2e96d1060df6bac490f3ded.gz
Diffstat (limited to 'emms.el')
-rw-r--r--emms.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/emms.el b/emms.el
index f3a2ce0..f75c501 100644
--- a/emms.el
+++ b/emms.el
@@ -639,6 +639,7 @@ This uses `emms-playlist-insert-track-function'."
(defun emms-playlist-simple-shuffle ()
"Shuffle the whole playlist buffer."
(let ((current nil))
+ (widen)
(when emms-player-playing-p
(setq current (emms-playlist-selected-track))
(goto-char emms-playlist-selected-marker)
@@ -661,6 +662,7 @@ This uses `emms-playlist-insert-track-function'."
(defun emms-playlist-simple-sort ()
"Sort the whole playlist buffer."
+ (widen)
(let ((current (emms-playlist-selected-track))
(tracks (emms-playlist-tracks-in-region (point-min)
(point-max))))