diff --git a/scsh/scsh.scm b/scsh/scsh.scm
index 05e5045..e2bcebb 100644
--- a/scsh/scsh.scm
+++ b/scsh/scsh.scm
@@ -622,7 +622,7 @@
       (arg* arglist n)))
 
 (define (argv n . maybe-default)
-  (apply arg (cdr %command-line) n maybe-default))
+  (apply arg %command-line (+ n 1) maybe-default))
 
 (define (command-line) (append %command-line '()))