hiro/dotfiles
1
0
Fork 0
mirror of https://github.com/vale981/dotfiles synced 2025-03-04 17:11:39 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

upd

Browse source
This commit is contained in:
Valentin Boettcher 2019-01-21 16:16:13 +01:00
parent b9e7b3991b
commit 9a98e48646
7 changed files with 330 additions and 180 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
config.laptop-ext.sh Normal file
View file

@ -0,0 +1,11 @@
WIFI_DEV="wlp4s0"
ETH_DEV="enp0s31f6"
MAIN_NET=$WIFI_DEV
BATTERIES=(BAT0 BAT1)
MAIN_FONT="Source Code Pro 8"
MAIN_MONITOR=HDMI-2
MONITORS=(eDP-1)
#MONITORS=(VGA-0 DVI-D-0)
BAR_POS="bottom"

2
dots/fish/config.fish
View file

@ -2,3 +2,5 @@ set fish_greeting ""
set -gx PATH $HOME/.scripts $PATH set -gx PATH $HOME/.scripts $PATH
set -g theme_display_date no set -g theme_display_date no
set -g fish_key_bindings fish_default_key_bindings set -g fish_key_bindings fish_default_key_bindings
alias mktargz "tar -zcvf"

449
dots/home/.emacs
View file

@ -11,11 +11,16 @@
;;; Backup ;;; Backup
(setq backup-directory-alist '(("." . "~/.emacs.d/backup")) (setq backup-directory-alist '(("." . "~/.emacs.d/backup"))
backup-by-copying t ; Don't delink hardlinks backup-by-copying
version-control t ; Use version numbers on backups t ; Don't delink hardlinks
delete-old-versions t ; Automatically delete excess backups version-control
kept-new-versions 20 ; how many of the newest versions to keep t ; Use version numbers on backups
kept-old-versions 5 ; and how many of the old delete-old-versions
t ; Automatically delete excess backups
kept-new-versions
20 ; how many of the newest versions to keep
kept-old-versions
5 ; and how many of the old
) )
;;; Desktop ;;; Desktop
@ -25,22 +30,37 @@
(load (expand-file-name "~/.roswell/helper.el")) (load (expand-file-name "~/.roswell/helper.el"))
(defun close-all-buffers () (defun close-all-buffers ()
(interactive) (interactive)
(mapc 'kill-buffer (buffer-list))) (mapc 'kill-buffer
(buffer-list)))
(custom-set-variables (custom-set-variables
;; custom-set-variables was added by Custom. ;; custom-set-variables was added by Custom.
;; 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.
'(custom-safe-themes '(custom-safe-themes (quote ("4cf3221feff536e2b3385209e9b9dc4c2e0818a69a1cdb4b522756bcdf4e00a4"
(quote "84d2f9eeb3f82d619ca4bfffe5f157282f4779732f48a5ac1484d94d5ff5b279"
("84d2f9eeb3f82d619ca4bfffe5f157282f4779732f48a5ac1484d94d5ff5b279" "a27c00821ccfd5a78b01e4f35dc056706dd9ede09a8b90c6955ae6a390eb1c1e" "8db4b03b9ae654d4a57804286eb3e332725c84d7cdab38463cb6b97d5762ad26" "065efdd71e6d1502877fd56 "a27c00821ccfd5a78b01e4f35dc056706dd9ede09a8b90c6955ae6a390eb1c1e"
21b984cded01717930639ded0e569e1724d058af8" default))) "8db4b03b9ae654d4a57804286eb3e332725c84d7cdab38463cb6b97d5762ad26"
'(package-selected-packages "065efdd71e6d1502877fd56
(quote 21b984cded01717930639ded0e569e1724d058af8"
(all-the-icons ivy-rich ansible sly-repl-ansi-color sly-quicklisp sly-macrostep sly ranger company-tabnine meson-mode counsel-notmuch circe-notifications circe pretty-mode lispy info-beamer auctex-latexmk indium ag js-doc yasnippet-classic-snippets yasnippet-snippets ivy-yasnippet counsel sage-shell-mode dummyparens magit-filenotify docker-compose-mode docker xref-js2 js2-refactor flycheck-rtags flycheck ivy-rtags rtags auctex magit flycheck-rust avy-flycheck company racer cargo rust-mode restart-emacs nix-mode json-mode multiple-cursors swiper ivy xresources-theme powerline))) default)))
'(package-selected-packages (quote (srefactor sly-repl-ansi-color sly-quicklisp
sly-macrostep sly ranger company-tabnine counsel-notmuch
circe-notifications circe pretty-mode lispy
info-beamer auctex-latexmk ag indium js-doc
yasnippet-classic-snippets yasnippet-snippets
ivy-yasnippet counsel sage-shell-mode dummyparens
magit-filenotify docker-compose-mode docker
xref-js2 js2-refactor flycheck-rtags flycheck
ivy-rtags rtags auctex magit flycheck-rust
avy-flycheck company racer cargo rust-mode
restart-emacs json-mode multiple-cursors swiper
ivy xresources-theme powerline)))
'(safe-local-variable-values (quote ((TeX-master . t)))) '(safe-local-variable-values (quote ((TeX-master . t))))
'(show-paren-mode t) '(show-paren-mode t)
'(tramp-syntax (quote default) nil (tramp))) '(tramp-syntax (quote default)
nil
(tramp)))
(custom-set-faces (custom-set-faces
;; custom-set-faces was added by Custom. ;; custom-set-faces was added by Custom.
;; 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.
@ -54,29 +74,35 @@
(when mark-ring (when mark-ring
(let ((pos (marker-position (car (last mark-ring))))) (let ((pos (marker-position (car (last mark-ring)))))
(if (not (= (point) pos)) (if (not (= (point) pos))
(goto-char pos) (goto-char pos)
(setq mark-ring (cons (copy-marker (mark-marker)) mark-ring)) (setq mark-ring (cons (copy-marker (mark-marker)) mark-ring))
(set-marker (mark-marker) pos) (set-marker (mark-marker)
(setq mark-ring (nbutlast mark-ring)) pos)
(goto-char (marker-position (car (last mark-ring)))))))) (setq mark-ring (nbutlast mark-ring))
(global-set-key (kbd "C-c m c") 'mc/edit-lines) (goto-char (marker-position (car (last mark-ring))))))))
(global-set-key (kbd "C-x <spc>") 'mc/edit-lines) (global-set-key (kbd "C-c m c")
'mc/edit-lines)
(global-set-key (kbd "C-x <spc>")
'mc/edit-lines)
;;; Packages ;;; Packages
(require 'package) (require 'package)
(add-to-list 'package-archives '("melpa" . "http://melpa.org/packages/")) (add-to-list 'package-archives
'("melpa" . "http://melpa.org/packages/"))
(package-initialize) (package-initialize)
; fetch the list of packages available ; fetch the list of packages available
(unless package-archive-contents (unless package-archive-contents
(package-refresh-contents)) (package-refresh-contents))
; install the missing packages ; install the missing packages
(dolist (package package-selected-packages) (dolist (package package-selected-packages)
(unless (package-installed-p package) (unless (package-installed-p package)
(package-install package))) (package-install package)))
(require 'srefactor)
(require 'srefactor-lisp)
;;;; Company ;;;; Company
(with-eval-after-load 'company (with-eval-after-load 'company
;; (add-to-list 'company-backends #'company-tabnine) ;; (add-to-list 'company-backends #'company-tabnine)
@ -84,35 +110,21 @@
(add-to-list 'company-backends #'company-tabnine) (add-to-list 'company-backends #'company-tabnine)
(setq company-show-numbers t) (setq company-show-numbers t)
(setq company-idle-delay 0) (setq company-idle-delay 0)
(global-set-key (kbd "<C-tab>") 'company-complete) (global-set-key (kbd "<C-tab>")
'company-complete)
(define-key company-active-map (kbd "C-n") 'company-select-next-or-abort) (define-key company-active-map (kbd "C-n") 'company-select-next-or-abort)
(define-key company-active-map (kbd "C-p") 'company-select-previous-or-abort) (define-key company-active-map (kbd "C-p") 'company-select-previous-or-abort)
(company-tng-configure-default) (company-tng-configure-default)
(setq company-frontends (setq company-frontends '(company-tng-frontend company-pseudo-tooltip-frontend
'(company-tng-frontend company-echo-metadata-frontend)))
company-pseudo-tooltip-frontend
company-echo-metadata-frontend)))
;;;; Magit ;;;; Magit
(global-set-key (kbd "C-x g") 'magit-status) (global-set-key (kbd "C-x g")
'magit-status)
;;;; Sage ;;;; Sage
(add-hook 'sage-shell-after-prompt-hook #'sage-shell-view-mode) (add-hook 'sage-shell-after-prompt-hook #'sage-shell-view-mode)
;;;; GDB
(setq
;; use gdb-many-windows by default
gdb-many-windows t
;; Non-nil means display source file containing the main routine at startup
gdb-show-main t
)
(add-hook 'gud-mode-hook
'(lambda ()
(global-set-key (kbd "<f7>") 'gud-next)
(global-set-key (kbd "<f8>") 'gud-step)))
;;;; Rtags ;;;; Rtags
(setq rtags-autostart-diagnostics t) (setq rtags-autostart-diagnostics t)
(setq rtags-completions-enabled t) (setq rtags-completions-enabled t)
@ -126,29 +138,28 @@
"For use in `c++-mode-hook'." "For use in `c++-mode-hook'."
(rtags-start-process-unless-running) (rtags-start-process-unless-running)
(company-mode) (company-mode)
(local-set-key (kbd "M-.") 'rtags-find-symbol-at-point) (local-set-key (kbd "M-.")
(local-set-key (kbd "M-,") 'rtags-find-references-at-point) 'rtags-find-symbol-at-point)
(local-set-key (kbd "<C-left>") 'rtags-location-stack-back) (local-set-key (kbd "M-,")
(local-set-key (kbd "<C-right>") 'rtags-location-stack-forward) 'rtags-find-references-at-point)
(local-set-key (kbd "<C-,>") 'rtags-print-symbol-info) (local-set-key (kbd "<C-left>")
(global-set-key (kbd "<f4>") 'ff-find-other-file) 'rtags-location-stack-back)
(local-set-key (kbd "<C-right>")
'rtags-location-stack-forward)
(local-set-key (kbd "<C-,>")
'rtags-print-symbol-info)
(global-set-key (kbd "<f4>")
'ff-find-other-file)
(rtags-enable-standard-keybindings) (rtags-enable-standard-keybindings)
(flycheck-select-checker 'rtags) (flycheck-select-checker 'rtags)
(setq-local flycheck-highlighting-mode nil) ;; RTags creates more accurate overlays. (setq-local flycheck-highlighting-mode nil) ;; RTags creates more accurate overlays.
(setq-local flycheck-check-syntax-automatically nil) (setq-local flycheck-check-syntax-automatically
(flycheck-mode) nil)
) (flycheck-mode))
(add-hook 'c-mode-hook 'c++-config) (add-hook 'c-mode-hook 'c++-config)
(add-hook 'c++-mode-hook 'c++-config) (add-hook 'c++-mode-hook 'c++-config)
;;;; MC
(global-set-key (kbd "C-S-c C-S-c") 'mc/edit-lines)
(global-set-key (kbd "C->") 'mc/mark-next-like-this)
(global-set-key (kbd "C-<") 'mc/mark-previous-like-this)
(global-set-key (kbd "C-c C-<") 'mc/mark-all-like-this)
;;;; Ivy ;;;; Ivy
(ivy-mode 1) (ivy-mode 1)
(setq ivy-use-virtual-buffers t) (setq ivy-use-virtual-buffers t)
@ -158,8 +169,9 @@
;;;; Rust ;;;; Rust
(add-hook 'rust-mode-hook 'cargo-minor-mode) (add-hook 'rust-mode-hook 'cargo-minor-mode)
(add-hook 'rust-mode-hook (add-hook 'rust-mode-hook
(lambda () (lambda ()
(local-set-key (kbd "C-c <tab>") #'rust-format-buffer))) (local-set-key (kbd "C-c <tab>")
#'rust-format-buffer)))
;;;;; Racer ;;;;; Racer
(setq racer-cmd "racer") ;; Rustup binaries PATH (setq racer-cmd "racer") ;; Rustup binaries PATH
@ -178,7 +190,8 @@
(require 'js2-refactor) (require 'js2-refactor)
(require 'xref-js2)(add-hook 'js2-mode-hook #'js2-refactor-mode) (require 'xref-js2)(add-hook 'js2-mode-hook #'js2-refactor-mode)
(add-to-list 'auto-mode-alist '("\\.js\\'" . js2-mode)) (add-to-list 'auto-mode-alist
'("\\.js\\'" . js2-mode))
(add-hook 'js2-mode-hook #'js2-imenu-extras-mode) (add-hook 'js2-mode-hook #'js2-imenu-extras-mode)
(js2r-add-keybindings-with-prefix "C-c C-r") (js2r-add-keybindings-with-prefix "C-c C-r")
@ -188,13 +201,15 @@
;; unbind it. ;; unbind it.
(define-key js-mode-map (kbd "M-.") nil) (define-key js-mode-map (kbd "M-.") nil)
(add-hook 'js2-mode-hook (lambda () (add-hook 'js2-mode-hook
(add-hook 'xref-backend-functions #'xref-js2-xref-backend nil t))) (lambda ()
(add-hook 'xref-backend-functions #'xref-js2-xref-backend
nil t)))
(add-hook 'js2-mode-hook (add-hook 'js2-mode-hook
#'(lambda () #'(lambda ()
(define-key js2-mode-map "\C-ci" 'js-doc-insert-function-doc) (define-key js2-mode-map "\C-ci" 'js-doc-insert-function-doc)
(define-key js2-mode-map "@" 'js-doc-insert-tag))) (define-key js2-mode-map "@" 'js-doc-insert-tag)))
(define-key js2-mode-map (kbd "C-k") #'js2r-kill) (define-key js2-mode-map (kbd "C-k") #'js2r-kill)
@ -228,7 +243,7 @@
;; (match-end 0) ;; (match-end 0)
;; ,replacement) ;; ,replacement)
;; nil)))))) ;; nil))))))
;; ,@(loop for mode in modes collect `(add-hook ,mode (quote ,fname))) ;; ,@(loop for mode in modes collect `(add-hook ,mode (quote ,fname)))
;; nil))) ;; nil)))
@ -236,161 +251,241 @@
(defun my-add-to-multiple-hooks (function hooks) (defun my-add-to-multiple-hooks (function hooks)
(mapc (lambda (hook) (mapc (lambda (hook)
(add-hook hook function)) (add-hook hook function))
hooks)) hooks))
(my-add-to-multiple-hooks (my-add-to-multiple-hooks #'(lambda ()
#'(lambda () (mapc (lambda (pair)
(mapc (lambda (pair) (push pair prettify-symbols-alist)) (push pair prettify-symbols-alist))
'(;; Syntax '( ;; Syntax
("funcall" . #x2A10) ("funcall" . #x2A10)
("#'" . #x2358)))) ("#'" . #x2358))))
'(emacs-lisp-mode-hook '(emacs-lisp-mode-hook lisp-interaction-mode-hook))
lisp-interaction-mode-hook))
(add-hook 'emacs-lisp-mode-hook #'lispy-mode) (add-hook 'emacs-lisp-mode-hook #'lispy-mode)
(add-hook 'eval-expression-minibuffer-setup-hook #'lispy-mode) (add-hook 'eval-expression-minibuffer-setup-hook
(add-hook 'ielm-mode-hook #'lispy-mode) #'lispy-mode)
(add-hook 'lisp-mode-hook #'lispy-mode) (add-hook 'ielm-mode-hook #'lispy-mode)
(add-hook 'lisp-mode-hook #'lispy-mode)
(add-hook 'lisp-interaction-mode-hook #'lispy-mode) (add-hook 'lisp-interaction-mode-hook #'lispy-mode)
(add-hook 'scheme-mode-hook #'lispy-mode) (add-hook 'scheme-mode-hook #'lispy-mode)
(with-eval-after-load 'lispy (with-eval-after-load 'lispy
(define-key lispy-mode-map (kbd "M-(") #'lispy-parens-auto-wrap)) (define-key lispy-mode-map (kbd "M-(") #'lispy-parens-auto-wrap)
(setq lispy-use-sly t))
;;; Org ;;; Org
(require 'org-install) (require 'org-install)
(require 'org-habit) (require 'org-habit)
(require 'doc-view) (require 'doc-view)
(setq doc-view-resolution 144) (setq doc-view-resolution 144)
(setq org-treat-S-cursor-todo-selection-as-state-change nil) (setq org-treat-S-cursor-todo-selection-as-state-change
(setq org-todo-state-tags-triggers nil)
(quote (("CANCELLED" ("CANCELLED" . t)) (setq org-todo-state-tags-triggers (quote (("CANCELLED"
("WAITING" ("WAITING" . t)) ("CANCELLED" . t))
("HOLD" ("WAITING") ("HOLD" . t)) ("WAITING"
(done ("WAITING") ("HOLD")) ("WAITING" . t))
("TODO" ("WAITING") ("CANCELLED") ("HOLD")) ("HOLD"
("NEXT" ("WAITING") ("CANCELLED") ("HOLD")) ("WAITING")
("DONE" ("WAITING") ("CANCELLED") ("HOLD"))))) ("HOLD" . t))
(done ("WAITING")
("HOLD"))
("TODO"
("WAITING")
("CANCELLED")
("HOLD"))
("NEXT"
("WAITING")
("CANCELLED")
("HOLD"))
("DONE"
("WAITING")
("CANCELLED")
("HOLD")))))
(setq org-todo-keywords (setq org-todo-keywords '((sequence "TODO" "WAITING" "NEXT" "HOLD" "|"
'( "DONE")
(sequence "TODO" "WAITING" "NEXT" "HOLD" "|" "DONE") (sequence "BESORGEN" "WARTEN" "|" "BESORGT")
(sequence "BESORGEN" "WARTEN" "|" "BESORGT") (sequence "OUTOFSTOCK" "|" "INSTOCK")
(sequence "OUTOFSTOCK" "|" "INSTOCK") (sequence "RESOLVE" "ASK" "RESEARCH" "|" "RESOLVED")
(sequence "RESOLVE" "ASK" "RESEARCH" "|" "RESOLVED") (sequence "HOMEWORK" "ACTIVE" "|" "FINISHED")))
(sequence "HOMEWORK" "ACTIVE" "|" "FINISHED"))
)
(setq org-clock-persist 'history) (setq org-clock-persist 'history)
(org-clock-persistence-insinuate) (org-clock-persistence-insinuate)
(setq org-directory "~/Documents/org") (setq org-directory "~/Documents/org")
(setq org-default-notes-file "~/Documents/org/refile.org") (setq org-default-notes-file "~/Documents/org/refile.org")
;; I use C-c c to start capture mode
(global-set-key (kbd "C-c c") 'org-capture)
;; Capture templates for: TODO tasks, Notes, appointments, phone calls, meetings, and org-protocol ;; I use C-c c to start capture mode
(setq org-capture-templates (global-set-key (kbd "C-c c")
(quote (("t" "Todo" entry (file org-default-notes-file) 'org-capture)
"* TODO %?\n%U\n%a\n")
("n" "Note" entry (file org-default-notes-file) ;; Capture templates for: TODO tasks, Notes, appointments, phone calls, meetings, and org-protocol
"* %? :NOTE:\n%U\n%a\n") (setq org-capture-templates (quote (("t" "Todo"
("q" "Question" entry (file "~/Documents/org/refile/questions.org") entry
"* RESOLVE %? :QUESTION:\n%U\n%a\n") (file org-default-notes-file)
("e" "Exercise" entry (file "~/Documents/org/refile/exercises.org") "* TODO %?\n%U\n%a\n")
"* HOMEWORK %? :EXERCISE:\n%a\n") ("n" "Note"
("j" "Journal" entry (file+datetree "~/Documents/org/diary.org") entry
"**** %?\n%U\n") (file org-default-notes-file)
("m" "Meeting" entry (file org-default-notes-file) "* %? :NOTE:\n%U\n%a\n")
"** %? :MEETING:\n" ("q" "Question"
)))) entry
(file "~/Documents/org/refile/questions.org")
"* RESOLVE %? :QUESTION:\n%U\n%a\n")
("e" "Exercise"
entry
(file "~/Documents/org/refile/exercises.org")
"* HOMEWORK %? :EXERCISE:\n%a\n")
("j" "Journal"
entry
(file+datetree "~/Documents/org/diary.org")
"**** %?\n%U\n")
("m" "Meeting"
entry
(file org-default-notes-file)
"** %? :MEETING:\n"))))
(setq org-agenda-files (list "~/Documents/org/todo.org")) (setq org-agenda-files (list "~/Documents/org/todo.org" "~/Documents/org/calendar.org"))
;Targets include this file and any file contributing to the agenda - up to 9 levels deep ;Targets include this file and any file contributing to the agenda - up to 9 levels deep
(setq org-refile-targets (quote ((nil :maxlevel . 9) (setq org-refile-targets (quote ((nil :maxlevel .
(org-agenda-files :maxlevel . 9)))) 9)
(org-agenda-files :maxlevel .
9))))
; Use full outline paths for refile targets - we file directly with IDO ; Use full outline paths for refile targets - we file directly with IDO
(setq org-refile-use-outline-path t) (setq org-refile-use-outline-path t)
; Targets complete directly with IDO ; Targets complete directly with IDO
(setq org-outline-path-complete-in-steps nil) (setq org-outline-path-complete-in-steps nil)
; Allow refile to create parent tasks with confirmation ; Allow refile to create parent tasks with confirmation
(setq org-refile-allow-creating-parent-nodes (quote confirm)) (setq org-refile-allow-creating-parent-nodes (quote confirm))
; Use the current window for indirect buffer display ; Use the current window for indirect buffer display
(setq org-indirect-buffer-display 'current-window) (setq org-indirect-buffer-display 'current-window)
;;;; Refile settings ;;;; Refile settings
; Exclude DONE state tasks from refile targets ; Exclude DONE state tasks from refile targets
(defun bh/verify-refile-target () (defun bh/verify-refile-target ()
"Exclude todo keywords with a done state from refile targets" "Exclude todo keywords with a done state from refile targets"
(not (member (nth 2 (org-heading-components)) org-done-keywords))) (not (member (nth 2
(org-heading-components))
org-done-keywords)))
(setq org-refile-target-verify-function 'bh/verify-refile-target) (setq org-refile-target-verify-function 'bh/verify-refile-target)
(global-set-key (kbd "C-c a") 'org-agenda) (setq org-refile-targets '((org-agenda-files :maxlevel . 3)))
(setq org-agenda-custom-commands (global-set-key (kbd "C-c a")
'(("X" agenda "" nil ("~/Documents/org/out/agenda.html")) 'org-agenda)
("n" "Notes" tags "NOTE" ;; (org-super-agenda--def-auto-group path "their path in the outline"
((org-agenda-overriding-header "Notes") ;; :key-form (org-super-agenda--when-with-marker-buffer (org-super-agenda--get-marker item)
(org-tags-match-list-sublevels t)) ;; (when (org-up-heading-safe)
("~/Documents/org/out/notes.html")) ;; (org-format-outline-path (org-get-outline-path t t))
("s" "Next" todo "NEXT" ;; )))
((org-agenda-overriding-header "Next") ;; (setq org-super-agenda-groups
(org-tags-match-list-sublevels t)) ;; '(;; Each group has an implicit boolean OR operator between its selectors.
("~/Documents/org/out/next.html")) ;; ;; (:auto-parent t)
("f" "Questions" tags "QUESTION"
((org-agenda-overriding-header "Questions")
(org-tags-match-list-sublevels t)) ;; (:name "NEXT" ; Optionally specify section name
("~/Documents/org/out/question.html")) ;; ;; :auto-path t
("l" "Einkaufsliste" todo "OUTOFSTOCK" ;; :todo "NEXT")
((org-agenda-overriding-header "Einkaufsliste") ;; (:name "TODO" ; Optionally specify section name
(org-tags-match-list-sublevels t)) ;; :todo "TODO") ; Items that have this TODO keyword
("~/Documents/org/out/einkaufsliste.html")) ;; ))
))
(setq org-agenda-custom-commands '(("X" agenda
""
nil
("~/Documents/org/out/agenda.html"))
("n" "Notes"
tags
"NOTE"
((org-agenda-overriding-header "Notes")
(org-tags-match-list-sublevels t))
("~/Documents/org/out/notes.html"))
("s" "Next"
todo
"NEXT"
((org-agenda-overriding-header "Next")
(org-tags-match-list-sublevels t))
("~/Documents/org/out/next.html"))
("f" "Questions"
tags
"QUESTION"
((org-agenda-overriding-header "Questions")
(org-tags-match-list-sublevels t))
("~/Documents/org/out/question.html"))
("l" "Einkaufsliste"
todo
"OUTOFSTOCK"
((org-agenda-overriding-header "Einkaufsliste")
(org-tags-match-list-sublevels t))
("~/Documents/org/out/einkaufsliste.html"))))
;;; Email ;;; Email
;;use org mode for eml files (useful for thunderbird plugin) ;;use org mode for eml files (useful for thunderbird plugin)
(add-to-list 'auto-mode-alist '("\\.eml\\'" . org-mode)) (add-to-list 'auto-mode-alist
'("\\.eml\\'" . org-mode))
(global-prettify-symbols-mode 1) (global-prettify-symbols-mode 1)
;;; Ricing ;;; Ricing
;;(require 'xresources-theme) ;; (require 'xresources-theme)
(load-theme 'solarized t) (load-theme 'solarized t)
(powerline-default-theme) (powerline-default-theme)
(global-set-key (kbd "M-g w") 'avy-goto-word-1) (global-set-key (kbd "M-g w")
'avy-goto-word-1)
(put 'upcase-region 'disabled nil) (put 'upcase-region 'disabled nil)
(global-pretty-mode t) (global-pretty-mode t)
(pretty-activate-groups (pretty-activate-groups '(:sub-and-superscripts :greek :arithmetic-nary
'(:sub-and-superscripts :greek :arithmetic-nary :arrows :arithmetic)) :arrows :arithmetic))
;;; Avy ;;; Avy
(global-set-key (kbd "M-g w") 'avy-goto-word-1) (global-set-key (kbd "M-g w")
(global-set-key (kbd "M-g f") 'avy-goto-line) 'avy-goto-word-1)
(global-set-key (kbd "C-'") 'avy-goto-char-2) (global-set-key (kbd "M-g f")
'avy-goto-line)
(global-set-key (kbd "C-'")
'avy-goto-char-2)
;;; IRC ;;; IRC
(setq circe-network-options (setq circe-network-options '(("Freenode" :tls t
'(("Freenode" :nick "hiro98"
:tls t :sasl-username "hiro98"
:nick "hiro98" :sasl-password "valentin981"
:sasl-username "hiro98" :channels ("#emacs-circe"))))
:sasl-password "valentin981"
:channels ("#emacs-circe")
)))
(eval-after-load "circe-notifications" (eval-after-load "circe-notifications"
'(setq circe-notifications-watch-strings '(setq circe-notifications-watch-strings '("drmeister" "hiro" "hiro98")))
'("drmeister" "hiro" "hiro98")))
(add-hook 'circe-server-connected-hook 'enable-circe-notifications) (add-hook 'circe-server-connected-hook 'enable-circe-notifications)
;;; Shortcuts
(move-text-default-bindings)
;;;; MC
(global-set-key (kbd "C-S-c C-S-c")
'mc/edit-lines)
(global-set-key (kbd "C->")
'mc/mark-next-like-this)
(global-set-key (kbd "C-<")
'mc/mark-previous-like-this)
(global-set-key (kbd "C-c C-<")
'mc/mark-all-like-this)
(define-key mc/keymap (kbd "<return>") nil)
(global-set-key (kbd "C-S-<mouse-1>") 'mc/add-cursor-on-click)
(put 'narrow-to-region 'disabled nil)
;; Keybindings
(progn
(define-key key-translation-map (kbd "H-3") (kbd "•")) ; bullet
(define-key key-translation-map (kbd "H-4") (kbd "◇")) ; white diamond
(define-key key-translation-map (kbd "H-5") (kbd "†")))

26
dots/home/.xmodmaprc Normal file
View file

@ -0,0 +1,26 @@
!keycode 18 = 9 parenleft 9 parenleft
!keycode 19 = 0 parenright 0 parenright
keycode 18 = 9 bracketleft 9 bracketleft
keycode 19 = 0 bracketright 0 bracketright
!keycode 34 = bracketleft braceleft bracketleft braceleft
!keycode 35 = bracketright braceright bracketright braceright
keycode 34 = parenleft braceleft parenleft braceleft
keycode 35 = parenright braceright parenright braceright
clear lock
clear control
clear mod1
clear mod2
clear mod3
clear mod4
clear mod5
keycode 37 = Hyper_L
keycode 66 = Control_L
add control = Control_L Control_R
add mod1 = Alt_L Alt_R Meta_L
add mod2 = Num_Lock
add mod3 = Hyper_L
add mod4 = Super_L Super_R
add mod5 = Mode_switch ISO_Level3_Shift

3
dots/i3/config.template
View file

@ -264,7 +264,6 @@ exec --no-startup-id udiskie
exec --no-startup-id xfce4-clipman exec --no-startup-id xfce4-clipman
exec --no-startup-id udiskie exec --no-startup-id udiskie
exec --no-startup-id ~/.scripts ec -e '' exec --no-startup-id ~/.scripts ec -e ''
exec --no-startup-id setxkbmap -layout us -option ctrl:nocaps
exec --no-startup-id setxkbmap -option ctrl:nocaps
exec --no-startup-id kdeconnect-indicator exec --no-startup-id kdeconnect-indicator
exec --no-startup-id xset dpms 600 exec --no-startup-id xset dpms 600
exec --no-startup-id xmodmap ~/.xmodmaprc

17
dots/scripts/xcape_it Normal file
View file

@ -0,0 +1,17 @@
#!/bin/bash
spare_modifier="255"
# Map an unused modifier's keysym to the spacebar's keycode and make it a
# control modifier. It needs to be an existing key so that emacs won't
# spazz out when you press it. Hyper_L is a good candidate.
xmodmap -e "keycode 65 = $spare_modifier"
#xmodmap -e "remove mod4 = $spare_modifier" # hyper_l is mod4 by default
#xmodmap -e "add Control = $spare_modifier"
# Map space to an unused keycode (to keep it around for xcape to
# use).
xmodmap -e "keycode any = space"
# Finally use xcape to cause the space bar to generate a space when tapped.
xcape -e "$spare_modifier=space"

2
tools/oomox-gtk-theme

@ -1 +1 @@
Subproject commit fef5f8d74dd0a0bc0add311d32bb0682715266a9 Subproject commit 82ddbda30f2eae3dfdbaa85545893b1aa841d496