mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-03-15 03:11:54 -07:00
Code Issues Projects Releases Wiki Activity

Further IDNA tweaks

Browse source 
(idna-encode-string): Make idna-encode-string safe for
non-ASCII use.
This commit is contained in:
Lars Ingebrigtsen 2015-12-28 02:57:40 +01:00
parent bd892f0332
commit 1f591ca64f
1 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/net/idna.el
View file

@ -33,7 +33,9 @@
(let ((ascii (seq-filter (lambda (char)
(< char 128))
string)))
(concat "xn--" ascii "-" (idna-encode-complex (length ascii) string))))
(if (= (length ascii) (length string))
string
(concat "xn--" ascii "-" (idna-encode-complex (length ascii) string)))))
(defconst idna-initial-n 128)
(defconst idna-initial-bias 72)