a3e262c7ac
This update may potentially break your usage of add-hook! if you pass the :local or :append properties to it. This is how they used to work: (add-hook! :append 'some-mode-hook #'do-something) Thsoe properties must now follow the hooks, e.g. (add-hook! 'some-mode-hook :append #'do-something) Other changes: - Various add-hook calls have been renamed to add-hook! because I incorrectly assumed `defun` always returned its definition's symbol, when in fact, its return value is "undefined" (so sayeth the documentation). This should fix #1597. - This update adds the ability to add multiple functions to hooks without a list: (add-hook! 'some-mode-hook #'do-something #'do-something-else) - The indentation logic has been changed so that consecutive function symbols at indented at the same level as the first argument, but forms are indent like a defun. (add-hook! 'some-mode-hook #'do-something #'do-something-else) (add-hook! 'some-mode-hook (message "Hello"))
72 lines
2 KiB
EmacsLisp
72 lines
2 KiB
EmacsLisp
;;; lang/web/+css.el -*- lexical-binding: t; -*-
|
|
|
|
;; An improved newline+continue comment function
|
|
(setq-hook! css-mode comment-indent-function #'+css/comment-indent-new-line)
|
|
|
|
(map! :map (css-mode-map scss-mode-map less-css-mode-map)
|
|
:localleader
|
|
"rb" #'+css/toggle-inline-or-block)
|
|
|
|
(after! (:any css-mode sass-mode)
|
|
(set-docsets! '(css-mode scss-mode sass-mode)
|
|
"CSS" "HTML" "Bourbon" "Compass"
|
|
["Sass" (memq major-mode '(scss-mode sass-mode))]))
|
|
|
|
(after! projectile
|
|
(pushnew! projectile-other-file-alist
|
|
'("css" "scss" "sass" "less" "styl")
|
|
'("scss" "css")
|
|
'("sass" "css")
|
|
'("less" "css")
|
|
'("styl" "css")))
|
|
|
|
|
|
;;
|
|
;;; Major modes
|
|
|
|
(add-hook! '(css-mode-hook sass-mode-hook stylus-mode-hook)
|
|
#'rainbow-mode)
|
|
|
|
;; built-in, and contains both css-mode & scss-mode
|
|
(after! css-mode
|
|
;; css-mode hooks apply to scss and less-css modes
|
|
(add-hook 'css-mode-hook #'rainbow-delimiters-mode)
|
|
(set-company-backend! '(css-mode scss-mode)
|
|
(if EMACS26+
|
|
;; css-mode's built in completion is superior in 26+
|
|
'company-capf
|
|
'company-css))
|
|
(map! :map scss-mode-map :localleader "b" #'+css/scss-build))
|
|
|
|
|
|
(after! sass-mode
|
|
(set-company-backend! 'sass-mode 'company-css)
|
|
(map! :map sass-mode-map :localleader "b" #'+css/sass-build))
|
|
|
|
|
|
;;
|
|
;;; Tools
|
|
|
|
(when (featurep! +lsp)
|
|
(add-hook! '(css-mode-hook sass-mode-hook less-css-mode-hook)
|
|
#'lsp!))
|
|
|
|
|
|
(use-package! counsel-css
|
|
:when (featurep! :completion ivy)
|
|
:commands counsel-css
|
|
:hook (css-mode . counsel-css-imenu-setup)
|
|
:init
|
|
(map! :map (css-mode-map scss-mode-map less-css-mode-map)
|
|
:localleader ";" #'counsel-css))
|
|
|
|
|
|
(use-package! helm-css-scss
|
|
:when (featurep! :completion helm)
|
|
:defer t
|
|
:init
|
|
(map! :map (css-mode-map scss-mode-map less-css-mode-map)
|
|
:localleader ";" #'helm-css-scss)
|
|
:config
|
|
(setq helm-css-scss-split-direction #'split-window-vertically
|
|
helm-css-scss-split-with-multiple-windows t))
|