diff --git a/tk/load-xm.lisp b/tk/load-xm.lisp index 5f800aecdd3da409140f8d9cc76f67042bfb8031..0a8842ebc8efc9cf36ddd1641ffb58129a28076d 100644 --- a/tk/load-xm.lisp +++ b/tk/load-xm.lisp @@ -43,7 +43,7 @@ (unless (dolist (pathname sys::*clim-library-search-path*) (handler-case (progn (load (merge-pathnames sys::library-name pathname)) (return t)) - (error (e) nil))) + (error (e) (declare (ignore e)) nil))) (error "Can't find ~a in ~{~a~^, ~}~%" sys::library-name sys::*clim-library-search-path*)))))) #+(version>= 5 0)