diff --git a/.gitignore b/.gitignore index 0f9b0bae4..7b666905f 100644 --- a/.gitignore +++ b/.gitignore @@ -8,3 +8,4 @@ local.el other/ scripts/ themes/ +*.elc diff --git a/init.el b/init.el index 4f26322ad..c1dd7fc51 100644 --- a/init.el +++ b/init.el @@ -13,7 +13,7 @@ (package-initialize) ;; This variable controls all packages that should be installed. -(setq-local desired-packages +(defvar desired-packages '(;; elisp libraries dash dash-functional @@ -25,6 +25,7 @@ ag browse-kill-ring cargo + company confluence dash dockerfile-mode diff --git a/init/functions.el b/init/functions.el index af8ab51b4..c47e64d34 100644 --- a/init/functions.el +++ b/init/functions.el @@ -1,3 +1,4 @@ +(require 's) ;; A few handy functions I use in init.el (or not, but they're nice to ;; have) @@ -22,11 +23,11 @@ (defun custom-download-script (url filename) "Downloads an Elisp script, places it in ~/.emacs/other and then loads it" - + ;; Ensure the directory exists (unless (file-exists-p "~/.emacs.d/other") (make-directory "~/.emacs.d/other")) - + ;; Download file if it doesn't exist. (let ((file (concat "~/.emacs.d/other/" filename))) @@ -99,13 +100,6 @@ Including indent-buffer, which should not be called automatically on save." (find-file (concat "/sudo:root@localhost:" (read-file-name "File: "))) (find-alternate-file (concat "/sudo:root@localhost:" buffer-file-name)))) -;; Evaluate sexp and replace it with result -(defun replace-last-sexp () - (interactive) - (let ((value (eval (preceding-sexp)))) - (kill-sexp -1) - (insert (format "%S" value)))) - ;; Open Fefes blog (defun fefes-blog () (interactive) @@ -125,6 +119,6 @@ Including indent-buffer, which should not be called automatically on save." (defun insert-nix-store-path () (interactive) (let ((derivation (read-string "Derivation name (in ): "))) - (insert-string (nix-store-path derivation)))) + (insert (nix-store-path derivation)))) (provide 'functions) diff --git a/init/rust-setup.el b/init/rust-setup.el index 8eab1d9bd..b1a568152 100644 --- a/init/rust-setup.el +++ b/init/rust-setup.el @@ -1,3 +1,4 @@ +(require 'company) (require 'rust-mode) ;; Enable cargo-related (C-c C-c C-...) commands.