emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

feat(latex): allow fill-paragraph in description

Browse source 
Ref: #1849
This commit is contained in:
Vu Quoc Huy 2024-01-24 18:06:35 +01:00 • committed by GitHub
parent 03d692f129
commit 19482ee582
No known key found for this signature in database
GPG key ID: B5690EEEBB952194
1 changed files with 7 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

12
modules/lang/latex/config.el
View file

@ -182,19 +182,21 @@ Math faces should stay fixed by the mixed-pitch blacklist, this is mostly for
(dolist (env '("itemize" "enumerate" "description")) (dolist (env '("itemize" "enumerate" "description"))
(add-to-list 'LaTeX-indent-environment-list `(,env +latex-indent-item-fn))) (add-to-list 'LaTeX-indent-environment-list `(,env +latex-indent-item-fn)))
;; Fix #1849: allow fill-paragraph in itemize/enumerate. ;; Fix #1849: allow fill-paragraph in itemize/enumerate/description.
(defadvice! +latex--re-indent-itemize-and-enumerate-a (fn &rest args) (defadvice! +latex--re-indent-itemize-and-enumerate-and-description-a (fn &rest args)
:around #'LaTeX-fill-region-as-para-do :around #'LaTeX-fill-region-as-para-do
(let ((LaTeX-indent-environment-list (let ((LaTeX-indent-environment-list
(append LaTeX-indent-environment-list (append LaTeX-indent-environment-list
'(("itemize" +latex-indent-item-fn) '(("itemize" +latex-indent-item-fn)
("enumerate" +latex-indent-item-fn))))) ("enumerate" +latex-indent-item-fn)
("description" +latex-indent-item-fn)))))
(apply fn args))) (apply fn args)))
(defadvice! +latex--dont-indent-itemize-and-enumerate-a (fn &rest args) (defadvice! +latex--dont-indent-itemize-and-enumerate-and-description-a (fn &rest args)
:around #'LaTeX-fill-region-as-paragraph :around #'LaTeX-fill-region-as-paragraph
(let ((LaTeX-indent-environment-list LaTeX-indent-environment-list)) (let ((LaTeX-indent-environment-list LaTeX-indent-environment-list))
(delq! "itemize" LaTeX-indent-environment-list 'assoc) (delq! "itemize" LaTeX-indent-environment-list 'assoc)
(delq! "enumerate" LaTeX-indent-environment-list 'assoc) (delq! "enumerate" LaTeX-indent-environment-list 'assoc)
(delq! "description" LaTeX-indent-environment-list 'assoc)
(apply fn args)))) (apply fn args))))