Skip to content

Instantly share code, notes, and snippets.

@broquaint
Created January 24, 2012 22:38
Show Gist options
  • Save broquaint/1673180 to your computer and use it in GitHub Desktop.
Save broquaint/1673180 to your computer and use it in GitHub Desktop.
Why is the debugger not breaking at the first test?
$ perl -Mlocal::lib=local-lib5 -Mblib -d t/model_collectionofrepos.t
Loading DB routines from perl5db.pl version 1.33
Editor support available.
Enter h or `h h' for help, or `man perldebug' for more help.
main::(t/model_collectionofrepos.t:26):
26: my $run_options = {};
DB<1> c Gitalist::Model::CollectionOfRepos::build_per_context_instance
not ok 1 - Blows up nicely with no repos dir
# Failed test 'Blows up nicely with no repos dir'
# at t/model_collectionofrepos.t line 70.
# expecting: Regexp ((?^:Don't know where to get repositores from))
# found: normal exit
not ok 2 - Blows up nicely with repos dir does not exist
# Failed test 'Blows up nicely with repos dir does not exist'
# at t/model_collectionofrepos.t line 73.
# expecting: Regexp ((?^:No such file or directory))
# found: normal exit
ok 3 - repo_dir is tempdir
ok 4 - Has model
Gitalist::Model::CollectionOfRepos::build_per_context_instance(/home/dbrook/dev/Gitalist/t/../lib/Gitalist/Model/CollectionOfRepos.pm:92):
92: my ($self, $ctx) = @_;
DB<2> T
$ = Gitalist::Model::CollectionOfRepos::build_per_context_instance(ref(Gitalist::Model::CollectionOfRepos), ref(Class::MOP::Class::__ANON__::SERIAL::3)) called from file `/home/dbrook/dev/Gitalist/t/../local-lib5/lib/perl5/Catalyst/Component/InstancePerContext.pm' line 24
$ = Catalyst::Component::InstancePerContext::ACCEPT_CONTEXT(ref(Gitalist::Model::CollectionOfRepos), ref(Class::MOP::Class::__ANON__::SERIAL::3)) called from file `t/model_collectionofrepos.t' line 214
. = main::test_with_config(ref(HASH), 'msg', 'repo_dir is tempdir') called from file `t/model_collectionofrepos.t' line 77
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment