Update vendored dependencies and fix update tool for Perl changes.

1 files changed, 3 insertions, 3 deletions

diff --git a/vendor/update b/vendor/update
index 6f9ff5e86..20a4284bc 100755
--- a/vendor/update
+++ b/vendor/update
@@ -50,7 +50,7 @@ close $fh;
 my ($data, $error) = from_toml $contents;
 print_error "unable to parse $config: $!" if $error;
 
-while (my ($name, $info) = each $data) {
+while (my ($name, $info) = each %{$data}) {
 	print_format "Updating <|GREEN $name|> ...\n";
 
 	my $unpackdir = File::Temp->newdir;
@@ -91,7 +91,7 @@ close $fh;
 
 open($fh, '>', $readme) or print_error "unable to write $readme: $!";
 print $fh $contents =~ s/\n\#\#.*//rs;
-for my $name (sort keys $data) {
+for my $name (sort keys %{$data}) {
 	my $info = $data->{$name};
 	printf $fh "\n## %s\n\n", $name;
 	printf $fh "**Author** &mdash; [%s](mailto:%s)\n\n", $info->{author}, $info->{email} if $info->{email};
@@ -101,4 +101,4 @@ for my $name (sort keys $data) {
 	my $website = $info->{website} // $info->{git};
 	printf $fh "**Website** &mdash; [%s](%s)\n", $website, $website;
 }
-close $fh;
\ No newline at end of file
+close $fh;