File tree Expand file tree Collapse file tree 1 file changed +3
-9
lines changed Expand file tree Collapse file tree 1 file changed +3
-9
lines changed Original file line number Diff line number Diff line change @@ -259,11 +259,6 @@ Returns keywords suitable for `font-lock-keywords'."
259259 (" ^\\ (\\\\\\ )end{code}$" 1 " !" ))
260260 purescript-basic-syntactic-keywords))
261261
262- (defcustom purescript-font-lock-docstrings (boundp 'font-lock-doc-face )
263- " If non-nil try to highlight docstring comments specially."
264- :type 'boolean
265- :group 'purescript )
266-
267262(defun purescript-syntactic-face-function (state )
268263 " `font-lock-syntactic-face-function' for PureScript."
269264 (cond
@@ -285,10 +280,9 @@ Returns keywords suitable for `font-lock-keywords'."
285280 ; ; https://github.com/purescript/documentation/blob/master/language/Syntax.md
286281 ; ; IOW, given a `-- | foo' line followed by `-- bar' line, the latter is a
287282 ; ; plain comment.
288- ((and purescript-font-lock-docstrings
289- (save-excursion
290- (goto-char (nth 8 state))
291- (looking-at " \\ (--\\ |{-\\ )[ \\ t]*[|^]" )))
283+ ((save-excursion
284+ (goto-char (nth 8 state))
285+ (looking-at " \\ (--\\ |{-\\ )[ \\ t]*[|^]" ))
292286 'font-lock-doc-face )
293287 (t 'font-lock-comment-face )))
294288
You can’t perform that action at this time.
0 commit comments