join the dots so server starts on reload_config

[scpubgit/Clifton.git] / lib / App / Clifton / Component.pm

diff --git a/lib/App/Clifton/Component.pm b/lib/App/Clifton/Component.pm
index 6f857ba..5604bae 100644 (file)
--- a/lib/App/Clifton/Component.pm
+++ b/lib/App/Clifton/Component.pm
@@ -55,7 +55,8 @@ sub _eval_cb {
   my ($self, $code) = @_;
   my $str = "$self";
   sub {
-    try { $code->(@_) } catch { log_error { "Exception from ${self}: $_" } }
+    my @args = @_;
+    try { $code->(@args) } catch { log_error { "Exception from ${self}: $_" } }
   };
 }