Mercurial > hg > xemacs-beta
comparison src/search.c @ 227:0e522484dd2a r20-5b12
Import from CVS: tag r20-5b12
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:12:37 +0200 |
parents | 850242ba4a81 |
children | 677f6a0ee643 |
comparison
equal
deleted
inserted
replaced
226:eea38c7ad7b4 | 227:0e522484dd2a |
---|---|
1921 if (!NILP (string)) | 1921 if (!NILP (string)) |
1922 { | 1922 { |
1923 Lisp_Object before, after; | 1923 Lisp_Object before, after; |
1924 | 1924 |
1925 speccount = specpdl_depth (); | 1925 speccount = specpdl_depth (); |
1926 before = Fsubstring (string, make_int (0), | 1926 before = Fsubstring (string, Qzero, make_int (search_regs.start[0])); |
1927 make_int (search_regs.start[0])); | |
1928 after = Fsubstring (string, make_int (search_regs.end[0]), Qnil); | 1927 after = Fsubstring (string, make_int (search_regs.end[0]), Qnil); |
1929 | 1928 |
1930 /* Do case substitution into NEWTEXT if desired. */ | 1929 /* Do case substitution into NEWTEXT if desired. */ |
1931 if (NILP (literal)) | 1930 if (NILP (literal)) |
1932 { | 1931 { |