QMWQGOYZCP7KEEEITUEVIANC37HHYXAN34YMTXGZDEDQRKAGHGOQC
(let ((source (expand-file-name "geiser/chicken5.scm"
geiser-chicken-scheme-dir)))
(let* ((source (expand-file-name "geiser/chicken5.scm"
geiser-chicken-scheme-dir))
(contents (with-current-buffer
(get-buffer-create " *geiser-chicken5-load*" t)
(insert-file-contents-literally source)
(prog1
(buffer-string)
(kill-buffer " *geiser-chicken5-load*")))))