predicate => '_has_response_cb',
);
+subtype 'Catalyst::Engine::Types::Writer',
+ as duck_type([qw(write close)]);
+
has _writer => (
is => 'ro',
- isa => duck_type([qw(write close)]),
+ isa => 'Catalyst::Engine::Types::Writer',
writer => '_set_writer',
clearer => '_clear_writer',
);
-httponly => $val->{httponly} || 0,
)
);
+ if (!defined $cookie) {
+ $c->log->warn("undef passed in '$name' cookie value - not setting cookie")
+ if $c->debug;
+ next;
+ }
push @cookies, $cookie->as_string;
}