flet to cl-flet on acto-complete.el