diff --git a/lisp/exwm-lib/exwm-aux/exwm-startup.el b/lisp/exwm-lib/exwm-aux/exwm-startup.el
index f74ab2c..0c31fcd 100644
--- a/lisp/exwm-lib/exwm-aux/exwm-startup.el
+++ b/lisp/exwm-lib/exwm-aux/exwm-startup.el
@@ -46,6 +46,7 @@
       (start-process-shell-command (file-name-nondirectory program) nil program))))
 
 (defun call-startup-programs ()
+  (interactive)
   (start-minimum-programs)
   (when (y-or-n-p "Run startup programs? ")
     (dolist (program exwm-startup-programs)