Bug fix for require dieing as make_immutable doesn't return true.

[catagits/Catalyst-Runtime.git] / lib / Catalyst / Script / Server.pm

diff --git a/lib/Catalyst/Script/Server.pm b/lib/Catalyst/Script/Server.pm
index 328773c..1f4f80e 100644 (file)
--- a/lib/Catalyst/Script/Server.pm
+++ b/lib/Catalyst/Script/Server.pm
@@ -48,8 +48,8 @@ has port => (
 use Moose::Util::TypeConstraints;
 class_type 'MooseX::Daemonize::Pid::File';
 subtype 'Catalyst::Script::Server::Types::Pidfile',
-    as 'MooseX::Daemonize::Pid::File',
-    where { 1 };
+    as 'MooseX::Daemonize::Pid::File';
+
 coerce 'Catalyst::Script::Server::Types::Pidfile', from Str, via {
     try { Class::MOP::load_class("MooseX::Daemonize::Pid::File") }
     catch {
@@ -163,7 +163,7 @@ has follow_symlinks => (
 
 sub _plack_engine_name {
     my $self = shift;
-    return $self->fork ? 'Starman' : $self->keepalive ? 'Starman' : 'Standalone';
+    return $self->fork || $self->keepalive ? 'Starman' : 'Standalone';
 }
 
 sub _restarter_args {
@@ -280,7 +280,6 @@ sub _application_args {
 }
 
 __PACKAGE__->meta->make_immutable;
-
 1;
 
 =head1 NAME
@@ -322,6 +321,10 @@ Catalyst::Script::Server - Catalyst test server
 
 Run a Catalyst test server for this application.
 
+=head1 SEE ALSO
+
+L<Catalyst::ScriptRunner>
+
 =head1 AUTHORS
 
 Catalyst Contributors, see Catalyst.pm