diff options
| -rw-r--r-- | lisp/emacs-lisp/ring.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/ring.el b/lisp/emacs-lisp/ring.el index 69b1d1995ac..95b993001fa 100644 --- a/lisp/emacs-lisp/ring.el +++ b/lisp/emacs-lisp/ring.el | |||
| @@ -84,8 +84,8 @@ item to make room." | |||
| 84 | (set-car (cdr ring) tl))))) | 84 | (set-car (cdr ring) tl))))) |
| 85 | 85 | ||
| 86 | (defun comint-mod (n m) | 86 | (defun comint-mod (n m) |
| 87 | "Returns N mod M. M is positive. Answer is guaranteed to be non-negative, | 87 | "Returns N mod M. M is positive. |
| 88 | and less than m." | 88 | Answer is guaranteed to be non-negative, and less than m." |
| 89 | (let ((n (% n m))) | 89 | (let ((n (% n m))) |
| 90 | (if (>= n 0) n | 90 | (if (>= n 0) n |
| 91 | (+ n | 91 | (+ n |