output SHA256 sum without spaces

This commit is contained in:
Hannes Mehnert 2024-09-24 13:44:40 +02:00
parent 402894405d
commit cd1b2a0b26

View file

@ -202,7 +202,7 @@ let artifact
else txtf "%a" Fpath.pp filepath
];
H.txt " ";
H.code [txtf "SHA256:%a" Ohex.pp sha256];
H.code [txtf "SHA256:%s" (Ohex.encode sha256)];
txtf " (%a)" Fmt.byte_size size;
]