Highlight XML files

Julien LepillerSat Nov 13 00:05:56+0100 2021

114a82e

Highlight XML files

gitile/code.scm

2323
  #:use-module (syntax-highlight css)
2424
  #:use-module (syntax-highlight gitignore)
2525
  #:use-module (syntax-highlight scheme)
26+
  #:use-module (syntax-highlight xml)
2627
  #:use-module (gitile highlight shell)
2728
  #:export (display-code
2829
            display-formatted-code))

3839
                     ("ac" "ac")
3940
                     ("css" "css")
4041
                     ((or "c" "h") "c")
42+
                     ("xml" "xml")
4143
                     (_ (match (basename path)
4244
                         ("bootstrap" "shell")
4345
                         (_ "unknown"))))))

5658
    ("ac" (highlight lex-autoconf content))
5759
    ("css" (highlight lex-css content))
5860
    ("c" (highlight lex-c content))
61+
    ("xml" (highlight lex-xml content))
5962
    (_ (list content))))
6063
6164
(define (split-lines content)