RosettaCodeData/Task/Rot-13/Emacs-Lisp/rot-13-1.l
2023-07-01 13:44:08 -04:00

5 lines
136 B
Common Lisp

(rot13-string "abc") ;=> "nop"
(with-temp-buffer
(insert "abc")
(rot13-region (point-min) (point-max))
(buffer-string)) ;=> "nop"