[slime-devel] slime-setup-contribs fails

[Tony Liptak]

Hi,

I am completly new to slime. I am using the code of the unofficial slime git repo (https://github.com/nablaone/slime.git119) and Emacs 24.0.93.1. I setup slime in my init.el with

(require 'slime-autoloads)
(slime-setup '(slime-fancy slime-banner))
(setq inferior-lisp-program "sbcl")

Unfortunately initalization fails.

Debugger entered--Lisp error: (void-variable slime-fancy)
 
 byte-code("\306\307\310\311\312\"\313\314!\315    \n\f
 &\316\317 \320 \321 \322 \323 \324 \325 \326 \327 \330 \331 
&&\210\332\300!\207" [slime-fancy slime-repl slime-autodoc 
slime-c-p-c slime-editing-commands slime-fancy-inspector 
define-slime-contrib "Make SLIME fancy." :authors "Matthias Koeppe  <mkoeppe at mail.math.uni-magdeburg.de120>" "Tobias C Rittweiler <tcr at freebits.de121>" :license "GPL" :slime-dependencies :on-load slime-repl-init 
slime-autodoc-init slime-c-p-c-init slime-editing-commands-init 
slime-fancy-inspector-init slime-fuzzy-init slime-presentations-init 
slime-scratch-init slime-references-init slime-package-fu-init 
slime-fontifying-fu-init provide slime-fuzzy slime-presentations 
slime-scratch slime-references slime-package-fu slime-fontifying-fu] 18)
  require(slime-fancy)
 
 (while --cl-dolist-temp-- (setq c (car --cl-dolist-temp--)) (require c)
 (let ((init (intern (format "%s-init" c)))) (when (fboundp init) 
(funcall init))) (setq --cl-dolist-temp-- (cdr --cl-dolist-temp--)))
 
 (let ((--cl-dolist-temp-- slime-setup-contribs) c) (while 
--cl-dolist-temp-- (setq c (car --cl-dolist-temp--)) (require c) (let 
((init (intern (format "%s-init" c)))) (when (fboundp init) (funcall 
init))) (setq --cl-dolist-temp-- (cdr --cl-dolist-temp--))))
  (catch
 (quote --cl-block-nil--) (let ((--cl-dolist-temp-- 
slime-setup-contribs) c) (while --cl-dolist-temp-- (setq c (car 
--cl-dolist-temp--)) (require c) (let ((init (intern (format "%s-init" 
c)))) (when (fboundp init) (funcall init))) (setq --cl-dolist-temp-- 
(cdr --cl-dolist-temp--)))))
  (cl-block-wrapper (catch (quote 
--cl-block-nil--) (let ((--cl-dolist-temp-- slime-setup-contribs) c) 
(while --cl-dolist-temp-- (setq c (car --cl-dolist-temp--)) (require c) 
(let ((init (intern ...))) (when (fboundp init) (funcall init))) (setq 
--cl-dolist-temp-- (cdr --cl-dolist-temp--))))))
  (block nil (let 
((--cl-dolist-temp-- slime-setup-contribs) c) (while --cl-dolist-temp-- 
(setq c (car --cl-dolist-temp--)) (require c) (let ((init (intern 
(format "%s-init" c)))) (when (fboundp init) (funcall init))) (setq 
--cl-dolist-temp-- (cdr --cl-dolist-temp--)))))
  (dolist (c 
slime-setup-contribs) (require c) (let ((init (intern (format "%s-init" 
c)))) (when (fboundp init) (funcall init))))
  (progn (add-to-list 
(quote load-path) (expand-file-name "contrib" slime-path)) (dolist (c 
slime-setup-contribs) (require c) (let ((init (intern (format "%s-init" 
c)))) (when (fboundp init) (funcall init)))))
  (if 
slime-setup-contribs (progn (add-to-list (quote load-path) 
(expand-file-name "contrib" slime-path)) (dolist (c 
slime-setup-contribs) (require c) (let ((init (intern (format "%s-init" 
c)))) (when (fboundp init) (funcall init))))))
  (when 
slime-setup-contribs (add-to-list (quote load-path) (expand-file-name 
"contrib" slime-path)) (dolist (c slime-setup-contribs) (require c) (let
 ((init (intern (format "%s-init" c)))) (when (fboundp init) (funcall 
init)))))
  slime-setup-contribs()
  run-hooks(slime-load-hook)

I feel so dumb. What did I do wrong?