diff options
Diffstat (limited to 'Master/tlpkg/tlgs/lib/decrypt.ps')
-rw-r--r--[-rwxr-xr-x] | Master/tlpkg/tlgs/lib/decrypt.ps | 30 |
1 files changed, 15 insertions, 15 deletions
diff --git a/Master/tlpkg/tlgs/lib/decrypt.ps b/Master/tlpkg/tlgs/lib/decrypt.ps index b172f6d83b4..2108173ea9f 100755..100644 --- a/Master/tlpkg/tlgs/lib/decrypt.ps +++ b/Master/tlpkg/tlgs/lib/decrypt.ps @@ -1,15 +1,15 @@ -%!
-% Decrypt an eexec-encoded file.
-% $Id: decrypt.ps 6300 2005-12-28 19:56:24Z giles $
-
-(t.in) (r) file /in exch def
-(t.out) (w) file /out exch def
-256 string /buf exch def
-55665 % eexec encryption seed
- { in buf readhexstring /more exch def
- dup .type1decrypt out exch writestring
- more not { exit } if
- } loop
-in closefile
-out closefile
-quit
+%! +% Decrypt an eexec-encoded file. +% $Id: decrypt.ps 6300 2005-12-28 19:56:24Z giles $ + +(t.in) (r) file /in exch def +(t.out) (w) file /out exch def +256 string /buf exch def +55665 % eexec encryption seed + { in buf readhexstring /more exch def + dup .type1decrypt out exch writestring + more not { exit } if + } loop +in closefile +out closefile +quit |