Replace deprecated flet with cl-flet