[PATCH] gitweb.perl: fix %highlight_ext mappings
- From
- rh <richard_hubbe11@lavabit.com>
- Date
- Nov 4, 2012, 17:45 UTC
- Message-ID
- <20121104094555.a46992b6d836c1e09524d2cc@lavabit.com>
The previous change created a dictionary of one-to-one elements when the intent was to map mutliple related types to one main type. e.g. bash, ksh, zsh, sh all map to sh since they share similar syntax This makes the mapping as the original change intended.
Signed-off-by: Richard Hubbell <richard_hubbe11@lavabit.com> --- gitweb.cgi | 18 +++++++++--------- 1 file changed, 9 insertions(+), 9 deletions(-)
diff --git a/gitweb.cgi.orig b/gitweb.cgi index 060db27..155b238 100755 --- a/gitweb.cgi.orig +++ b/gitweb.cgi @@ -246,19 +246,19 @@ our %highlight_basename = ( 'Makefile' => 'make', ); # match by extension + our %highlight_ext = ( # main extensions, defining name of syntax; # see files in /usr/share/highlight/langDefs/ directory - map { $_ => $_ } - qw(py c cpp rb java css php sh pl js tex bib xml awk bat ini spec tcl sql make), + (map { $_ => $_ } qw(py rb java css js tex bib xml awk bat ini spec tcl sql)), # alternate extensions, see /etc/highlight/filetypes.conf - 'h' => 'c', - map { $_ => 'sh' } qw(bash zsh ksh), - map { $_ => 'cpp' } qw(cxx c++ cc), - map { $_ => 'php' } qw(php3 php4 php5 phps), - map { $_ => 'pl' } qw(perl pm), # perhaps also 'cgi' - map { $_ => 'make'} qw(mak mk), - map { $_ => 'xml' } qw(xhtml html htm), + (map { $_ => 'c' } qw(c h)), + (map { $_ => 'sh' } qw(sh bash zsh ksh)), + (map { $_ => 'cpp' } qw(cpp cxx c++ cc)), + (map { $_ => 'php' } qw(php php3 php4 php5 phps)), + (map { $_ => 'pl' } qw(pl perl pm)), # perhaps also 'cgi' + (map { $_ => 'make'} qw(make mak mk)), + (map { $_ => 'xml' } qw(xml xhtml html htm)), ); # You define site-wide feature defaults here; override them with