diff --git a/source/documentation-template/packages.lisp b/source/documentation-template/packages.lisp
index ce612f7..92d8de8 100755
--- a/source/documentation-template/packages.lisp
+++ b/source/documentation-template/packages.lisp
@@ -32,6 +32,7 @@
 (defpackage :documentation-template
   (:use :cl
         :cl-who
+        #+:sbcl :sb-introspect
         #+:lispworks :clos
         #+:sbcl :sb-mop
         #+:allegro :mop)
diff --git a/source/documentation-template/util.lisp b/source/documentation-template/util.lisp
index 8690f94..ba1f7cf 100755
--- a/source/documentation-template/util.lisp
+++ b/source/documentation-template/util.lisp
@@ -34,11 +34,9 @@
 ;;; list (for functions and macros), a documentation string, and
 ;;; optionally a list of specializers
 
-#+(or :sbcl :allegro)
+#+(or :allegro)
 (defun function-lambda-list (function)
   "Returns the lambda list of the function designator FUNCTION."
-  #+:sbcl
-  (sb-introspect:function-arglist function)
   #+:allegro
   (excl:arglist function))
     
