atuleu/home
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Updates for graphic emacs

Browse Source
This commit is contained in:
Alexandre Tuleu
2022-09-28 09:07:04 +02:00
parent 8e283022e6
commit 84e40828a5
1 changed files with 25 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

38
.emacs
View File

@@ -13,7 +13,6 @@
(other . "gnu"))) (other . "gnu")))
'(company-idle-delay 20.0) '(company-idle-delay 20.0)
'(compilation-scroll-output 'first-error) '(compilation-scroll-output 'first-error)
'(display-line-numbers-type t)
'(elpy-formatter 'black) '(elpy-formatter 'black)
'(elpy-test-runner 'elpy-test-pytest-runner) '(elpy-test-runner 'elpy-test-pytest-runner)
'(global-auto-revert-mode t) '(global-auto-revert-mode t)
@@ -31,19 +30,23 @@
'((vc-follow-symlinks . t) '((vc-follow-symlinks . t)
(TeX-master . t) (TeX-master . t)
(TeX-parse-self . t))) (TeX-parse-self . t)))
'(srefactor--getter-prefix "Get")
'(srefactor--getter-setter-capitalize-p t)
'(srefactor--setter-prefix "Set")
'(tab-width 4) '(tab-width 4)
'(whitespace-style '(whitespace-style
'(face trailing tabs lines-tail newline space-before-tab::tab space-before-tab::space space-before-tab tab-mark))) '(face trailing tabs lines-tail newline space-before-tab::tab space-before-tab::space space-before-tab tab-mark)))
(if (display-graphic-p)
(if (fboundp 'toggle-scroll-bar) (progn
(toggle-scroll-bar -1)) (if (fboundp 'tool-bar-mode)
(menu-bar-mode -1) (tool-bar-mode -1))
(if (fboundp 'tool-bar-mode) )
(tool-bar-mode -1)) (progn
(if (fboundp 'toggle-scroll-bar)
(toggle-scroll-bar -1))
(menu-bar-mode -1)
(if (fboundp 'tool-bar-mode)
(tool-bar-mode -1))
)
)
(add-to-list 'default-frame-alist '(fullscreen . maximized)) (add-to-list 'default-frame-alist '(fullscreen . maximized))
(add-hook 'before-save-hook 'delete-trailing-whitespace) (add-hook 'before-save-hook 'delete-trailing-whitespace)
@@ -178,11 +181,20 @@
:bind ( "C-c C-f" . ff-find-other-file) :bind ( "C-c C-f" . ff-find-other-file)
) )
(use-package flycheck)
(use-package lsp-mode (use-package lsp-mode
:config :config
(yas-minor-mode) (yas-minor-mode)
(global-set-key (kbd "C-c C-n") 'flymake-goto-next-error) (global-set-key (kbd "C-c C-n") 'flycheck-next-error)
:bind ("C-c C-d" . lsp-ui-doc-show) (if (display-graphic-p)
(setq lsp-ui-doc-use-webkit t)
)
(custom-set-faces
'(lsp-ui-doc-background ((t (:background "#373B41")))))
:bind (
("C-c C-d" . lsp-ui-doc-toggle)
)
:init :init
;; set prefix for lsp-command-keymap (few alternatives - "C-l", "C-c l") ;; set prefix for lsp-command-keymap (few alternatives - "C-l", "C-c l")
@@ -415,8 +427,8 @@
;; If you edit it by hand, you could mess it up, so be careful. ;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance. ;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right. ;; If there is more than one, they won't work right.
'(default ((t (:family "UbuntuMono Nerd Font" :foundry "DAMA" :slant normal :weight normal :height 113 :width normal))))
) )
;; Local Variables: ;; Local Variables:
;; vc-follow-symlinks: t ;; vc-follow-symlinks: t
;; End: ;; End: