(define-module (gitile code)

  #:use-module (ice-9 match)

  #:use-module (syntax-highlight)

  #:use-module (syntax-highlight css)

  #:use-module (syntax-highlight gitignore)

  #:use-module (syntax-highlight scheme)

                     ("m4" "m4")

                     ("ac" "ac")

                     ("css" "css")

                     (_ (match (basename path)

                         ("bootstrap" "shell")

                         (_ "unknown"))))))

    ("m4" (highlight lex-m4 content))

    ("ac" (highlight lex-autoconf content))

    ("css" (highlight lex-css content))

    (_ (list content))))

(define (split-lines content)