unificando outros repos

This commit is contained in:
Saci Pererê 2020-11-30 18:17:12 -03:00
commit 81875d2f77
14 changed files with 546 additions and 0 deletions

61
emacs/emacs.d/init.el Normal file
View File

@ -0,0 +1,61 @@
;; Emacs initialization file
;;;; Package Initialization
(require 'package)
(add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/"))
(package-initialize)
(eval-when-compile
(require 'use-package))
(add-to-list 'load-path "~/.emacs.d/mpackages/")
(use-package pack-tools)
(use-package pack-appareance)
(use-package pack-keybindings)
(use-package pack-tweaks)
(use-package pack-org)
(use-package pack-projectile)
(use-package pack-py)
(add-to-list 'auto-mode-alist '("\\.epub\\'" . nov-mode))
;;; Org-calDav integration
;(setq org-caldav-url "https://cloud.disroot.org/remote.php/dav/calendars/saci")
;(setq org-caldav-calendar-id "sync_emacs")
;(setq org-caldav-inbox "/home/saci/Documentos/org/disroot.org")
;(setq org-caldav-files '("/home/saci/Documentos/org/pessoal.org"
; "/home/saci/Documentos/org/ec.org"
; "/home/saci/Documentos/org/radio.org"
; "/home/saci/Documentos/org/orcamento_arretado.org))
;(setq org-icalendar-timezone "UTC")
;(setq org-icalendar-include-todo t)
;;; SETs
(custom-set-variables
;; custom-set-variables was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
'(blink-cursor-mode nil)
'(column-number-mode t)
'(custom-safe-themes
'("ca849ae0c889eb918785cdc75452b1e11a00848a5128a95a23872e0119ccc8f4" "fa3bdd59ea708164e7821574822ab82a3c51e262d419df941f26d64d015c90ee" "2f5034120826e047160aca97575c21e692e7ec7ec23c53d9832006fbeb7a91d8" "4daff0f7fb02c7a4d5766a6a3e0931474e7c4fd7da58687899485837d6943b78" "229c5cf9c9bd4012be621d271320036c69a14758f70e60385e87880b46d60780" "5a45c8bf60607dfa077b3e23edfb8df0f37c4759356682adf7ab762ba6b10600" "bdb4509c123230a059d89fc837c40defdecee8279c741b7f060196b343b2d18d" "ed17fef69db375ae1ced71fdc12e543448827aac5eb7166d2fd05f4c95a7be71" default))
'(menu-bar-mode nil)
'(org-agenda-files '("/home/saci/org/"))
'(package-install-selected-packages
'(elpy hide-mode-line org-caldav company powerline-evil centaur-tabs auctex evil org-bullets doom-themes doom-modeline all-the-icons dumb-jump dashboard magit use-package powerline neotree multiple-cursors))
'(package-selected-packages
'(jedi projectile nofrils-acme-theme ein nov pdf-tools helm-bibtex markdown-mode elpy use-package powerline-evil org-caldav org-bullets neotree multiple-cursors magit hide-mode-line dumb-jump doom-themes doom-modeline dashboard company centaur-tabs auctex))
'(scroll-bar-mode nil)
'(show-paren-mode t)
'(tool-bar-mode nil))
(custom-set-faces
;; custom-set-faces was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
)

59
emacs/emacs.d/minimal.el Normal file
View File

@ -0,0 +1,59 @@
;;; This is a minimal emacs configuration that I use with
;;; `emacs -nw -Q --load minimal.el' when I want to quickly edit something in
;;; the terminal without having to load all my configs, but still want some
;;; keybindings and stuff
(custom-set-variables
'(custom-enabled-themes (quote (wombat)))
'(blink-cursor-mode nil)
'(scroll-bar-mode nil)
'(show-paren-mode t)
'(tool-bar-mode nil))
(set-face-attribute 'default nil
:height 105)
;; disable backup
(setq backup-inhibited t)
;; disable auto save
(setq auto-save-default nil)
;; scrolling line by line
(setq scroll-conservatively 1)
;; no startup
(setq inhibit-startup-screen t)
;; dired wont open a buffer for each directory
(require 'dired)
(put 'dired-find-alternate-file 'disabled nil)
(define-key dired-mode-map (kbd "RET") 'dired-find-alternate-file)
;; default coding style
(setq c-default-style "k&r"
c-basic-offset 4)
;; highlight trailing and tabs that are not spaces
(setq whitespace-style '(face tabs tab-mark lines-tail trailing))
(setq whitespace-display-mappings '((tab-mark 9 [126 9])))
(global-whitespace-mode)
;; moving arround
(defun move-line-up () "Move up the current line" (interactive)
(transpose-lines 1) (forward-line -2) (indent-according-to-mode))
(defun move-line-down () "Move down the current line" (interactive)
(forward-line 1) (transpose-lines 1) (forward-line -1)
(indent-according-to-mode))
(global-set-key [(meta up)] 'move-line-up)
(global-set-key [(meta down)] 'move-line-down)
(global-set-key (kbd "<s-up>") 'windmove-up)
(global-set-key (kbd "<s-down>") 'windmove-down)
(global-set-key (kbd "<s-left>") 'windmove-left)
(global-set-key (kbd "<s-right>") 'windmove-right)
(global-set-key (kbd "<C-s-right>") 'next-buffer)
(global-set-key (kbd "<C-s-left>") 'previous-buffer)

Binary file not shown.

View File

@ -0,0 +1,25 @@
* Packages
The packages I use come mainly from Guix. When it is not available there I use
it from Melpa.
** Guix Packages
+ emacs-all-the-icons
+ emacs-htmlize
+ emacs-markdown-mode
+ emacs-magit
+ emacs-neotree
+ emacs-org
+ emacs-origami-el
+ emacs-dashboard
+ emacs-company
+ emacs-use-package
+ emacs-dumb-jump
+ emacs-ag
+ the-silver-searcher
** Melpa
+ doom-themes
+ doom-modeline
+ org-bullets
+ evil
+ auctex

View File

@ -0,0 +1,64 @@
;;; Appareance package'
;; is this the best way to do this?
(custom-set-variables
'(blink-cursor-mode nil)
'(column-number-mode t)
'(menu-bar-mode nil)
'(scroll-bar-mode nil)
'(show-paren-mode t)
'(tool-bar-mode nil)
)
(set-face-attribute 'default nil
:family "Source Code Pro"
:foundry "ADBO"
:height 112
:slant 'normal
:weight 'normal
:width 'normal)
(use-package all-the-icons)
(use-package doom-modeline
:config
(doom-modeline-mode 1))
(use-package doom-themes
:config
(load-theme 'doom-dracula t)
(doom-themes-org-config))
(use-package hide-mode-line
:hook
((neotree-mode shell-mode) . hide-mode-line-mode))
(use-package display-line-numbers
:hook
(prog-mode . display-line-numbers-mode))
(use-package centaur-tabs
:hook
((dired-mode
shell-mode
neotree-mode
org-agenda-mode
dashboard-mode
messages-buffer-mode)
. centaur-tabs-local-mode)
(after-init . centaur-tabs-mode)
:config
(setq centaur-tabs-style "bar")
(setq centaur-tabs-height 35)
(setq centaur-tabs-set-icons t)
(setq centaur-tabs-set-bar 'under)
(setq x-underline-at-descent-line t)
(setq centaur-tabs-cycle-scope 'tabs))
;; highlight trailing and tabs that are not spaces
(setq whitespace-style '(face tabs tab-mark lines-tail trailing)
whitespace-display-mappings '((tab-mark 9 [126 9])))
(global-whitespace-mode)
(provide 'pack-appareance)

View File

@ -0,0 +1,65 @@
;;; My personal keybindings
(defun move-line-up () "Move up the current line" (interactive)
(transpose-lines 1) (forward-line -2) (indent-according-to-mode))
(defun move-line-down () "Move down the current line" (interactive)
(forward-line 1) (transpose-lines 1) (forward-line -1)
(indent-according-to-mode))
(global-set-key (kbd "M-p") 'move-line-up)
(global-set-key (kbd "M-n") 'move-line-down)
(global-set-key (kbd "C-x g") 'magit-status)
(global-set-key (kbd "C-c t") 'neotree-toggle)
;; all of my "personal" keybindings for calling packages start with C-=
(global-set-key (kbd "C-= c") 'company-mode)
(global-set-key (kbd "C-= r") 'revert-buffer)
(global-set-key (kbd "C-= s") 'flyspell-mode)
(global-set-key (kbd "C-= d") 'ispell-change-dictionary)
(global-set-key (kbd "C-= a") 'org-agenda)
(global-set-key (kbd "C-= l") 'org-store-link)
(global-set-key (kbd "C-= o") 'origami-mode)
(global-set-key (kbd "C-= C-l") 'org-toggle-link-display)
(global-set-key (kbd "C-= C-o r") 'origami-close-all-nodes)
(global-set-key (kbd "C-= C-o m") 'origami-open-all-nodes)
(global-set-key (kbd "C-= C-o c") 'origami-close-node-recursively)
(global-set-key (kbd "C-= C-o o") 'origami-open-node-recursively)
(global-set-key (kbd "C-= C-o C-o") 'origami-open-node)
(global-set-key (kbd "C-= t") 'centaur-tabs-local-mode)
(global-set-key (kbd "C-= C-m r") 'mc/mark-all-like-this)
(global-set-key (kbd "C-s-<mouse-1>") 'mc/add-cursor-on-click)
(global-set-key (kbd "C-s-p") 'mc/mark-previous-like-this)
(global-set-key (kbd "C-s-n") 'mc/mark-next-like-this)
;; moving arround
;;;; windows
(global-set-key (kbd "<s-up>") 'windmove-up)
(global-set-key (kbd "<s-down>") 'windmove-down)
(global-set-key (kbd "<s-left>") 'windmove-left)
(global-set-key (kbd "<s-right>") 'windmove-right)
;;;; buffer
(global-set-key (kbd "<C-s-right>") 'next-buffer)
(global-set-key (kbd "<C-s-left>") 'previous-buffer)
;;;; Tabs
(global-set-key (kbd "M-s-b")
'centaur-tabs-move-current-tab-to-left)
(global-set-key (kbd "M-s-f")
'centaur-tabs-move-current-tab-to-right)
(global-set-key (kbd "C-s-b")
'centaur-tabs-backward)
(global-set-key (kbd "C-s-f")
'centaur-tabs-forward)
;;;; Python
(global-set-key (kbd "M-;")
'elpy-goto-assignment)
(global-set-key (kbd "C-n")
'elpy-nav-forward-block)
(global-set-key (kbd "C-p")
'elpy-nav-backward-block)
(provide 'pack-keybindings)

View File

@ -0,0 +1,41 @@
;;; Org Configuration
(require 'org)
(require 'ox-md)
(require 'ox-beamer)
(require 'ox-latex)
(require 'org-bullets)
;;;; bullets customization
(add-hook 'org-mode-hook (lambda () (org-bullets-mode 1)))
(setq org-bullets-bullet-list '("" "" "" ""))
;;;; agenda
(setq org-src-tab-acts-natively t)
(setq org-agenda-start-on-weekday 0)
(setq org-agenda-include-deadlines nil)
(setq org-log-done t)
(setq org-todo-keywords
'((sequence "TODO(t)" "PROX(p)" "ABERTO(a)" "ESPERANDO(e)" "|" "FEITO(f)" "CANCELADO(c)")))
(setq org-agenda-files '("~/org/"))
;;;; pdf exporting
;; open mupdf when exporting to pdf
(add-hook 'org-mode-hook
'(lambda ()
(delete '("\\.pdf\\'" . default) org-file-apps)
(add-to-list 'org-file-apps
'("\\.pdf\\'" . "mupdf-gl -B 282C34 -C C4CCDB %s"))))
;; use minted code highlighting
(setq org-latex-listings 'minted
org-latex-packages-alist '(("" "minted"))
org-latex-minted-options '(("breaklines" "true")
("breakanywhere" "true")
("linenos" "true"))
org-latex-pdf-process
'("pdflatex -shell-escape -interaction nonstopmode -output-directory %o %f"
"pdflatex -shell-escape -interaction nonstopmode -output-directory %o %f"))
(provide 'pack-org)

View File

@ -0,0 +1,14 @@
(require 'projectile)
(projectile-mode +1)
(define-key projectile-mode-map (kbd "C-c p") 'projectile-command-map)
(setq projectile-project-search-path '(
"~/hd/projetos/"
"~/hd/aprender/"
))
(setq projectile-sort-order 'recently-active)
(setq projectile-indexing-method 'alien)
(provide 'pack-projectile)

View File

@ -0,0 +1,12 @@
;;; Configuração para transformar EMACS num SDK de Python
(use-package elpy
:ensure t
:init
(elpy-enable))
(add-hook 'python-mode-hook 'jedi:setup)
(setq jedi:complete-on-dot t)
(provide 'pack-py)

View File

@ -0,0 +1,50 @@
;;; Tools package
(use-package multiple-cursors)
(use-package magit)
(use-package dashboard
:config
(dashboard-setup-startup-hook)
(setq dashboard-startup-banner 'logo
show-week-agenda-p t
dashboard-center-content t
dashboard-set-heading-icons t
dashboard-set-file-icons t
dashboard-items '(
(projects . 5)
(agenda . 5)
;; (recents . 5)
)))
(use-package dired
:config
(put 'dired-find-alternate-file 'disabled nil)
:bind
;; dired wont open a buffer for each directory
(:map dired-mode-map
("RET" . dired-find-alternate-file)))
(use-package dumb-jump
:config
(dumb-jump-mode))
(use-package neotree
:config
(setq neo-theme 'icons)
(setq neo-autorefresh t)
(setq neo-window-fixed-size nil))
(use-package company
:hook
(after-init . global-company-mode))
(use-package auctex
:config
(font-latex-fontify-script nil)
:hook
(LaTeX-mode . LaTeX-math-mode))
(provide 'pack-tools)

View File

@ -0,0 +1,27 @@
;;; Simple tweaks
;; disable backup
(setq backup-inhibited t)
;; disable auto save
(setq auto-save-default nil)
;; scrolling line by line
(setq scroll-conservatively 1)
;; no startup
(setq inhibit-startup-screen t)
;; tabs are evil
(setq-default indent-tabs-mode nil)
;; tex quick view
(setq TeX-view-program-list
'(("Evince" "~/.local/bin/mupdf-gl -B 282C34 -C C4CCDB %o")))
;; default coding style
(setq c-default-style "k&r"
c-basic-offset 4)
(provide 'pack-tweaks)

4
firefox/extensions Normal file
View File

@ -0,0 +1,4 @@
https everywher
ublock origin
privacy badger
taba session manager

View File

@ -0,0 +1,96 @@
;;; Positions
(setf *message-window-gravity* :center)
(setf *input-window-gravity* :center)
(setf *window-name-source* :class)
(setf *window-border-style* :thin)
(set-focus-color "#000000")
(set-unfocus-color "#000000")
;;; mode-line
(setf *screen-mode-line-format*
(list "^B[%n] ^>"
'("^B"
(:eval (stumpwm:run-shell-command "~/.stumpwm/modeline.sh" t)))
">>>>>>>>> ^B%w "))
(setf *mode-line-timeout* 30)
(setf stumpwm:*mode-line-background-color* "#691b1b")
(setf stumpwm:*mode-line-foreground-color* "#f4b63f")
(setf stumpwm:*mode-line-border-color* "#e8f067")
(setf stumpwm:*hidden-window-color* "^7")
(stumpwm:mode-line)
;;; key bindings
(set-prefix-key (kbd "ISO_Level3_Shift"))
;(set-prefix-key (kbd "C-t"))
;;; Groups keybinds
;;; APPs
(define-key *root-map* (kbd "f") "exec firefox")
(define-key *root-map* (kbd "z") "exec xfce4-terminal")
(define-key *root-map* (kbd "SunPrint_Screen") "exec xfce4-screenshooter -r")
(define-key *root-map* (kbd "t") "exec thunar")
(define-key *root-map* (kbd "m") "exec thunderbird")
(define-key *root-map* (kbd "q") "exec emacs -nw")
(define-key *root-map* (kbd "n") "exec telegram-desktop")
(define-key *root-map* (kbd "x") "exec keepassxc")
(define-key *root-map* (kbd "b") "exec signal-desktop")
(define-key *root-map* (kbd "C-M-h") "exec thunar /home/saci")
(define-key *root-map* (kbd "C-M-r") "exec thunar /home/saci/hd/radio")
(define-key *root-map* (kbd "C-M-s") "exec thunar /home/saci/hd/radio/disroot_rca/sync")
(define-key *root-map* (kbd "C-M-p") "exec thunar /home/saci/hd/projetos")
;;; Stumpwm
(define-key *root-map* (kbd "k") "kill")
(define-key *root-map* (kbd "ESC") "abort")
(define-key *root-map* (kbd "-") "hsplit")
(define-key *root-map* (kbd "_") "vsplit")
(define-key *root-map* (kbd "=") "only")
;(define-key *root-map* (kbd "C-g") "grouplist")
;(define-key *root-map* (kbd "C-w") "windowlist")
(define-key *root-map* (kbd "a") "move-focus left")
(define-key *root-map* (kbd "d") "move-focus right")
(define-key *root-map* (kbd "w") "move-focus up")
(define-key *root-map* (kbd "s") "move-focus down")
(define-key *root-map* (kbd "C-w") "move-window up")
(define-key *root-map* (kbd "C-s") "move-window down")
(define-key *root-map* (kbd "C-a") "move-window left")
(define-key *root-map* (kbd "C-d") "move-window right")
(define-key *root-map* (kbd "C-F1") "gmove 1")
(define-key *root-map* (kbd "C-F2") "gmove 2")
(define-key *root-map* (kbd "C-F3") "gmove 3")
(define-key *root-map* (kbd "C-F4") "gmove 4")
(define-key *root-map* (kbd "C-F5") "gmove 5")
(define-key *root-map* (kbd "C-F6") "gmove 6")
(define-key *root-map* (kbd "C-F7") "gmove 7")
(define-key *root-map* (kbd "C-F8") "gmove 8")
(define-key *root-map* (kbd "C-F9") "gmove 9")
(define-key *root-map* (kbd "C-F10") "gselect")
(define-key *root-map* (kbd "quoteright") "windowlist")
(define-key *root-map* (kbd "\"") "select")
(define-key *root-map* (kbd ".") "next-in-frame")
(define-key *root-map* (kbd ",") "prev-in-frame")
(define-key *root-map* (kbd "\\") "exec")
;;; System
;;; startup commands
(run-commands "gnewbg _2_social"
"gnewbg _3_browser"
"gnewbg _4_tics"
"gnewbg _5_gastosCOVID"
"gnewbg _6_orçamentoArretado"
"gnewbg _7_klh"
"gnewbg _8_radio"
"gnewbg _9_orgs"
"exec seahorse"
"exec nextcloud"
"exec keepassxc"
"exec .screenlayout/dual_casa.sh"
"refresh"
)

28
stumpwm/stumpwm.d/modeline.lisp Executable file
View File

@ -0,0 +1,28 @@
#!/bin/bash
NIC=$(nmcli d status | grep 'enp2s0' | tr -s ' ' ':' | cut -d':' -f3)
WIC=$(nmcli d status | grep 'wlp3s0' | grep -v 'p2p' | tr -s ' ' ':' | cut -d':' -f3)
if [ $NIC == 'conectado' ]; then
NET=ETH:UP
elif [ $WIC == 'conectado' ]; then
NET=WLP:UP
else
NET=NET:DW
fi
echo -e "\
[US:$(mpstat -u | grep all | tr -s ' ' ';' | cut -d';' -f3)%]\
[SY:$(mpstat -u | grep all | tr -s ' ' ';' | cut -d';' -f5)%]\
[MEM:$(free -h | awk 'NR==2{printf $3}')]\
[$(echo $NET)]\
[$(date "+%d/%m/%y")]\
[$(date "+%H:%M")]\
[$(acpi -b |\
cut -d' ' -f3,4 |\
sed s/Discharging,\ /-/ |\
sed s/Charging,\ /+/ |\
sed s/Unknown,\ /\#/ |\
sed s/Full,\ // |\
sed s/,//)]"