Add the showconf command, to show repos configuration in yaml

1 files changed, 16 insertions, 0 deletions

diff --git a/mgagit b/mgagit
index 7cb960c..a9387ae 100755
--- a/mgagit
+++ b/mgagit
@@ -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();
 }