]> granicus.if.org Git - pgbadger/commitdiff
Fix issue #10 where != was replaced by $$CLASSSY0A$$!=$$CLASSSY0B$$ in the output...
authorDarold <gilles@darold.net>
Fri, 22 Jun 2012 22:18:41 +0000 (00:18 +0200)
committerDarold <gilles@darold.net>
Fri, 22 Jun 2012 22:18:41 +0000 (00:18 +0200)
pgbadger

index 49ad4dfba8e9aaad1bf06e2c34ff8a6d78c986e5..78d2fc15d9075748537904a21a0f832b3dedcdea 100755 (executable)
--- a/pgbadger
+++ b/pgbadger
@@ -272,7 +272,7 @@ my @KEYWORDS2 = (
 my @KEYWORDS3 = (
        'STDIN', 'STDOUT'
 );
-my %SYMBOLS = ( '=' => '=', '<' => '&lt;', '>' => '&gt;', '\|' => '|', ',' => ',', '\.' => '.', '\+' => '+', '\-' => '-', '\*' => '*', '\/' => '/', '\!=' => '!=' );
+my %SYMBOLS = ( '=' => '=', '<' => '&lt;', '>' => '&gt;', '\|' => '|', ',' => ',', '\.' => '.', '\+' => '+', '\-' => '-', '\*' => '*', '\/' => '/', '!=' => '!=' );
 my @BRACKETS = ( '(', ')' );
 map { $_ = quotemeta($_) } @BRACKETS;
 
@@ -2307,11 +2307,11 @@ sub highlight_code
        return $code if ($nohighlight);
 
        foreach my $x (keys %SYMBOLS) {
-               $code =~ s/$x/\$\$CLASSSY0A\$\$$SYMBOLS{$x}\$\$CLASSSY0B\$\$/igs;
+               $code =~ s/$x/\$\$CLASSSY0A\$\$$SYMBOLS{$x}\$\$CLASSSY0B\$\$/gs;
        }
        #$code =~ s/("[^"]*")/<span class="st0">$1<\/span>/igs;
-       $code =~ s/('[^']*')/<span class="st0">$1<\/span>/igs;
-       $code =~ s/(`[^`]*`)/<span class="st0">$1<\/span>/igs;
+       $code =~ s/('[^']*')/<span class="st0">$1<\/span>/gs;
+       $code =~ s/(`[^`]*`)/<span class="st0">$1<\/span>/gs;
 
        for (my $x = 0; $x <= $#KEYWORDS1; $x++) {
                #$code =~ s/\b($KEYWORDS1[$x])\b/<span class="kw1">$1<\/span>/igs;
@@ -2328,7 +2328,7 @@ sub highlight_code
        for (my $x = 0; $x <= $#BRACKETS; $x++) {
                $code =~ s/($BRACKETS[$x])/<span class="br0">$1<\/span>/igs;
        }
-       $code =~ s/\$\$CLASSSY0A\$\$([^\$]+)\$\$CLASSSY0B\$\$/<span class="sy0">$1<\/span>/igs;
+       $code =~ s/\$\$CLASSSY0A\$\$([^\$]+)\$\$CLASSSY0B\$\$/<span class="sy0">$1<\/span>/gs;
 
        $code =~ s/\b(\d+)\b/<span class="nu0">$1<\/span>/igs;