FIX: updated ppk codec using the new crypt port

Oldes · May 25, 2022 · 2660ab1 · 2660ab1
1 parent bef5410
commit 2660ab1
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/src/mezz/codec-ppk.reb b/src/mezz/codec-ppk.reb
@@ -69,8 +69,10 @@ register-codec [
 					]
 					key: join checksum join #{00000000} pass 'sha1
 					          checksum join #{00000001} pass 'sha1
-					key: aes/decrypt/key copy/part key 32 none
-					pri: aes/decrypt/stream key pri
+					aes: open crypt:aes-256-cbc#decrypt
+					modify aes 'key copy/part key 32
+					pri: take write aes :pri
+					close aes
 				][
 					;clean pass data in memory
 					forall pass [pass/1: random 255]