Provide `dgit clean'. Closes:#736527.

diff --git a/debian/changelog b/debian/changelog
index 8695a5f4bcbeb2e38109eec7ea4391665667f98f..051b1fdb21e25339e320fe9b5c3b982168f7fa7f 100644 (file)
--- a/debian/changelog
+++ b/debian/changelog
@@ -30,6 +30,7 @@ dgit (0.22~experimental1) experimental; urgency=low
   * Provide t-archive-process-incoming and t-archive-query subroutines for
     regression test scripts to use.
   * Print better message for unknown operations.
+  * Provide `dgit clean'.  Closes:#736527.
 
   Major new feature, currently stalled awaiting server infrastructure:
   * dgit-repos-server: New program for receiving signed-tag-based

diff --git a/dgit b/dgit
index 2852e134289d3e4076c917e0c349d8e208953eaf..5f1ef2e59bc3864faf7f5d4abcd27409018ee9f3 100755 (executable)
--- a/dgit
+++ b/dgit
@@ -1948,6 +1948,11 @@ sub clean_tree () {
     }
 }
 
+sub cmd_clean () {
+    badusage "clean takes no additional arguments" if @ARGV;
+    clean_tree();
+}
+
 sub build_prep () {
     badusage "-p is not allowed when building" if defined $package;
     check_not_dirty();

diff --git a/dgit.1 b/dgit.1
index 1a6945a13204b9441450583854819e76a35e93da..5a00dd77521076410db662f3f69b31b19f9caf7b 100644 (file)
--- a/dgit.1
+++ b/dgit.1
@@ -106,6 +106,10 @@ and
 
 Tagging, signing and actually uploading should be left to dgit push.
 .TP
+.B dgit clean
+Cleans the current working tree (according to the --clean= option in
+force).
+.TP
 .B dgit help
 Print a usage summary.
 .TP