[Catalyst] getting $c in model unit test

[Nathan Gray]

On Tue, May 15, 2007 at 03:32:31PM +0100, Matt Lawrence wrote:
> Nathan Gray wrote:
> > I would like to test a model with a unit test.  Catalyst kindly
> > generates stub unit tests for models, but it does not include a stub
> > showing how to instantiate the context object.
> >
> I think I mentioned this on another thread earlier on. Something about
> Chuck Norris if memory serves. Anyway:
> 
> my $controller = MyApp->controller('MyController');
> my $c = MyApp->prepare();
> 
> # Monkey with $c to set up a fake context (set req->uri, or params)
> 
> my $result = $c->forward($controller, 'method_to_test', \@args);

Thank you.

We should probably add something like this to the autogenerated model
test stub, which appears to work:

  use MyApp;
  my $model = MyApp->model('MyModel');
  my $c = MyApp->prepare();

I tried to use the 'forward' method, but it did not want to cooperate
(Modification of non-creatable array value attempted, subscript -1 at
/usr/share/perl5/Catalyst/Dispatcher.pm line 186, which is: 'my
$namespace = $c->stack->[-1]->namespace;').

So rather than stubbing this example code:

  # Test each method of your model
  #is(
  #    $c->forward($model, 'methodname_here', \@args_here),
  #    $expected_value_here,
  #    $test_description_here,
  #);

we may want to stub in an example like this:

  # Test each method of your model
  #is(
  #    $model->methodname_here($c, @args_here),
  #    $expected_value_here,
  #    $test_description_here,
  #);

-kolibrie

-------------- next part --------------
A non-text attachment was scrubbed...
Name: not available
Type: application/pgp-signature
Size: 189 bytes
Desc: Digital signature
Url : http://lists.scsys.co.uk/pipermail/catalyst/attachments/20070515/070a74b4/attachment.pgp