flet -> cl-flet in emacs24.3