docker-library
/
docs
mirror of https://github.com/docker-library/docs.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Add back "pull by digest" to the tag-details page... 

Lost this when I ported to Perl, doh!
This commit is contained in:
Tianon Gravi 2015-09-18 12:42:12 -07:00
parent 3967057d32
commit 9e947fd6be
1 changed files with 11 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
.template-helpers/generate-tag-details.pl
View File

@ -83,7 +83,10 @@ sub get_manifest {
my $manifestTx = ua_req(get => "https://registry-1.docker.io/v2/$repo/manifests/$tag" => $authorizationHeader);
die "failed to get manifest for $image" unless $manifestTx->success;
return $manifests{$image} = $manifestTx->res->json;
return (
$manifestTx->res->headers->header('Docker-Content-Digest'),
$manifests{$image} = $manifestTx->res->json,
);
}
sub get_blob_headers {
@ -161,7 +164,13 @@ while (my $image = shift) {
say '## `' . $image . '`';
my ($repo, $tag) = split_image_name($image);
my $manifest = get_manifest($repo, $tag);
my ($digest, $manifest) = get_manifest($repo, $tag);
print "\n";
say '```console';
say '$ docker pull ' . $repo . '@' . $digest;
say '```';
my %parentChild;
my %totals = (
virtual_size => 0,