diff --git a/sloth/editor.scm b/sloth/editor.scm
index ec9d47d..50dae05 100644
--- a/sloth/editor.scm
+++ b/sloth/editor.scm
@@ -55,22 +55,22 @@
   (define x (getcurx win))
   (cond
    ((or (eqv? key KEY_LEFT)
-		(eqv? key #\h))
+	(eqv? key #\h))
     (move-cursor state y (- x 1)))
    ((or (eqv? key KEY_RIGHT)
-		(eqv? key #\l))
+	(eqv? key #\l))
     (move-cursor state y (+ x 1)))
    ((or (eqv? key KEY_UP)
-		(eqv? key #\k))
+	(eqv? key #\k))
     (move-cursor state (- y 1) x))
    ((or (eqv? key KEY_DOWN)
-		(eqv? key #\j))
+	(eqv? key #\j))
     (move-cursor state (+ y 1) x))
    ((eqv? key #\n) (next-node state))
    ((eqv? key #\d) (down-node state))
    ((eqv? key #\p) (prev-node state))
    ((eqv? key #\u) (up-node state))
-      ((eqv? key #\i) (set-sloth-state-mode state 'insert-mode))
+   ((eqv? key #\i) (set-sloth-state-mode state 'insert-mode))
    ((eqv? key #\q)
     (endwin)
     (quit))
@@ -81,7 +81,7 @@
   (define contents "")
   (when (file-exists? file)
     (set! contents
-      (call-with-input-file file get-string-all))
+          (call-with-input-file file get-string-all))
     (addstr win contents)
     (refresh win)
     (move win 0 0))
diff --git a/zhu-li b/zhu-li
deleted file mode 100755
index c95dc4a..0000000
--- a/zhu-li
+++ /dev/null
@@ -1,7 +0,0 @@
-#!/bin/sh
-
-# does the thing (build Sloth)
-
-hall build -x
-hall dist -x
-guix shell -D -f guix.scm -- autoreconf -vif && ./configure && make