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)))