diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/search.c | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/src/search.c b/src/search.c index c77f7b7c202..0ac7018d22b 100644 --- a/src/search.c +++ b/src/search.c | |||
| @@ -1504,7 +1504,7 @@ Use `store-match-data' to reinstate the data in this list.") | |||
| 1504 | XFASTINT (data[2 * i]) = start; | 1504 | XFASTINT (data[2 * i]) = start; |
| 1505 | XFASTINT (data[2 * i + 1]) = search_regs.end[i]; | 1505 | XFASTINT (data[2 * i + 1]) = search_regs.end[i]; |
| 1506 | } | 1506 | } |
| 1507 | else if (XTYPE (last_thing_searched) == Lisp_Buffer) | 1507 | else if (BUFFERP (last_thing_searched)) |
| 1508 | { | 1508 | { |
| 1509 | data[2 * i] = Fmake_marker (); | 1509 | data[2 * i] = Fmake_marker (); |
| 1510 | Fset_marker (data[2 * i], | 1510 | Fset_marker (data[2 * i], |
| @@ -1584,7 +1584,7 @@ LIST should have been created by calling `match-data' previously.") | |||
| 1584 | } | 1584 | } |
| 1585 | else | 1585 | else |
| 1586 | { | 1586 | { |
| 1587 | if (XTYPE (marker) == Lisp_Marker) | 1587 | if (MARKERP (marker)) |
| 1588 | { | 1588 | { |
| 1589 | if (XMARKER (marker)->buffer == 0) | 1589 | if (XMARKER (marker)->buffer == 0) |
| 1590 | XFASTINT (marker) = 0; | 1590 | XFASTINT (marker) = 0; |
| @@ -1598,8 +1598,7 @@ LIST should have been created by calling `match-data' previously.") | |||
| 1598 | list = Fcdr (list); | 1598 | list = Fcdr (list); |
| 1599 | 1599 | ||
| 1600 | marker = Fcar (list); | 1600 | marker = Fcar (list); |
| 1601 | if (XTYPE (marker) == Lisp_Marker | 1601 | if (MARKERP (marker) && XMARKER (marker)->buffer == 0) |
| 1602 | && XMARKER (marker)->buffer == 0) | ||
| 1603 | XFASTINT (marker) = 0; | 1602 | XFASTINT (marker) = 0; |
| 1604 | 1603 | ||
| 1605 | CHECK_NUMBER_COERCE_MARKER (marker, 0); | 1604 | CHECK_NUMBER_COERCE_MARKER (marker, 0); |