changeset 19425 | 61abc02e1b6f |
parent 19424 | 397f4448289c |
child 19426 | 28edd8ac82bf |
--- a/WorkspaceApplication.st Tue Jan 21 19:44:33 2020 +0100 +++ b/WorkspaceApplication.st Tue Jan 21 19:45:40 2020 +0100 @@ -3240,6 +3240,9 @@ ws := self selectedWorkspacesTextView. cipher := algorithm new key:key mode:#CBC . + + "/ there are 64 random bytes before the actual text, + "/ and the size info is somewhere in there blob := (cipher decrypt:contents) asString. pos1 := (blob indexOf:(Character null))+1. pos2 := (blob indexOf:(Character space) startingAt:pos1)-1.