mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-27 10:54:40 +00:00
Code Issues Releases Activity

Make rng-xsd-check-pattern case sensitive (Bug#8516).

Browse Source 
* nxml/rng-xsd.el (rng-xsd-check-pattern): Use case-sensitive
matching.
This commit is contained in:
Yuanle Song 2011-05-22 15:46:47 -04:00 committed by Chong Yidong
parent f3d4e0a47d
commit 92a9cc651a
2 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ChangeLog
View File

@ -1,3 +1,8 @@
2011-05-22 Yuanle Song <sylecn@gmail.com>
* nxml/rng-xsd.el (rng-xsd-check-pattern): Use case-sensitive
matching (Bug#8516).
2011-01-22 Jari Aalto <jari.aalto@cante.net>
* vc/vc-dir.el (vc-default-dir-printer): Give edited tag a

2
lisp/nxml/rng-xsd.el
View File

@ -238,7 +238,7 @@ must be equal."
obj)))
(defun rng-xsd-check-pattern (str regexp convert &rest args)
(and (string-match regexp str)
(and (let ((case-fold-search nil)) (string-match regexp str))
(apply convert (cons str args))))