home/gitolite
2
0
Fork 0
mirror of https://github.com/wahyd4/gitolite.git synced 2026-08-26 05:15:54 +10:00
Code Issues Packages Projects Releases Wiki Activity

tone down the "ZOMG users without pubkeys" hysteria :)

Browse Source
This commit is contained in:
Sitaram Chamarty
2010-05-16 13:36:54 +05:30
parent 35750c1abe
commit aa8da93016
1 changed files with 9 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/gl-compile-conf
+9 -3
View File
@@ -580,10 +580,16 @@ for my $pubkey (`find . -type f`)
print $newkeys_fh $pubkey_content;
}
# lint check 3; a little more severe than the first two I guess...
for my $user (sort keys %user_list)
{
next if $user =~ /^(gitweb|daemon|\@.*|~\$creator|\$readers|\$writers)$/ or $user_list{$user} eq 'has pubkey';
print STDERR "$WARN user $user in config, but has no pubkey!\n";
my @no_pubkey =
grep { $_ !~ /^(gitweb|daemon|\@.*|~\$creator|\$readers|\$writers)$/ }
grep { $user_list{$_} ne 'has pubkey' }
keys %user_list;
if (@no_pubkey > 10) {
print STDERR "$WARN You have " . scalar(@no_pubkey) . " users WITHOUT pubkeys...!\n";
} elsif (@no_pubkey) {
print STDERR "$WARN the following users have no pubkeys:\n", join(",", sort @no_pubkey), "\n";
}
}
print $newkeys_fh "# gitolite end\n";