diff --git a/sloth/editor.scm b/sloth/editor.scm
index f55b024..1b11869 100644
--- a/sloth/editor.scm
+++ b/sloth/editor.scm
@@ -16,7 +16,7 @@
   (cury #:init-value 0 #:accessor cury)
   (lines-scrolled #:init-value 0 #:accessor lines-scrolled))
 
-(define* (start-loop frontend #:optional (file #f))
+(define* (start-loop frontend #:optional file)
   (define state (make <sloth-state>
                   #:frontend frontend))
   (find-file state file)
@@ -114,7 +114,7 @@
   (list-set! buf y
              (string-delete-kth (list-ref buf y) x)))
 
-(define* (move-cursor state #:key (x #f) (y #f) (relative? #f))
+(define* (move-cursor state #:key x y relative?)
   (if x (set! (curx state)
               (if relative?
                   (+ x (curx state))