Commit 50ff2e06 authored by Chong Yidong's avatar Chong Yidong
Browse files

* replace.el (occur-engine): Avoid infloop.

Fixes: debbugs:7593
parent 83c60f60
2013-12-18 Chong Yidong <cyd@gnu.org>
* replace.el (occur-engine): Avoid infloop (Bug#7593).
2013-12-18 Kazuhiro Ito <kzhr@d1.dion.ne.jp> (tiny change)
* progmodes/make-mode.el (makefile-fill-paragraph): Fix infloop
......
......@@ -1457,7 +1457,9 @@ See also `multi-occur'."
;; so as to override faces copied from the buffer.
`(face ,match-face)))
curstring)
(setq start (match-end 0))))
;; Avoid infloop (Bug#7593).
(let ((end (match-end 0)))
(setq start (if (= start end) (1+ start) end)))))
;; Generate the string to insert for this match
(let* ((match-prefix
;; Using 7 digits aligns tabs properly.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment