--- slime-autoloads.el.1.4  2008-02-18 11:38:35.796875000 -0500
+++ slime-autoloads.el  2008-02-18 11:42:45.390625000 -0500
@@ -40,8 +40,7 @@
 
 (defun slime-setup-contribs () 
   (when slime-setup-contribs
-    (pushnew (file-name-as-directory
-              (expand-file-name (concat slime-path "contribs")))
+    (pushnew (expand-file-name (concat slime-path "contrib"))
              load-path
              :test 'string=)    
     (dolist (c slime-setup-contribs)
