summaryrefslogtreecommitdiff
path: root/.emacs.d/init.el
diff options
context:
space:
mode:
Diffstat (limited to '.emacs.d/init.el')
-rw-r--r--.emacs.d/init.el43
1 files changed, 43 insertions, 0 deletions
diff --git a/.emacs.d/init.el b/.emacs.d/init.el
new file mode 100644
index 0000000..f6e6032
--- /dev/null
+++ b/.emacs.d/init.el
@@ -0,0 +1,43 @@
+;;
+
+(setf user-full-name "Thanos Apollo"
+ user-mail-address "[email protected]")
+
+(defvar is-zeus (equal (system-name) "zeus"))
+(defvar is-hermes (equal (system-name) "hermes"))
+(defvar is-phone (equal (system-name) "localhost"))
+
+(setf browse-url-browser-function 'browse-url-generic
+ browse-url-generic-program "firefox")
+
+(setf backup-directory-alist '((".*" . "~/.Trash")))
+
+(define-prefix-command 'thanos/applications-map)
+(global-set-key (kbd "C-c a") 'thanos/applications-map)
+
+(define-prefix-command 'Create)
+(define-key thanos/applications-map (kbd "C-c") 'Create)
+
+;;(global-set-key (kbd "<escape>") 'keyboard-escape-quit) ;
+
+;; custom themes
+(add-to-list 'custom-theme-load-path (expand-file-name "~/.emacs.d/themes/"))
+
+(require 'cl-lib)
+
+(defun thanos/load-modules ()
+ "."
+ (let* ((modules-dir (concat user-emacs-directory "modules"))
+ (modules (cl-remove-if-not
+ (lambda (file) (string-suffix-p ".el" file))
+ (directory-files modules-dir t))))
+ (dolist (module modules)
+ (when (not (string-match-p "#" module))
+ (load module)))))
+
+
+(thanos/load-modules)
+
+
+
+;;; init.el ends here