chiark
/
gitweb
/
~ianmdlvl
/
dgit.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Dgit.pm: cmdoutput: Handle undef in arg crash better
[dgit.git]
/
Debian
/
Dgit.pm
diff --git
a/Debian/Dgit.pm
b/Debian/Dgit.pm
index aa0c5a3d675cbf1d7418c222a2e5a9f7a6819182..cb4a599b20849ea13b0656937c2fd15fb006a932 100644
(file)
--- a/
Debian/Dgit.pm
+++ b/
Debian/Dgit.pm
@@
-5,10
+5,12
@@
package Debian::Dgit;
use strict;
use warnings;
use strict;
use warnings;
+use Carp;
use POSIX;
use IO::Handle;
use Config;
use Digest::SHA;
use POSIX;
use IO::Handle;
use Config;
use Digest::SHA;
+use Data::Dumper;
BEGIN {
use Exporter ();
BEGIN {
use Exporter ();
@@
-208,7
+210,7
@@
sub failedcmd {
}
sub cmdoutput_errok {
}
sub cmdoutput_errok {
-
die
Dumper(\@_)." ?" if grep { !defined } @_;
+
confess
Dumper(\@_)." ?" if grep { !defined } @_;
debugcmd "|",@_;
open P, "-|", @_ or die "$_[0] $!";
my $d;
debugcmd "|",@_;
open P, "-|", @_ or die "$_[0] $!";
my $d;