Mercurial > hgrepos > hgweb.cgi > yatex
changeset 573:9e07513fc2ef dev
Do not escape URL when it has triple `%XX's
author | HIROSE Yuuji <yuuji@gentei.org> |
---|---|
date | Wed, 11 Sep 2019 09:27:10 +0900 |
parents | 714f3527b4a1 |
children | 80692d8b8828 |
files | yahtml.el |
diffstat | 1 files changed, 4 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/yahtml.el Sat May 25 14:48:03 2019 +0900 +++ b/yahtml.el Wed Sep 11 09:27:10 2019 +0900 @@ -1,8 +1,8 @@ ;;; yahtml.el --- Yet Another HTML mode -*- coding: sjis -*- -;;; (c) 1994-2017 by HIROSE Yuuji [yuuji(@)yatex.org] +;;; (c) 1994-2019 by HIROSE Yuuji [yuuji(@)yatex.org] ;;; $Id$ -(defconst yahtml-revision-number "1.80" +(defconst yahtml-revision-number "1.80.1" "Revision number of running yahtml.el") ;;; Commentary: @@ -1084,6 +1084,8 @@ (ask (eq yahtml-escape-chars 'ask))) (cond ((null yahtml-escape-chars) str) + ((string-match "%[0-9A-F][0-9A-F]%[0-9A-F][0-9A-F]%[0-9A-F][0-9A-F]" str) + str) (t (while (and (string< "" str) (setq p (string-match yahtml-unsafe-chars-regexp str)))