Mudanças de aparência, tema e do elegance.el

This commit is contained in:
aabm 2020-08-22 13:00:17 -03:00
parent e4a4a0a18e
commit 6ed410e257
2 changed files with 144 additions and 107 deletions

3
.gitignore vendored
View File

@ -4,3 +4,6 @@
/auto-save-list/
/transient/
/bookmarks
/places
/referencia.org
/tutorial/

View File

@ -155,10 +155,24 @@ usuário; Coisas como números de linha, realce de sintaxe, etc.
Estas são configurações básicas relacionadas à interface gráfica.
#+begin_src emacs-lisp
;;; Desabilitar tela de início padrão
;; Desabilitar tela e mensagem de início padrão
(setq inhibit-startup-message t)
(setq inhibit-startup-echo-area-message t)
;; Exibir números de linha e coluna na modeline (barra de status)
;; Desabilitar mensagem do scratch buffer
(setq initial-scratch-message nil)
;; org-mode como modo padrão do scratch buffer
(setq initial-major-mode 'org-mode)
;; Remover janelas pop-up
(setq pop-up-windows nil)
;; Melhores nomes para buffers de arquivos com mesmos nomes
(require 'uniquify)
(setq uniquify-buffer-name-style 'forward)
;; Exibir números de linha e coluna na modeline
(line-number-mode t)
(column-number-mode t)
#+end_src
@ -321,7 +335,7 @@ e fazer decisões sobre quais versões manter ao final.
#+begin_src emacs-lisp
;; Diretório padrão org.
(setq org-directory "~/Documentos/org/")
(setq org-directory "~/docs/org/")
;; Impedir tarefa de ser marcada como feita se ainda tiver
;; dependências incompletas.
@ -400,8 +414,8 @@ usando o org-roam-server, facilitando sua navegação.
(org-roam-mode)
(require 'org-roam-protocol)
:custom
(org-roam-directory "~/Documentos/roam/")
(org-roam-index-file "~/Documentos/roam/index.org")
(org-roam-directory "~/docs/roam/")
(org-roam-index-file "~/docs/roam/index.org")
(org-roam-completion-system 'ivy)
(org-roam-graph-executable "/usr/bin/neato")
(org-roam-graph-extra-config '(("overlap" . "false")))
@ -431,7 +445,7 @@ usando o org-roam-server, facilitando sua navegação.
(deft-recursive t)
(deft-use-filter-string-for-filename t)
(deft-default-extension "org")
(deft-directory "~/Documentos/roam/"))
(deft-directory "~/docs/roam/"))
;; Templates for creating new notes
(setq org-roam-capture-templates
@ -533,107 +547,12 @@ no formato BibTeX, usando o Ivy.
:bind*
("C-x C-r" . ivy-bibtex)
:custom
(bibtex-completion-bibliography "~/Documentos/tex/refs.bib")
(bibtex-completion-bibliography "~/docs/tex/refs.bib")
;; default is to open pdf - change that to insert citation
(ivy-bibtex-default-action #'ivy-bibtex-insert-citation))
(defalias 'helm-bibtex 'ivy-bibtex)
#+end_src
* Pacotes cosméticos
** Beacon
O beacon é um pacote bem simples. Ele simplesmente faz seu cursor piscar
levemente quando você muda pra outra janela ou buffer ou faz um
movimento grande, tornando mais fácil localizar o cursor depois de se mover.
#+begin_src emacs-lisp
(use-package beacon
:ensure t
:init
(beacon-mode))
#+end_src
** Dashboard
O dashboard é o pacote utilizado pelo Emacs Humanities para criar a
tela de início customizada que você vê quando abre o Emacs. Aqui estão
todas as configurações dele, sinta-se livre para alterá-las como quiser.
Uma modificação simples seria mudar a logo exibida no Dashboard alterando
o valor da variável dashboard-startup-banner.
#+begin_src emacs-lisp
(use-package all-the-icons
:ensure t
:defer nil)
(use-package dashboard
:ensure t
:defer nil
:config
(dashboard-setup-startup-hook)
:custom
(dashboard-set-heading-icons t)
(dashboard-set-file-icons t)
(dashboard-items
'((bookmarks . 5)
(recents . 5)
(agenda . 10)))
(dashboard-banner-logo-title "Bem-vindo ao Emacs Humanities!")
(dashboard-startup-banner 'official)
(dashboard-center-content t)
(dashboard-show-shortcuts t)
(dashboard-set-init-info t)
(dashboard-set-footer nil)
(dashboard-set-navigator t)
(dashboard-navigator-buttons
`(;; line1
((,nil
"Sobre"
"Abrir a documentação local do Emacs Humanities"
(lambda (&rest _) (find-file "~/.emacs.d/README.org"))
'default)
(nil
"Página"
"Abra a página do git desta configuração"
(lambda (&rest _) (browse-url "https://git.snopyta.org/aabm/emacs-humanities"))
'default)
)
;; segunda linha
((,nil
"Configuração"
"Abrir o arquivo de configuração"
(lambda (&rest _) (find-file "~/.emacs.d/config.org"))
'default)
))))
(setq initial-buffer-choice (lambda () (get-buffer "*dashboard*")))
#+end_src
** Doom modeline
A Doom Modeline é a barra de status customizada na parte inferior da
sua tela. Aqui estão todas as configurações que usamos para ela.
#+begin_src emacs-lisp
(use-package doom-modeline
:ensure t
:init
(doom-modeline-mode)
:custom
(doom-modeline-height 25)
(doom-modeline-bar-width 5)
(doom-modeline-project-detection 'project)
(doom-modeline-icon (display-graphic-p))
(doom-modeline-major-mode-icon t)
(doom-modeline-major-mode-color-icon t)
(doom-modeline-buffer-state-icon t)
(doom-modeline-buffer-modification-icon nil)
(doom-modeline-minor-modes nil)
(doom-modeline-enable-word-count t)
(doom-modeline-buffer-encoding nil)
(doom-modeline-persp-name nil))
#+end_src
* Funções customizadas
** Atualizar o Emacs Humanities
#+begin_src emacs-lisp
@ -761,7 +680,122 @@ sua tela. Aqui estão todas as configurações que usamos para ela.
)
#+end_src
* Tema
* Tema e aparência
** Beacon
O beacon é um pacote bem simples. Ele simplesmente faz seu cursor piscar
levemente quando você muda pra outra janela ou buffer ou faz um
movimento grande, tornando mais fácil localizar o cursor depois de se mover.
#+begin_src emacs-lisp
(use-package beacon
:ensure t
:init
(beacon-mode))
#+end_src
** Dashboard
O dashboard é o pacote utilizado pelo Emacs Humanities para criar a
tela de início customizada que você vê quando abre o Emacs. Aqui estão
todas as configurações dele, sinta-se livre para alterá-las como quiser.
Uma modificação simples seria mudar a logo exibida no Dashboard alterando
o valor da variável dashboard-startup-banner.
#+begin_src emacs-lisp
(use-package all-the-icons
:ensure t
:defer nil)
(use-package dashboard
:ensure t
:defer nil
:config
(dashboard-setup-startup-hook)
;; (defun dashboard-emacs-humanities (list-size)
;; (insert
;; "texto do item customizado vai aqui"))
;; (add-to-list 'dashboard-item-generators '(custom . dashboard-emacs-humanities))
;; (add-to-list 'dashboard-items '(custom) t)
:custom
(dashboard-set-heading-icons t)
(dashboard-set-file-icons t)
(dashboard-items
'((recents . 5)
(agenda . 10)))
(dashboard-banner-logo-title "Bem-vindo ao Emacs Humanities!")
(dashboard-startup-banner 'official)
(dashboard-center-content t)
(dashboard-show-shortcuts t)
(dashboard-set-init-info nil)
(dashboard-set-footer nil)
(dashboard-set-navigator t)
(dashboard-navigator-buttons
`(;; line1
((,nil
"Sobre"
"Abrir a documentação local do Emacs Humanities"
(lambda (&rest _) (find-file "~/.emacs.d/README.org"))
'default)
(nil
"Página"
"Abra a página do git desta configuração"
(lambda (&rest _) (browse-url "https://git.snopyta.org/aabm/emacs-humanities"))
'default)
)
;; segunda linha
((,nil
"Configuração"
"Abrir o arquivo de configuração"
(lambda (&rest _) (find-file "~/.emacs.d/config.org"))
'default)
(nil
"Referência"
"Abrir a referência rápida do Emacs Humanities"
(lambda (&rest _) (find-file "~/.emacs.d/referencia.org"))
'default)
))))
(setq initial-buffer-choice (lambda () (get-buffer "*dashboard*")))
#+end_src
** Doom modeline
A Doom Modeline é a barra de status customizada na parte inferior da
sua tela. Aqui estão todas as configurações que usamos para ela.
#+begin_src emacs-lisp
(use-package doom-modeline
:ensure t
:init
(doom-modeline-mode)
:custom
(doom-modeline-height 25)
(doom-modeline-bar-width 5)
(doom-modeline-project-detection 'project)
(doom-modeline-icon (display-graphic-p))
(doom-modeline-major-mode-icon t)
(doom-modeline-major-mode-color-icon t)
(doom-modeline-buffer-state-icon t)
(doom-modeline-buffer-modification-icon nil)
(doom-modeline-minor-modes nil)
(doom-modeline-enable-word-count t)
(doom-modeline-buffer-encoding nil)
(doom-modeline-persp-name nil))
#+end_src
** Elegance
Seção ainda em fase de testes e modificações.
#+begin_src emacs-lisp
;; (when (file-readable-p (concat user-emacs-directory "elegance.el"))
;; (load-file (concat user-emacs-directory "elegance.el")))
;; (when (file-readable-p (concat user-emacs-directory "Welcome.org"))
;; (find-file-read-only (concat user-emacs-directory "Welcome.org")))
#+end_src
** Instalar e selecionar tema
Aqui instalamos o pacote de temas de cores do Doom Emacs, outra configuração
@ -779,10 +813,9 @@ depois reinicie o Emacs.
:config
(setq doom-themes-enable-bold t
doom-themes-enable-italic t)
(setq doom-gruvbox-dark-variant "hard")
(doom-themes-org-config))
(load-theme 'adwaita t)
(load-theme 'doom-solarized-light t)
#+end_src
** Opções do frame
@ -802,7 +835,8 @@ fontes monospace: Iosevka, Inconsolata, Roboto Mono e Terminus.
(add-to-list 'default-frame-alist '(height . 35))
;; Fontes.
(set-frame-font "Source Code Pro 11" nil t)
(add-to-list 'default-frame-alist '(font . "Source Code Pro 11"))
(set-frame-font "Source Code Pro 13" nil t)
(add-to-list 'default-frame-alist '(font . "Source Code Pro 13"))
#+end_src