# HG changeset patch
# User HIROSE Yuuji <yuuji@gentei.org>
# Date 1568161630 -32400
# Node ID 9e07513fc2efd1e60e00bff1832ca77ec644166c
# Parent  714f3527b4a16daf7a811dcc7b344ac989064f52
Do not escape URL when it has triple `%XX's

diff -r 714f3527b4a1 -r 9e07513fc2ef yahtml.el
--- 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)))