; Fix Wrong type argument: number-or-marker-p, (4) in cycle-spacing

diff --git a/lisp/simple.el b/lisp/simple.el
index ccf696901bdc276bb65f64c50592f8e0e504de3e..71c99a442dfd69d77bd0e2e496ba51f7dd29d04f 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -1295,8 +1295,8 @@ doing any other command before the next \\[cycle-spacing]."
                               ((eq '- arg) '-)
                               (t context-n)))
                    (numeric-n (prefix-numeric-value actual-n))
-                   (include-newlines (and actual-n
-                                          (or (eq actual-n '-)
+                   (include-newlines (or (eq actual-n '-)
+                                         (and (integerp actual-n)
                                               (< actual-n 0)))))
               (cond
                ((eq actual-action 'just-one-space)