replaced flet with cl-letf, added server-start