home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #26 / NN_1992_26.iso / spool / gnu / emacs / bug / 1463 < prev    next >
Encoding:
Text File  |  1992-11-10  |  1.3 KB  |  43 lines
  1. Newsgroups: gnu.emacs.bug
  2. Path: sparky!uunet!convex!linac!pacific.mps.ohio-state.edu!cis.ohio-state.edu!sys.PTg.sony.co.JP!enami
  3. From: enami@sys.PTg.sony.co.JP (enami tsugutomo)
  4. Subject: (string-match "[A-[]" "A") fails when case-fold-search
  5. Message-ID: <9211100619.AA05172@kitt.sys.ptg.sony.co.jp>
  6. Sender: gnulists@ai.mit.edu
  7. Organization: GNUs Not Usenet
  8. Distribution: gnu
  9. Date: Tue, 10 Nov 1992 06:19:02 GMT
  10. Approved: bug-gnu-emacs@prep.ai.mit.edu
  11. Lines: 30
  12.  
  13. In GNU Emacs 18.59.0 of Tue Nov 10 1992 on kitt (berkeley-unix)
  14.  
  15. (string-match "[A-[]" "A") fails when case-fold-search is t.  This is
  16. because bug in regex.c.  PATFECTH does implecit translate, so we must
  17. use PATFETCH_RAW.  Here is a patch.
  18.  
  19. --enami.
  20. ===================================================================
  21. RCS file: RCS/regex.c,v
  22. retrieving revision 1.1
  23. diff -u -r1.1 regex.c
  24. --- 1.1    1992/11/10 04:55:00
  25. +++ regex.c    1992/11/10 04:55:51
  26. @@ -404,12 +404,12 @@
  27.        /* Read in characters and ranges, setting map bits */
  28.        while (1)
  29.          {
  30. -          PATFETCH (c);
  31. +          PATFETCH_RAW (c);
  32.            if (c == ']' && p != p1 + 1) break;
  33.            if (*p == '-' && p[1] != ']')
  34.          {
  35. -          PATFETCH (c1);
  36. -          PATFETCH (c1);
  37. +          PATFETCH_RAW (c1);
  38. +          PATFETCH_RAW (c1);
  39.            if (translate)
  40.              while (c <= c1)
  41.                {
  42.  
  43.