Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 0d12df6d

Von Moritz Bunkus vor etwa 3 Jahren hinzugefügt

  • ID 0d12df6dc721dcdbc81ca8db667cd644393bc5fc
  • Vorgänger a30abed7
  • Nachfolger f85be296

L/Presenter: Funktion zum Entfernen aller HTML-Tags

Unterschiede anzeigen:

SL/Presenter/Text.pm
4 4

  
5 5
use SL::Presenter::EscapedText qw(escape);
6 6
use SL::HTML::Restrict;
7
use SL::HTML::Util;
7 8

  
8 9
use Exporter qw(import);
9 10
our @EXPORT_OK = qw(format_man_days simple_format truncate restricted_html);
......
52 53
  return $html_cleaner->process($value);
53 54
}
54 55

  
56
sub stripped_html {
57
  my ($value) = @_;
58
  return SL::HTML::Util::strip($value);
59
}
60

  
55 61
1;
56 62
__END__
57 63

  
......
103 109
Returns HTML code stripped from unwanted/unsupported content. This is
104 110
done via the module L<SL::HTML::Restrict>.
105 111

  
112
=item C<stripped_html $html>
113

  
114
Returns the raw text with all HTML tags and comments stripped. This is
115
done via L<SL::HTML::Util/strip>.
116

  
106 117
=back
107 118

  
108 119
=head1 BUGS
SL/Template/Plugin/L.pm
86 86
sub radio_button_tag         { return _call_presenter('radio_button_tag',         @_); }
87 87
sub img_tag                  { return _call_presenter('img_tag',                  @_); }
88 88
sub restricted_html          { return _call_presenter('restricted_html',          @_); }
89
sub stripped_html            { return _call_presenter('stripped_html',            @_); }
89 90

  
90 91
sub _set_id_attribute {
91 92
  my ($attributes, $name, $unique) = @_;

Auch abrufbar als: Unified diff