Replace obsolete functions/commands

This commit is contained in:
Henrik Lissner 2017-04-17 02:19:20 -04:00
parent ed2e7a65f6
commit e204df3c05
9 changed files with 11 additions and 11 deletions

View file

@ -41,7 +41,7 @@
(set! :company-backend
'(c-mode c++-mode objc-mode)
#'(company-irony-c-headers company-irony))
'(company-irony-c-headers company-irony))
(sp-with-modes '(c-mode c++-mode objc-mode java-mode)
(sp-local-pair "<" ">" :when '(+cc-sp-point-is-template-p +cc-sp-point-after-include-p))

View file

@ -181,7 +181,7 @@ fragments, opening links, or refreshing images."
((eq type 'headline)
(org-remove-latex-fragment-image-overlays)
(org-preview-latex-fragment '(4)))
(org-toggle-latex-fragment '(4)))
((eq type 'babel-call)
(org-babel-lob-execute-maybe))
@ -190,7 +190,7 @@ fragments, opening links, or refreshing images."
(org-babel-execute-src-block))
((memq type '(latex-fragment latex-environment))
(org-preview-latex-fragment))
(org-toggle-latex-fragment))
((eq type 'link)
(let ((path (org-element-property :path (org-element-lineage context '(link) t))))

View file

@ -21,7 +21,8 @@
(goto-char (1+ beg)) (insert "\n")
(unless (string-match ";[\s\t]*}$" (buffer-substring-no-properties beg (1+ end)))
(goto-char end) (insert "\n"))
(replace-regexp ";[\s\t]*" ";\n" nil beg (1+ end))
(while (re-search-forward ";[\s\t]*" (1+ end) t)
(replace-match ";\n" t t))
(setq end (cadr (evil-a-curly)))
(evil-indent beg end)
(delete-trailing-whitespace beg end))