diff --git a/emacs.el b/emacs.el
index 0de5f37..ec13914 100644
--- a/emacs.el
+++ b/emacs.el
@@ -1692,6 +1692,7 @@ IF OK-IF-ALREADY-EXISTS is true force download."
 
   (defun run-gauche ()
     "run gauche"
+    (interactive)
     (run-scheme gauche-program-name)
     )