From: Sven Schöling <s.schoeling@linet-services.de>
Date: Mon, 7 May 2012 16:42:41 +0000 (+0200)
Subject: print_html_template auch mit scalarrefs als file aufrufbar gemacht
X-Git-Tag: release-3.2.0beta~411^2~37
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=bdd1d7ea5dbe81ef852041c7517747ae7a404d03;p=kivitendo-erp.git

print_html_template auch mit scalarrefs als file aufrufbar gemacht

Ausserdem die Fehlermeldung bei nicht korrektem aufruf mit header angeben.
---

diff --git a/SL/Form.pm b/SL/Form.pm
index 221f7b1aa..9f0cf11bc 100644
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -594,8 +594,11 @@ sub _prepare_html_template {
   if (-f "templates/webpages/${file}.html") {
     $file = "templates/webpages/${file}.html";
 
+  } elsif (ref $file eq 'SCALAR') {
+    # file is a scalarref, use inline mode
   } else {
     my $info = "Web page template '${file}' not found.\n";
+    $::form->header;
     print qq|<pre>$info</pre>|;
     ::end_of_request();
   }