File tree Expand file tree Collapse file tree 1 file changed +7
-8
lines changed Expand file tree Collapse file tree 1 file changed +7
-8
lines changed Original file line number Diff line number Diff line change @@ -217,14 +217,12 @@ is used to limit the scan."
217
217
(defun elixir-syntax-stringify ()
218
218
" Put `syntax-table' property correctly on single/triple quotes."
219
219
(let* ((num-quotes (length (match-string-no-properties 1 )))
220
- (ppss (prog2
221
- (backward-char num-quotes)
222
- (syntax-ppss )
223
- (forward-char num-quotes)))
224
- (string-start (and (not (elixir-ppss-comment-depth ppss))
225
- (elixir-ppss-comment-or-string-start ppss)))
226
220
(quote-starting-pos (- (point ) num-quotes))
227
221
(quote-ending-pos (point ))
222
+ (ppss (save-excursion
223
+ (syntax-ppss quote-starting-pos)))
224
+ (string-start (and (not (elixir-ppss-comment-depth ppss))
225
+ (elixir-ppss-comment-or-string-start ppss)))
228
226
(num-closing-quotes
229
227
(and string-start
230
228
(elixir-syntax-count-quotes
@@ -528,8 +526,9 @@ just return nil."
528
526
(when pos
529
527
(save-excursion
530
528
(goto-char pos)
531
- (and (looking-at " \"\"\" " )(looking-back (rx " @" (or " moduledoc" " typedoc" " doc" ) (+ space))
532
- (line-beginning-position )))))))
529
+ (and (looking-at " \"\"\" " )
530
+ (looking-back (rx " @" (or " moduledoc" " typedoc" " doc" ) (+ space))
531
+ (line-beginning-position )))))))
533
532
534
533
(defun elixir-font-lock-syntactic-face-function (state )
535
534
(if (elixir-ppss-string-terminator state)
You can’t perform that action at this time.
0 commit comments