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'."
259
259
(" ^\\ (\\\\\\ )end{code}$" 1 " !" ))
260
260
purescript-basic-syntactic-keywords))
261
261
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
-
267
262
(defun purescript-syntactic-face-function (state )
268
263
" `font-lock-syntactic-face-function' for PureScript."
269
264
(cond
@@ -285,10 +280,9 @@ Returns keywords suitable for `font-lock-keywords'."
285
280
; ; https://github.com/purescript/documentation/blob/master/language/Syntax.md
286
281
; ; IOW, given a `-- | foo' line followed by `-- bar' line, the latter is a
287
282
; ; 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]*[|^]" ))
292
286
'font-lock-doc-face )
293
287
(t 'font-lock-comment-face )))
294
288
You can’t perform that action at this time.
0 commit comments