Don't remove the quickref directory

website.lisp

@@ -114,7 +114,7 @@
     (format file "</body>~%")))
 
 (defun build-texis (path-to-texis texinfo-path)
-  (remove-directory "quickref")
+  (clean-directory "quickref")
   (let ((texis (get-texi-pathnames path-to-texis)))
     (dolist (texi texis)
       (sb-ext:run-program texinfo-path