diff options
author | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2017-01-09 01:42:43 +0000 |
---|---|---|
committer | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2017-01-09 13:08:32 +0000 |
commit | e8df5638fc9abd8c502872b2a6f535de9ecf602f (patch) | |
tree | 75ade94b4c003174fa84d80441d6fafada7768c2 /dgit | |
parent | 468edf05661effb0ef4f4dd1efb2df5a61434259 (diff) |
Provide `dgit print-dgit-repos-server-source-url'.
Re:#850521.
Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
Diffstat (limited to 'dgit')
-rwxr-xr-x | dgit | 11 |
1 files changed, 10 insertions, 1 deletions
@@ -6162,13 +6162,22 @@ sub cmd_clone_dgit_repos_server { exec @cmd or fail "exec git clone: $!\n"; } +sub cmd_print_dgit_repos_server_source_url { + badusage "no arguments allowed to dgit print-dgit-repos-server-source-url" + if @ARGV; + $package = '_dgit-repos-server'; + local $access_forpush = 0; + my $url = access_giturl(); + print $url, "\n" or die $!; +} + sub cmd_setup_mergechangelogs { badusage "no arguments allowed to dgit setup-mergechangelogs" if @ARGV; setup_mergechangelogs(1); } sub cmd_setup_useremail { - badusage "no arguments allowed to dgit setup-mergechangelogs" if @ARGV; + badusage "no arguments allowed to dgit setup-useremail" if @ARGV; setup_useremail(1); } |