Klimi's new dotfiles with stow.
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

101 lines
3.6 KiB

преди 4 години
  1. (setq gnutls-algorithm-priority "NORMAL:-VERS-TLS1.3")
  2. (require 'package)
  3. (setq package-enable-at-startup nil)
  4. (add-to-list 'package-archives '("gnu" . "https://elpa.gnu.org/packages/"))
  5. (add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/"))
  6. (setq vc-follow-symlinks nil)
  7. (defalias 'yes-or-no-p 'y-or-n-p)
  8. ;; enable python for in-buffer evaluation
  9. (org-babel-do-load-languages
  10. 'org-babel-load-languages
  11. '((python . t)))
  12. (package-initialize)
  13. ;; Bootstrap `use-package`
  14. (unless (package-installed-p 'use-package)
  15. (package-refresh-contents)
  16. (package-install 'use-package))
  17. ;; ORG DOWNLOAD
  18. (use-package org-download
  19. :ensure t)
  20. (org-babel-load-file (expand-file-name "~/.emacs.d/myinit.org"))
  21. (setq inhibit-splash-screen t)
  22. ;;Eclipse-like C-backspace
  23. (defun my-kill-back ()
  24. (interactive)
  25. (if (bolp) ; beginnning of line, just delete 1
  26. (backward-delete-char 1)
  27. (if (string-match "[^[:space:]]" (buffer-substring (point-at-bol) (point)))
  28. ; There's a word on the line, delete it
  29. (backward-kill-word 1)
  30. (delete-region (point-at-bol) (point))))) ; all whitespace, delete it
  31. (global-set-key [C-backspace] 'my-kill-back)
  32. ;(setq initial-buffer-choice "*Org Agenda*")
  33. ;(org-agenda-list 1)
  34. ;(delete-other-windows)
  35. (defun custom-startup ()
  36. (interactive)
  37. (org-agenda-list 1)
  38. (delete-other-windows))
  39. (add-hook 'after-init-hook 'custom-startup)
  40. ;;(tool-bar-mode -1)
  41. ;;(menu-bar-mode -1)
  42. ;;(scroll-bar-mode -1)
  43. ;;(load-theme 'wombat)
  44. (custom-set-variables
  45. ;; custom-set-variables was added by Custom.
  46. ;; If you edit it by hand, you could mess it up, so be careful.
  47. ;; Your init file should contain only one such instance.
  48. ;; If there is more than one, they won't work right.
  49. '(ansi-color-names-vector
  50. ["#303030" "#ff4b4b" "#d7ff5f" "#fce94f" "#5fafd7" "#d18aff" "#afd7ff" "#c6c6c6"])
  51. '(custom-safe-themes
  52. (quote
  53. ("26d49386a2036df7ccbe802a06a759031e4455f07bda559dcf221f53e8850e69" "ef403aa0588ca64e05269a7a5df03a5259a00303ef6dfbd2519a9b81e4bce95c" default)))
  54. '(horizontal-scroll-bar-mode nil)
  55. '(menu-bar-mode nil)
  56. '(org-agenda-files
  57. (quote
  58. ("~/Documents/org/todo.org" "~/Documents/org/i.org" "~/Documents/org/habits.org" "~/Documents/org/links.org" "~/Documents/org/school.org")))
  59. '(package-selected-packages
  60. (quote
  61. (org-re-reveal-ref multiple-cursors org-re-reveal haskell-mode csharp-mode ess 2048-game ## gnu-elpa-keyring-update yapfify nix-mode doom-modeline doom-themes tao-theme poet-theme faff-theme zerodark-theme alect-themes moe-theme base16-theme zenburn-theme color-theme-modern counsel-spotify ggtags use-package)))
  62. '(safe-local-variable-values
  63. (quote
  64. ((eval add-hook
  65. (quote after-save-hook)
  66. (quote org-icalendar-export-to-ics)
  67. nil t)
  68. (eval add-hook
  69. (quote after-save-hook)
  70. (quote org-icalendar-export-agenda-files)
  71. nil t))))
  72. '(scroll-bar-mode nil)
  73. '(tool-bar-mode nil))
  74. (custom-set-faces
  75. ;; custom-set-faces was added by Custom.
  76. ;; If you edit it by hand, you could mess it up, so be careful.
  77. ;; Your init file should contain only one such instance.
  78. ;; If there is more than one, they won't work right.
  79. '(org-agenda-calendar-event ((t (:inherit default :foreground "CadetBlue1"))))
  80. '(org-agenda-column-dateline ((t (:background "#4e4e4e" :foreground "gold" :underline t))))
  81. '(org-agenda-current-time ((t (:inherit org-time-grid :foreground "lawn green"))))
  82. '(org-agenda-filter-category ((t (:inherit mode-line))))
  83. '(org-level-1 ((t (:foreground "#5fafd7" :height 2.0))))
  84. '(org-level-2 ((t (:foreground "#a1db00" :height 1.75))))
  85. '(org-level-3 ((t (:foreground "#ff8700" :height 1.5))))
  86. '(org-level-4 ((t (:foreground "#00d7af" :height 1.25)))))