Fix bug breaking content output

[catagits/CatalystX-HelpText.git] / lib / CatalystX / HelpText / Model.pm

diff --git a/lib/CatalystX/HelpText/Model.pm b/lib/CatalystX/HelpText/Model.pm
index 1979cee..573b33a 100644 (file)
--- a/lib/CatalystX/HelpText/Model.pm
+++ b/lib/CatalystX/HelpText/Model.pm
@@ -47,10 +47,11 @@ sub get_help_text_for {
     my $file = $self->_get_file($fn);
 
     if ( -e $file ) {
+        my $content = $file->slurp;
         return sprintf('<%s class="%s">%s</%s>',
             $self->wrapper_tag,
             $self->wrapper_css_class,
-            $file->slurp,
+            $content,
             $self->wrapper_tag
         );
     }