1 files changed, 6 insertions, 1 deletions
diff --git a/lib/MGA/Git.pm b/lib/MGA/Git.pm
index 6b8ac11..99d71d4 100644
--- a/lib/MGA/Git.pm
+++ b/lib/MGA/Git.pm
@@ -2,7 +2,7 @@ package MGA::Git;
 
 use strict;
 use Git;
-use YAML qw(LoadFile);
+use YAML qw(LoadFile DumpFile);
 use Template;
 use File::Slurp;
 use File::Basename;
@@ -201,6 +201,11 @@ sub update_gitolite_keydir {
     }
 }
 
+sub dumpdb {
+    my ($r) = @_;
+    DumpFile($config->{www_dir} . '/repos.yaml', $r);
+}
+
 sub update_gitolite_config {
     my ($r) = @_;
     my $oldconf = -f $config->{gitolite_config}