diff options
| author | Simen Heggestøyl <simenheg@gmail.com> | 2018-05-29 19:14:34 +0200 |
|---|---|---|
| committer | Simen Heggestøyl <simenheg@gmail.com> | 2018-05-29 21:24:26 +0200 |
| commit | 58d0642e1ca006fa550bff50fd328bc166c572da (patch) | |
| tree | a963419d50eac188e629bba7cbb68fcd833a2290 /test/lisp/textmodes/css-mode-tests.el | |
| parent | 5be83e343f9f0f3487793b54ff95bc89ee6b824a (diff) | |
| download | emacs-58d0642e1ca006fa550bff50fd328bc166c572da.tar.gz | |
Add Imenu support to CSS mode and its derivatives
* lisp/textmodes/css-mode.el (css--join-nested-selectors)
(css--prev-index-position, css--extract-index-name): New helper
functions for supporting Imenu.
(css-mode): Set `imenu-space-replacement',
`imenu-prev-index-position-function', and
`imenu-extract-index-name-function'.
(css-current-defun-name): Reuse `css--prev-index-position' and
`css--extract-index-name' to support nested selectors.
* test/lisp/textmodes/css-mode-tests.el (css-test-current-defun-name):
Fix character index.
(css-test-join-nested-selectors): New tests for
`css--join-nested-selectors'.
* etc/NEWS: Add news entry.
Diffstat (limited to 'test/lisp/textmodes/css-mode-tests.el')
| -rw-r--r-- | test/lisp/textmodes/css-mode-tests.el | 15 |
1 files changed, 14 insertions, 1 deletions
diff --git a/test/lisp/textmodes/css-mode-tests.el b/test/lisp/textmodes/css-mode-tests.el index b0283bfa455..bfae1bf2f75 100644 --- a/test/lisp/textmodes/css-mode-tests.el +++ b/test/lisp/textmodes/css-mode-tests.el @@ -85,7 +85,7 @@ (insert "body { top: 0; }") (goto-char 7) (should (equal (css-current-defun-name) "body")) - (goto-char 18) + (goto-char 15) (should (equal (css-current-defun-name) "body")))) (ert-deftest css-test-current-defun-name-nested () @@ -324,6 +324,19 @@ (css-cycle-color-format) (should (equal (buffer-string) "black")))) +(ert-deftest css-test-join-nested-selectors () + (should (equal (css--join-nested-selectors '("div" "&:hover")) + "div:hover")) + (should + (equal (css--join-nested-selectors '("a" "&::before, &::after")) + "a::before, a::after")) + (should + (equal (css--join-nested-selectors + '("article" "& > .front-page" "& h1, & h2")) + "article > .front-page h1, article > .front-page h2")) + (should (equal (css--join-nested-selectors '(".link" "& + &")) + ".link + .link"))) + (ert-deftest css-mdn-symbol-guessing () (dolist (item '(("@med" "ia" "@media") ("@keyframes " "{" "@keyframes") |