cl-flet is not actually a 1:1 substitute for flet