|
447 | 447 | "Given a song structure tag parsed from a track, returns the bank that
|
448 | 448 | was assigned to the track as a keyword for matching in code."
|
449 | 449 | [^RekordboxAnlz$SongStructureTag tag]
|
450 |
| - (case-enum (.bank (.body tag)) |
451 |
| - RekordboxAnlz$TrackBank/CLUB_1 :club-1 |
452 |
| - RekordboxAnlz$TrackBank/CLUB_2 :club-2 |
453 |
| - RekordboxAnlz$TrackBank/COOL :cool |
454 |
| - RekordboxAnlz$TrackBank/DEFAULT :cool |
455 |
| - RekordboxAnlz$TrackBank/HOT :hot |
456 |
| - RekordboxAnlz$TrackBank/NATURAL :natural |
457 |
| - RekordboxAnlz$TrackBank/SUBTLE :subtle |
458 |
| - RekordboxAnlz$TrackBank/VIVID :vivid |
459 |
| - RekordboxAnlz$TrackBank/WARM :warm |
460 |
| - (timbre/error "Unrecognized track bank" (.bank (.body tag))))) |
| 450 | + (try |
| 451 | + (case-enum (.bank (.body tag)) |
| 452 | + RekordboxAnlz$TrackBank/CLUB_1 :club-1 |
| 453 | + RekordboxAnlz$TrackBank/CLUB_2 :club-2 |
| 454 | + RekordboxAnlz$TrackBank/COOL :cool |
| 455 | + RekordboxAnlz$TrackBank/DEFAULT :cool |
| 456 | + RekordboxAnlz$TrackBank/HOT :hot |
| 457 | + RekordboxAnlz$TrackBank/NATURAL :natural |
| 458 | + RekordboxAnlz$TrackBank/SUBTLE :subtle |
| 459 | + RekordboxAnlz$TrackBank/VIVID :vivid |
| 460 | + RekordboxAnlz$TrackBank/WARM :warm |
| 461 | + (timbre/error "Unrecognized track bank" (.bank (.body tag)))) |
| 462 | + (catch NullPointerException e |
| 463 | + (timbre/error e "Unable to determine track bank! tag:" tag "body:" (.body tag) |
| 464 | + "bank:" (.bank (.body tag)))))) |
461 | 465 |
|
462 | 466 | (defn track-mood-name
|
463 | 467 | "Given a song structure tag parsed from a track, returns the mood that
|
|
0 commit comments