diff options
author | joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071> | 2007-03-24 15:14:53 +0000 |
---|---|---|
committer | joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071> | 2007-03-24 15:14:53 +0000 |
commit | c936ba171929b43963afd68dd66944199e2351f4 (patch) | |
tree | 24d92ccc1381a3cfccac87fea15db086658fd164 /IkiWiki/Rcs | |
parent | bbb0b3e72f6a3ffaac8343fc847800d7faaa7573 (diff) |
* Fix mercurial backend to deal with empty commit messages.
Diffstat (limited to 'IkiWiki/Rcs')
-rw-r--r-- | IkiWiki/Rcs/mercurial.pm | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/IkiWiki/Rcs/mercurial.pm b/IkiWiki/Rcs/mercurial.pm index e4cc6deb3..84bf99c68 100644 --- a/IkiWiki/Rcs/mercurial.pm +++ b/IkiWiki/Rcs/mercurial.pm @@ -79,9 +79,12 @@ sub rcs_commit ($$$;$$) { #{{{ } $message = possibly_foolish_untaint($message); + if (! length $message) { + $message = "no message given"; + } - my @cmdline = ("hg", "-q", "-R", "$config{srcdir}", "commit", - "-m", "$message", "-u", "$user"); + my @cmdline = ("hg", "-q", "-R", $config{srcdir}, "commit", + "-m", $message, "-u", $user); if (system(@cmdline) != 0) { warn "'@cmdline' failed: $!"; } |