btimofeev> Помогает возвращение require 'cl, видимо ещё что то нужно заменить, попозже попробую разобраться.
Разобрался. Простой замены return на cl-return недостаточно, нужно ещё всё в cl-block заключить, вот так:
====
(defun somename()
(cl-block имя блока
...
тело блока
...
(cl-return-from имя блока возвращаемое значение)))
====
После подобной замены у меня всё без require 'cl заработало, даже нашел одну книжку в которой обложка отображается. Кстати, что не так с изображением в книге которую я тебе отослал?