1351 |
comment-start-skip)) |
comment-start-skip)) |
1352 |
(put-text-property beg (match-end 0) 'face |
(put-text-property beg (match-end 0) 'face |
1353 |
font-lock-comment-delimiter-face))) |
font-lock-comment-delimiter-face))) |
1354 |
(if (looking-back comment-end-regexp (point-at-bol)) |
(if (looking-back comment-end-regexp (point-at-bol) t) |
1355 |
(put-text-property (match-beginning 0) (point) 'face |
(put-text-property (match-beginning 0) (point) 'face |
1356 |
font-lock-comment-delimiter-face)))) |
font-lock-comment-delimiter-face)))) |
1357 |
(< (point) end)) |
(< (point) end)) |