diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index eca2fda348c..29d8e2bf80d 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2008-04-30  David Hansen  <david.hansen@gmx.net>
+
+	* dired.el: Require 'cl.
+
 2008-04-30  Nick Roberts  <nickrob@snap.net.nz>
 
 	* progmodes/gdb-ui.el (gdb-frame-handler-1): Make overlay arrow
diff --git a/lisp/dired.el b/lisp/dired.el
index ba20ef2cc1b..845f2cb24bc 100644
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -35,6 +35,8 @@
 
 ;;; Code:
 
+(eval-when-compile (require 'cl))
+
 ;;; Customizable variables
 
 (defgroup dired nil