- (reverse (seq-subseq emus-records 0 idx))
- (seq-subseq emus-records (+ idx 1))))
- (current-album (emus-record-album emus-current-record))
- (next-record (seq-some (lambda (r)
- (if (string= (emus-record-album r)
+ (reverse (seq-subseq emus-tracks 0 idx))
+ (seq-subseq emus-tracks (+ idx 1))))
+ (current-album (emus-track-album emus-current-track))
+ (next-track (seq-some (lambda (r)
+ (if (string= (emus-track-album r)