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 diff
     1.1 --- a/yahtml.el	Sat May 25 14:48:03 2019 +0900
     1.2 +++ b/yahtml.el	Wed Sep 11 09:27:10 2019 +0900
     1.3 @@ -1,8 +1,8 @@
     1.4  ;;; yahtml.el --- Yet Another HTML mode -*- coding: sjis -*-
     1.5 -;;; (c) 1994-2017 by HIROSE Yuuji [yuuji(@)yatex.org]
     1.6 +;;; (c) 1994-2019 by HIROSE Yuuji [yuuji(@)yatex.org]
     1.7  ;;; $Id$
     1.8  
     1.9 -(defconst yahtml-revision-number "1.80"
    1.10 +(defconst yahtml-revision-number "1.80.1"
    1.11    "Revision number of running yahtml.el")
    1.12  
    1.13  ;;; Commentary:
    1.14 @@ -1084,6 +1084,8 @@
    1.15  	(ask (eq yahtml-escape-chars 'ask)))
    1.16      (cond
    1.17       ((null yahtml-escape-chars) str)
    1.18 +     ((string-match "%[0-9A-F][0-9A-F]%[0-9A-F][0-9A-F]%[0-9A-F][0-9A-F]" str)
    1.19 +      str)
    1.20       (t
    1.21        (while (and (string< "" str)
    1.22  		  (setq p (string-match yahtml-unsafe-chars-regexp str)))