allow - in path of decision

diff --git a/scripts/publish-decision b/scripts/publish-decision
index 0a66463e6835d132ae03edf15b62dd3354f5dd2e..455e8f1e8795cc9dd505eed4c48ba1533be432dd 100755 (executable)
--- a/scripts/publish-decision
+++ b/scripts/publish-decision
@@ -24,7 +24,7 @@ use POSIX qw(strftime);
 #      - BUGNUMBER_blah_blah/decision.wml      ready to paste into webmml
 #    Inspect them and if appropriate send and commit.
 
-die "bad usage" unless @ARGV==1 && $ARGV[0] =~ m#^((\d+)_\w+)/.*$#;
+die "bad usage" unless @ARGV==1 && $ARGV[0] =~ m#^((\d+)_[\w-]+)/.*$#;
 my ($dir, $bugn, $decision) = ($1,$2,$&);
 
 my %decision = process_decision($decision,$bugn);