moved to a different server
[ikiwiki] / doc / bugs / quieten_mercurial.mdwn
1 The mercurial backend does not pass the --quiet option to hg, and it sometimes prints
2 messages which are then taken for CGI output, causing errors and general trouble. --MichaƂ
3
4     --- iki/usr/share/perl5/IkiWiki/Rcs/mercurial.pm    2006-12-29 02:48:30.000000000 +0100
5     +++ /usr/share/perl5/IkiWiki/Rcs/mercurial.pm       2007-03-18 22:45:24.000000000 +0100
6     @@ -55,7 +55,7 @@
7      }
8  
9      sub rcs_update () { #{{{
10     -   my @cmdline = ("hg", "-R", "$config{srcdir}", "update");
11     +   my @cmdline = ("hg", "-q", "-R", "$config{srcdir}", "update");
12         if (system(@cmdline) != 0) {
13                 warn "'@cmdline' failed: $!";
14         }
15     @@ -80,7 +80,7 @@
16      
17         $message = possibly_foolish_untaint($message);
18      
19     -   my @cmdline = ("hg", "-R", "$config{srcdir}", "commit", 
20     +   my @cmdline = ("hg", "-q", "-R", "$config{srcdir}", "commit", 
21                        "-m", "$message", "-u", "$user");
22         if (system(@cmdline) != 0) {
23                 warn "'@cmdline' failed: $!";
24     @@ -92,7 +92,7 @@
25      sub rcs_add ($) { # {{{
26         my ($file) = @_;
27      
28     -   my @cmdline = ("hg", "-R", "$config{srcdir}", "add", "$file");
29     +   my @cmdline = ("hg", "-q", "-R", "$config{srcdir}", "add", "$file");
30         if (system(@cmdline) != 0) {
31                 warn "'@cmdline' failed: $!";
32         }
33
34 Thanks much for the patch. [[bugs/done]] --[[Joey]]