diff --git a/ldap.lisp b/ldap.lisp
index ec1d973..ae08ee2 100644
--- a/ldap.lisp
+++ b/ldap.lisp
@@ -100,6 +100,13 @@
   (:documentation "Represents LDAP base path.")
   (:default-initargs :base ""))
 
+(defclass rdn (modification)
+  ((rdn :type string
+        :reader rdn
+        :initarg :rdn))
+  (:documentation "!!!")
+  (:default-initargs :rdn ""))
+
 (defclass dn (modification)
   ((dn :type string
        :reader dn
@@ -112,13 +119,6 @@
   (setf (modification-state object) t)
   (setf (slot-value object 'dn) value))
 
-(defclass rdn (modification)
-  ((rdn :type string
-        :reader rdn
-        :initarg :rdn))
-  (:documentation "!!!")
-  (:default-initargs :rdn ""))
-
 (defclass entry (trivial-ldap:entry)
   ((dn :type dn
        :reader dn