dgit: config debugging: do not print ARRAY(0x...)

[dgit.git] / dgit

diff --git a/dgit b/dgit
index 2427f72c06119acd0c3a01b939941f5d825cebcb..5f37c1143c7a91ac4866414b265aa5b3b4d5121e 100755 (executable)
--- a/dgit
+++ b/dgit
@@ -659,7 +659,9 @@ sub git_get_config ($) {
     my ($c) = @_;
     foreach my $src (@gitcfgsources) {
        my $l = $gitcfgs{$src}{$c};
-       printdebug"C $c ".(defined $l ? messagequote "'$l'" : "undef")."\n"
+       printdebug"C $c ".(defined $l ?
+                          join " ", map { messagequote "'$_'" } @$l :
+                          "undef")."\n"
            if $debuglevel >= 4;
        $l or next;
        @$l==1 or badcfg "multiple values for $c".