diff --git a/collects/planet/private/command.rkt b/collects/planet/private/command.rkt
index e41386552c..dad9767c20 100644
--- a/collects/planet/private/command.rkt
+++ b/collects/planet/private/command.rkt
@@ -112,7 +112,7 @@
 ;; are eaten in the process.
 (define (wrap-to-count str n)
   (cond
-    [(< (string-length str) n) (list str)]
+    [(<= (string-length str) n) (list str)]
     [(regexp-match-positions #rx"\n" str 0 n)
      =>
      (λ (posn)