diff --git a/scsh/let-opt.scm b/scsh/let-opt.scm
index d334893..0d7af88 100644
--- a/scsh/let-opt.scm
+++ b/scsh/let-opt.scm
@@ -521,7 +521,7 @@
   (syntax-rules ()
     ((let-optionals* arg (opt-clause ...) body ...)
      (let ((rest arg))
-       (let-optionals* rest (opt-clause ...) body ...)))))
+       (%let-optionals* rest (opt-clause ...) body ...)))))
 
 ;;; The arg-list expression *must* be a variable.
 ;;; (Or must be side-effect-free, in any event.)