Commit d5d9ce91 authored by Richard M. Stallman's avatar Richard M. Stallman

(font-lock-fontify-region): Handle comment-start-skip = nil.

parent af50f9e5
......@@ -166,7 +166,10 @@ slow things down!")
;; Find each interesting place between here and END.
(while (and (< (point) end)
(setq prev (point) prevstate state)
(re-search-forward (concat "\\s\"\\|" comment-start-skip) end t)
(re-search-forward (if comment-start-skip
(concat "\\s\"\\|" comment-start-skip)
"\\s\"")
end t)
;; Clear out the fonts of what we skip over.
(progn (remove-text-properties prev (point) '(face nil)) t)
;; Verify the state at that place
......
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