Commit d57a6ca5 authored by MMesch's avatar MMesch

add pygment lexer info

parent c10f3e08
...@@ -20,6 +20,7 @@ instance ToJSON LanguageInfo where ...@@ -20,6 +20,7 @@ instance ToJSON LanguageInfo where
, "version" .= languageVersion info , "version" .= languageVersion info
, "file_extension" .= languageFileExtension info , "file_extension" .= languageFileExtension info
, "codemirror_mode" .= languageCodeMirrorMode info , "codemirror_mode" .= languageCodeMirrorMode info
, "pygments_lexer" .= languagePygmentsLexer info
] ]
-- Convert message bodies into JSON. -- Convert message bodies into JSON.
......
...@@ -276,6 +276,7 @@ data LanguageInfo = ...@@ -276,6 +276,7 @@ data LanguageInfo =
, languageVersion :: String -- ^ GHC 7.6.3 , languageVersion :: String -- ^ GHC 7.6.3
, languageFileExtension :: String -- ^ .hs , languageFileExtension :: String -- ^ .hs
, languageCodeMirrorMode :: String -- ^ 'ihaskell'. can be 'null' , languageCodeMirrorMode :: String -- ^ 'ihaskell'. can be 'null'
, languagePygmentsLexer :: String
} }
deriving (Show, Eq) deriving (Show, Eq)
......
...@@ -274,6 +274,7 @@ replyTo interface KernelInfoRequest{} replyHeader state = do ...@@ -274,6 +274,7 @@ replyTo interface KernelInfoRequest{} replyHeader state = do
, languageVersion = VERSION_ghc , languageVersion = VERSION_ghc
, languageFileExtension = ".hs" , languageFileExtension = ".hs"
, languageCodeMirrorMode = "ihaskell" , languageCodeMirrorMode = "ihaskell"
, languagePygmentsLexer = "Haskell"
} }
, status = Ok , status = Ok
}) })
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment