X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=ND%2FInclude.pm;h=5df59fc2c110ed5cd5f09718c5a9ba487a8c12e5;hb=ba0d22272efc046f7feaf07ebf190fa9ec6474c7;hp=bec7dd5b1e75bb5f3c053b30843c5e344115e309;hpb=b3ea6d7f8b9879d759da59d8e445e35fabf16f79;p=ndwebbie.git diff --git a/ND/Include.pm b/ND/Include.pm index bec7dd5..5df59fc 100644 --- a/ND/Include.pm +++ b/ND/Include.pm @@ -20,6 +20,7 @@ package ND::Include; use strict; use warnings FATAL => 'all'; +use CGI qw{:standard}; require Exporter; our @ISA = qw/Exporter/; @@ -63,10 +64,11 @@ sub parseMarkup { my ($text) = @_; $text =~ s{\n}{\n
}g; - $text =~ s{\[B\](.*?)\[/B\]}{$1}; + $text =~ s{\[B\](.*?)\[/B\]}{$1}gi; return $text; } + sub min { my ($x,$y) = @_; return ($x > $y ? $y : $x);