 (defn modify-password
   "Creates a new password modify extended request that will attempt to change
    the password of the currently-authenticated user, or another user if their
-   DN is provided."
+   DN is provided and the caller has the required authorisation."
   ([connection new]
     (let [request (PasswordModifyExtendedRequest. new)] 
       (.processExtendedOperation connection request)))

      (connect-to-hosts options)
      (connect-to-host options))))

(defn connection-pool-stats
  [connection-pool]
  (let [statistics (.LDAPConnectionPoolStatistics connection-pool)]
  (.toString statistics)))

(defn get-connection
  "Retrieves an LDAP connection from the pool."
  [connection-pool]

            LDAPConnection
            ResultCode
            LDAPConnectionPool
            LDAPException
            Attribute
            Entry
