chiark
/
gitweb
/
~ianmdlvl
/
dgit.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
3468925
)
Make fail() cope with multi-line messages
author
Ian Jackson
<ijackson@chiark.greenend.org.uk>
Sat, 15 Nov 2014 18:21:12 +0000
(18:21 +0000)
committer
Ian Jackson
<ijackson@chiark.greenend.org.uk>
Sat, 15 Nov 2014 18:22:45 +0000
(18:22 +0000)
dgit
patch
|
blob
|
history
diff --git
a/dgit
b/dgit
index 5c8d24a7908eb891ef1ebf5765593100683f47e7..2056818baa4cb07fa6a4e57b4253151d85cd5c10 100755
(executable)
--- a/
dgit
+++ b/
dgit
@@
-163,7
+163,10
@@
sub waitstatusmsg () {
sub printdebug { print DEBUG $debugprefix, @_ or die $!; }
sub fail {
sub printdebug { print DEBUG $debugprefix, @_ or die $!; }
sub fail {
- die $us.($we_are_responder ? " (build host)" : "").": @_\n";
+ my $s = "@_\n";
+ my $prefix = $us.($we_are_responder ? " (build host)" : "").": ";
+ $s =~ s/^/$prefix/gm;
+ die $s;
}
sub badcfg { print STDERR "$us: invalid configuration: @_\n"; exit 12; }
}
sub badcfg { print STDERR "$us: invalid configuration: @_\n"; exit 12; }