            (when (and result (fn? setter) (must-update? pwdparams))
              (setter attempt))
            result))))))
+
+
+(def encrypt
+  "Backward compatibility alias for `derive`."
+  derive)

;; Public Api
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(defn encrypt
  "Encrypts a raw string password."
  ([password] (encrypt password {}))
  ([password options]
   (-> (assoc options
              :alg (:alg options :bcrypt+sha512)

;; limitations under the License.

(ns buddy.hashers
  (:refer-clojure :exclude [derive])
  (:require [buddy.core.codecs :as codecs]
            [buddy.core.hash :as hash]
            [buddy.core.nonce :as nonce]
