aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorYe Wenbin <wenbinye@gmail.com>2007-06-09 02:34:00 +0000
committerYe Wenbin <wenbinye@gmail.com>2007-06-09 02:34:00 +0000
commit61f2cfe63ca9dad64ef214b9db03d70a9c10eed8 (patch)
treebd1b7718c9310cbb19c805708809bf5e07d9692f
parentb4584727981af9d3fa38947bd44c84ab21bf9470 (diff)
Fix bug in transpose tag
darcs-hash:20070609023409-94065-e999c77f14a22e48125608e9b6d0ca8158b6f555.gz
-rw-r--r--emms-tag-editor.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/emms-tag-editor.el b/emms-tag-editor.el
index 865639b..7bf1bd0 100644
--- a/emms-tag-editor.el
+++ b/emms-tag-editor.el
@@ -352,10 +352,11 @@ changes will only take effect on the tracks in the region."
(inhibit-read-only t)
temp)
(erase-buffer)
- (dolist (track tracks)
+ (dolist (track (nreverse tracks))
(setq temp (emms-track-get track tag1))
(emms-track-set track tag1 (emms-track-get track tag2))
(emms-track-set track tag2 temp)
+ (emms-track-set track 'tag-modified t)
(emms-tag-editor-insert-track track))))))
(defun emms-tag-editor-next-field (arg)