From: Moritz Bunkus <m.bunkus@linet.de>
Date: Mon, 20 Dec 2021 12:54:06 +0000 (+0100)
Subject: Presenter: eine Instanz der doppelten Funktion restricted_html entfernt
X-Git-Tag: kivitendo-mebil_0.1-0~10^2~2^2~250
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=86e54d7f8ddabc1db7e944504b0c5d00e8a0712d;p=kivitendo-erp.git

Presenter: eine Instanz der doppelten Funktion restricted_html entfernt
---

diff --git a/SL/Presenter/Tag.pm b/SL/Presenter/Tag.pm
index 25c7d0c2c..a140fe4e4 100644
--- a/SL/Presenter/Tag.pm
+++ b/SL/Presenter/Tag.pm
@@ -10,7 +10,7 @@ use Exporter qw(import);
 our @EXPORT_OK = qw(
   html_tag input_tag hidden_tag javascript man_days_tag name_to_id select_tag
   checkbox_tag button_tag submit_tag ajax_submit_tag input_number_tag
-  stringify_attributes restricted_html textarea_tag link_tag date_tag
+  stringify_attributes textarea_tag link_tag date_tag
   div_tag radio_button_tag img_tag);
 our %EXPORT_TAGS = (ALL => \@EXPORT_OK);
 
@@ -369,13 +369,6 @@ sub _set_id_attribute {
 
 my $html_restricter;
 
-sub restricted_html {
-  my ($value) = @_;
-
-  $html_restricter ||= SL::HTML::Restrict->create;
-  return $html_restricter->process($value);
-}
-
 sub textarea_tag {
   my ($name, $content, %attributes) = @_;
 
@@ -500,10 +493,6 @@ Creates a string from all elements in C<%items> suitable for usage as
 HTML tag attributes. Keys and values are HTML escaped even though keys
 must not contain non-ASCII characters for browsers to accept them.
 
-=item C<restricted_html $html>
-
-Returns HTML stripped of unknown tags. See L<SL::HTML::Restrict>.
-
 =back
 
 =head2 HIGH-LEVEL FUNCTIONS