summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2013-05-21 17:48:52 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2013-05-21 17:48:52 -0400
commitfc30d803f4325ebf67eee72a5a98100f01f6b182 (patch)
tree9c0d1e02511a25874c6979babb918a90fe30d063
parentc2d41179e1121ad6f6e61962a06c31229f7b8af7 (diff)
downloademacs-fc30d803f4325ebf67eee72a5a98100f01f6b182.tar.gz
* src/search.c (looking_at_1): Only set last_thing_searched if the match
changed the match-data. Fixes: debbugs:14281
-rw-r--r--src/ChangeLog13
-rw-r--r--src/search.c12
2 files changed, 15 insertions, 10 deletions
diff --git a/src/ChangeLog b/src/ChangeLog
index f9925abb9ef..919f94d0fbb 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2013-05-21 Barry OReilly <gundaetiapo@gmail.com>
+
+ * search.c (looking_at_1): Only set last_thing_searched if the match
+ changed the match-data (bug#14281).
+
2013-05-21 Dmitry Antipov <dmantipov@yandex.ru>
* xdisp.c (reseat_at_previous_visible_line_start):
@@ -8,8 +13,8 @@
* xfns.c (check_x_display_info): Don't use XINT for terminal object.
(Fx_display_pixel_width, Fx_display_pixel_height)
- (Fx_display_mm_width, Fx_display_mm_height): Mention
- `display-monitor-attributes-list' in docstrings.
+ (Fx_display_mm_width, Fx_display_mm_height):
+ Mention `display-monitor-attributes-list' in docstrings.
* nsfns.m (ns_get_screen): Remove function. All uses removed.
(check_ns_display_info): Sync with check_x_display_info in xfns.c.
@@ -25,8 +30,8 @@
(Fx_display_pixel_width, Fx_display_pixel_width): Return width or
height for all physical monitors as in X11.
- * nsterm.m (x_display_pixel_width, x_display_pixel_height): Return
- pixel width or height for all physical monitors as in X11.
+ * nsterm.m (x_display_pixel_width, x_display_pixel_height):
+ Return pixel width or height for all physical monitors as in X11.
2013-05-18 Paul Eggert <eggert@cs.ucla.edu>
diff --git a/src/search.c b/src/search.c
index ea36133deb7..8b4d39c7811 100644
--- a/src/search.c
+++ b/src/search.c
@@ -328,18 +328,18 @@ looking_at_1 (Lisp_Object string, bool posix)
val = (i >= 0 ? Qt : Qnil);
if (NILP (Vinhibit_changing_match_data) && i >= 0)
+ {
for (i = 0; i < search_regs.num_regs; i++)
if (search_regs.start[i] >= 0)
{
search_regs.start[i]
= BYTE_TO_CHAR (search_regs.start[i] + BEGV_BYTE);
- search_regs.end[i]
- = BYTE_TO_CHAR (search_regs.end[i] + BEGV_BYTE);
- }
-
- /* Set last_thing_searched only when match data is changed. */
- if (NILP (Vinhibit_changing_match_data))
+ search_regs.end[i]
+ = BYTE_TO_CHAR (search_regs.end[i] + BEGV_BYTE);
+ }
+ /* Set last_thing_searched only when match data is changed. */
XSETBUFFER (last_thing_searched, current_buffer);
+ }
return val;
}