diff options
Diffstat (limited to 'mgagit')
-rwxr-xr-x | mgagit | 16 |
1 files changed, 16 insertions, 0 deletions
@@ -2,6 +2,7 @@ use strict; use MGA::Git; +use YAML; #use Data::Dump qw/dd/; my %actions = ( @@ -33,6 +34,15 @@ $0 usage [action] Show action usage END }, + showconf => { + run => \&showconf, + descr => 'Show YAML mgagit configuration', + usage => <<END, +$0 showconf + +Show YAML mgagit configuration +END + }, ); sub usage { @@ -79,6 +89,12 @@ sub glrun { MGA::Git::run_gitolite(\%r); } +sub showconf { + my %r; + MGA::Git::load_gitrepos(\%r); + print YAML::Dump(\%r); +} + if (@ARGV == 0 || !$actions{$ARGV[0]}) { usageexit(); } |