update output

[ikiwiki_plugins.git] / sweavealike.pm

diff --git a/sweavealike.pm b/sweavealike.pm
index 661a4316e1806d7b38cd847747236c5043f2056a..4747b18c98e65e1fa8d6d46dfcf3212be1d5c479 100644 (file)
--- a/sweavealike.pm
+++ b/sweavealike.pm
@@ -70,12 +70,12 @@ sub preprocess {
     if ($@) {
        error("code '$param{code}' produced error '$@'");
     }
-    my $output = "sweave output\n\n";
+    my $output;
     if (exists $param{verbatim}) {
        $output = $param{code};
        $output =~ s/^/> /mg;
     }
-    $output .= $code_result;
+    $output .= "\n".$code_result;
     $output =~ s/^/    /mg;
     return($output);
 }