From 080842033ae6e37f3c545bbfcf29e98758b18e16 Mon Sep 17 00:00:00 2001 From: "Elf M. Sternberg" Date: Mon, 8 Dec 2014 11:25:50 -0800 Subject: [PATCH] Do NOT mangle names found in tags. Only filesystem-derived names are suspected to be case-mangled poorly. --- mp_suggest.hy | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/mp_suggest.hy b/mp_suggest.hy index a57e617..b1a88a9 100755 --- a/mp_suggest.hy +++ b/mp_suggest.hy @@ -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)]