[Catalyst-commits] r12068 -
Catalyst-Runtime/5.80/branches/better_scripts/lib/Catalyst/Script
rafl at dev.catalyst.perl.org
rafl at dev.catalyst.perl.org
Sun Nov 29 14:00:43 GMT 2009
Author: rafl
Date: 2009-11-29 14:00:43 +0000 (Sun, 29 Nov 2009)
New Revision: 12068
Modified:
Catalyst-Runtime/5.80/branches/better_scripts/lib/Catalyst/Script/Server.pm
Log:
Remove useless lexical.
Modified: Catalyst-Runtime/5.80/branches/better_scripts/lib/Catalyst/Script/Server.pm
===================================================================
--- Catalyst-Runtime/5.80/branches/better_scripts/lib/Catalyst/Script/Server.pm 2009-11-29 14:00:38 UTC (rev 12067)
+++ Catalyst-Runtime/5.80/branches/better_scripts/lib/Catalyst/Script/Server.pm 2009-11-29 14:00:43 UTC (rev 12068)
@@ -134,7 +134,7 @@
sub _restarter_args {
my $self = shift;
- my %args = (
+ return (
argv => $self->ARGV,
start_sub => sub { $self->_run_application },
($self->_has_follow_symlinks ? (follow_symlinks => $self->follow_symlinks) : ()),
@@ -142,8 +142,6 @@
($self->_has_restart_directory ? (directories => $self->restart_directory) : ()),
($self->_has_restart_regex ? (filter => $self->restart_regex) : ()),
);
-
- return %args;
}
sub run {
More information about the Catalyst-commits
mailing list