# HG changeset patch # User Claus Gittinger # Date 1579632340 -3600 # Node ID 61abc02e1b6fc36f67dd12593e9f52b802ea2054 # Parent 397f4448289cfe0091e9cd69f4a6924b03890e98 #BUGFIX by exept class: WorkspaceApplication comment/format in: #menuLoadEncryptedFrom diff -r 397f4448289c -r 61abc02e1b6f WorkspaceApplication.st --- 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.