emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/parsec aaf1c3e 03/13: Revert "Made char-equal compariso


From: Stefan Monnier
Subject: [elpa] externals/parsec aaf1c3e 03/13: Revert "Made char-equal comparison case-sensitive in parsec-ch function"
Date: Fri, 26 Mar 2021 22:45:55 -0400 (EDT)

branch: externals/parsec
commit aaf1c3e317c57541155583a5077c803a584a290f
Author: Justin Timmons <justinmtimmons@gmail.com>
Commit: Justin Timmons <justinmtimmons@gmail.com>

    Revert "Made char-equal comparison case-sensitive in parsec-ch function"
    
    This reverts commit b12a9c82b669842796c61812ac9aec22d0cf190f.
---
 parsec.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/parsec.el b/parsec.el
index efebc89..3ed3856 100644
--- a/parsec.el
+++ b/parsec.el
@@ -548,8 +548,7 @@
   "Parse a character CH."
   (let ((next-char (char-after)))
     (if (and (not (eobp))
-            (let ((case-fold-search nil)) ;; case sensitivity for char-equal
-              (char-equal next-char ch)))
+             (char-equal next-char ch))
         (progn (forward-char 1)
                (char-to-string ch))
       (parsec-stop :expected (char-to-string ch)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]