factor: fix some spacing

[factor.git] / basis / furnace / auth / providers / couchdb / couchdb.factor

diff --git a/basis/furnace/auth/providers/couchdb/couchdb.factor b/basis/furnace/auth/providers/couchdb/couchdb.factor
index 79d272d15aea57386070666e5407eab9557ecc04..b4b737ef075dd67ed1346cb14c5d20c9e7daa907 100644 (file)
--- a/basis/furnace/auth/providers/couchdb/couchdb.factor
+++ b/basis/furnace/auth/providers/couchdb/couchdb.factor
@@ -136,9 +136,9 @@ TUPLE: couchdb-auth-provider
     bi ;
 
 : user>user-hash ( user -- hash )
-     hash-mirror
-     [ [ "password" ] dip [ >base64 >string ] change-at ] keep
-     couchdb-auth-provider get field-map>> map-fields-forward ;
+    hash-mirror
+    [ [ "password" ] dip [ >base64 >string ] change-at ] keep
+    couchdb-auth-provider get field-map>> map-fields-forward ;
 
 ! Used when the user is guaranteed to exist if the logic of the Factor
 ! code is correct (e.g. when update-user is called).