diff options
author | Marc Espie <espie@cvs.openbsd.org> | 2009-12-28 14:46:49 +0000 |
---|---|---|
committer | Marc Espie <espie@cvs.openbsd.org> | 2009-12-28 14:46:49 +0000 |
commit | 4405ce99db865f3d59d113e603eb5c253c72ea66 (patch) | |
tree | 21c210d2f884275306aeaaacabe84e75ed3db334 /usr.sbin/pkg_add/OpenBSD | |
parent | 69ae9cfe601cfcf54e09e2bb9e677e99a96f78fb (diff) |
add -F carp as an extra debugging device: ^T handler will show a stack
backtrace
Diffstat (limited to 'usr.sbin/pkg_add/OpenBSD')
-rw-r--r-- | usr.sbin/pkg_add/OpenBSD/AddDelete.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/usr.sbin/pkg_add/OpenBSD/AddDelete.pm b/usr.sbin/pkg_add/OpenBSD/AddDelete.pm index c8a8f6008e4..ab7ec61c0c8 100644 --- a/usr.sbin/pkg_add/OpenBSD/AddDelete.pm +++ b/usr.sbin/pkg_add/OpenBSD/AddDelete.pm @@ -1,5 +1,5 @@ # ex:ts=8 sw=4: -# $OpenBSD: AddDelete.pm,v 1.12 2009/12/22 18:26:47 deraadt Exp $ +# $OpenBSD: AddDelete.pm,v 1.13 2009/12/28 14:46:48 espie Exp $ # # Copyright (c) 2007-2009 Marc Espie <espie@openbsd.org> # @@ -397,6 +397,10 @@ sub print } $state->say($what." ".$object.$state->ntogo_string($state->todo)); + if ($state->{defines}->{carp}) { + require Carp; + Carp::cluck("currently here"); + } } sub set |