replace all special tags in a line

iloveponies · May 18, 2014 · 96bc77f · 96bc77f
1 parent 744813e
commit 96bc77f
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/filter.pl b/filter.pl
@@ -23,7 +23,7 @@ BEGIN
     my $class = $tags{$tag};
     my $title = $titles{$tag};
 
-    if (/<$tag>/) {
+    while (/<$tag>/) {
         my $count = ($counts{$tag} ||= 1)++;
 
         $title =~ s/%n/$count/;
@@ -33,5 +33,5 @@ BEGIN
         s#<$tag>#$replacement#;
     }
 
-    s#</$tag>#\n</section>#;
+    s#</$tag>#</section>#g;
 }