Commit adb47462 authored by Paul Eggert's avatar Paul Eggert
Browse files

Remove, since floor and mod

(caesar-region): Replace `%' by `mod' and simplify.
parent 9cd77daa
......@@ -929,8 +929,7 @@ FName to link to message: ")
(list (prefix-numeric-value current-prefix-arg))
(list nil)))
(cond ((not (numberp n)) (setq n 13))
((< n 0) (setq n (- 26 (% (- n) 26))))
(t (setq n (% n 26)))) ;canonicalize N
(t (setq n (mod n 26)))) ;canonicalize N
(if (not (zerop n)) ; no action needed for a rot of 0
(progn
(if (or (not (boundp 'caesar-translate-table))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment