about summary refs log tree commit diff
path: root/init/functions.el
diff options
context:
space:
mode:
authorVincent Ambo <tazjin@gmail.com>2017-11-12T21·41+0100
committerVincent Ambo <github@tazj.in>2017-11-12T21·44+0100
commit0511e7eb970e99f3c889aac323ff5ae2a550232e (patch)
treee08e8efe9c72986e05435dc9a34d63c1d9f5bbe5 /init/functions.el
parent0d5bdbd7ceceaa48d2caa8129f78a499d8bc68c1 (diff)
fix: Fix warnings & errors detected by elisp compiler
Minor things that came up when byte-compiling the configuration.
Diffstat (limited to 'init/functions.el')
-rw-r--r--init/functions.el14
1 files changed, 4 insertions, 10 deletions
diff --git a/init/functions.el b/init/functions.el
index af8ab51b45..c47e64d348 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 <nixos>): ")))
-    (insert-string (nix-store-path derivation))))
+    (insert (nix-store-path derivation))))
 
 (provide 'functions)