Commit 7d6d84c1 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(rmail-encode-string): Make sure mask value is

positive; (emacs-pid) returns a negative number on Windows 9x
which causes odd behaviour.
parent 7f8f0e67
......@@ -3332,6 +3332,7 @@ second-lowest-byte with the second character of the string, etc.,
restarting at the lowest byte of the mask whenever it runs out.
Returns the encoded string. Calling the function again with an
encoded string (and the same mask) will decode the string."
(setq mask (abs mask)) ; doesn't work if negative
(let* ((string-vector (string-to-vector string)) (i 0)
(len (length string-vector)) (curmask mask) charmask)
(while (< i len)
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