apropos konfiguration: habe auch von Konstanten auf
Readonly umgestellt.
Den BBCode-Parser muss ich eh nochmal angehen; der fabriziert mir zu viele Tabellen, wo eigentlich auch ein div+css ausreichen wuerde... momentan sieht sie folgendermaszen aus:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
html => {
-start => qq~<table class="maintable"><tr><td><b>HTML:</b></td></tr>~.
qq~<tr><td class="tableshcode">~,
-end => qq~</td></tr></table>~,
-string => \&PBoard::Posting::HighlightHtml,
},
sql => {
-start => qq~<table class="maintable"><tr><td><b>SQL:</b></td></tr>~.
qq~<tr><td class="tableshcode">~,
-end => qq~</td></tr></table>~,
-string => \&PBoard::Posting::HighlightSql,
},
# different link types
cpan => {
-start =>
'<a rel="external" href="http://search.cpan.org/search?query=',
-end => "</a> ",
-string => sub {
my $url = &HTML::Entities::encode_entities($_[0]);
return $url . ';mode=all">CPAN: ' . $url;
},
},
\n\n
<!--EDIT|Strat|1152282924-->