add pygment lexer info

This commit is contained in:
MMesch 2018-07-14 11:06:07 +02:00
parent c10f3e085b
commit d57a6ca572
3 changed files with 3 additions and 0 deletions

View File

@ -20,6 +20,7 @@ instance ToJSON LanguageInfo where
, "version" .= languageVersion info
, "file_extension" .= languageFileExtension info
, "codemirror_mode" .= languageCodeMirrorMode info
, "pygments_lexer" .= languagePygmentsLexer info
]
-- Convert message bodies into JSON.

View File

@ -276,6 +276,7 @@ data LanguageInfo =
, languageVersion :: String -- ^ GHC 7.6.3
, languageFileExtension :: String -- ^ .hs
, languageCodeMirrorMode :: String -- ^ 'ihaskell'. can be 'null'
, languagePygmentsLexer :: String
}
deriving (Show, Eq)

View File

@ -274,6 +274,7 @@ replyTo interface KernelInfoRequest{} replyHeader state = do
, languageVersion = VERSION_ghc
, languageFileExtension = ".hs"
, languageCodeMirrorMode = "ihaskell"
, languagePygmentsLexer = "Haskell"
}
, status = Ok
})