t/lib/TestApp/Controller/Action/Chained/Auto.pm

   1 package TestApp::Controller::Action::Chained::Auto;
   2 use warnings;
   3 use strict;
   4
   5 use base qw( Catalyst::Controller );
   6
   7 #
   8 #   Provided for sub-auto tests. This just always returns true.
   9 #
  10 sub auto    : Private { 1 }
  11
  12 #
  13 #   Simple chains with auto actions returning 1 and 0
  14 #
  15 sub foo     : Chained PathPart('chained/autochain1') CaptureArgs(1) { }
  16 sub bar     : Chained PathPart('chained/autochain2') CaptureArgs(1) { }
  17
  18 #
  19 #   Detaching out of an auto action.
  20 #
  21 sub dt1     : Chained PathPart('chained/auto_detach') CaptureArgs(1) { }
  22
  23 #
  24 #   Forwarding out of an auto action.
  25 #
  26 sub fw1     : Chained PathPart('chained/auto_forward') CaptureArgs(1) { }
  27
  28 #
  29 #   Target for dispatch and forward tests.
  30 #
  31 sub fw3     : Private { }
  32
  33 1;