dgit: clean mode: Correctly reject bad modes from config

Add the missing ^ and $ (which do not appear in $cleanmode_re).

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

diff --git a/dgit b/dgit
index 920787457bd271b3aecef6d0eecb8c1f924d9200..40662b1b2f955b7a50d7804dcf69878d0250e5cf 100755 (executable)
--- a/dgit
+++ b/dgit
@@ -7593,7 +7593,7 @@ sub parseopts_late_defaults () {
        $cleanmode //= 'dpkg-source';
 
        badcfg f_ "unknown clean-mode \`%s'", $cleanmode unless
-           $cleanmode =~ m/$cleanmode_re/;
+           $cleanmode =~ m/^$cleanmode_re$/;
     }
 
     $buildproductsdir //= access_cfg('build-products-dir', 'RETURN-UNDEF');