]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/crypto/passwd-md5/passwd-md5.factor
core, basis, extra: Remove DOS line endings from files.
[factor.git] / extra / crypto / passwd-md5 / passwd-md5.factor
index a8706a75316ee9f1f95830107a252f55f707dad5..4a09e828420a0bfd690bc7b00fdd561ae76702c6 100644 (file)
@@ -40,9 +40,9 @@ PRIVATE>
     { 12 0 6 13 1 7 14 2 8 15 3 9 5 4 10 } final nths 3 group
     [ first3 [ 16 shift ] [ 8 shift ] bi* + + 4 to64 ] map concat
     11 final nth 2 to64 3append ;
-        
+
 : parse-shadow-password ( string -- magic salt password )
     "$" split harvest first3 [ "$" dup surround ] 2dip ;
-    
+
 : authenticate-password ( shadow password -- ? )
     '[ parse-shadow-password drop _ passwd-md5 ] keep = ;