Fix no changes found when val is change to empty

darcs-hash:20070408113129-94065-4abe8743412c621c46f6d6e1136222e4c86d2754.gz

1 files changed, 4 insertions, 2 deletions

diff --git a/emms-tag-editor.el b/emms-tag-editor.el
index 1d10020..69f43f6 100644
--- a/emms-tag-editor.el
+++ b/emms-tag-editor.el
@@ -449,8 +449,10 @@ edit buffer."
                       (setq key (intern-soft (substring pair 0 (match-beginning 0)))
                             val (substring pair (match-end 0)))
                       (when (and key
-                                 (> (length val) 0)
-                                 (not (string= val (emms-track-get track key))))
+                                 (let ((old (emms-track-get track key)))
+                                   (if old
+                                       (not (string= val old))
+                                     (string< "" val))))
                         (if (eq key 'name)
                             (emms-track-set track 'newname val)
                           (emms-track-set track key val))