Do NOT mangle names found in tags. Only filesystem-derived names are suspected to be case-mangled poorly.

This commit is contained in:
Elf M. Sternberg 2014-12-08 11:25:50 -08:00
parent fbd0d93f75
commit 080842033a
1 changed files with 2 additions and 2 deletions

View File

@ -192,8 +192,8 @@
)]
[likely-genre (sfix (clean-paren (find-likely (map (fn [m] (get m 3)) mp3s))))]
[likely-album (sfix (find-likely (map (fn [m] (get m 2)) mp3s)))]
[likely-artist (sfix (find-likely (map (fn [m] (get m 1)) mp3s)))]
[likely-album (find-likely (map (fn [m] (get m 2)) mp3s))]
[likely-artist (find-likely (map (fn [m] (get m 1)) mp3s))]
[artist-deriver (make-artist-deriver opts local-artist likely-artist)]
[album-deriver (make-album-deriver opts local-album likely-album)]