Show current line highlighted in *Occur* buffer

* lisp/replace.el (list-matching-lines-current-line-face)
(list-matching-lines-jump-to-current-line): New user options.
(occur--orig-line, occur--orig-line-str): New variables.
(occur, occur-engine): Use them.
(occur--final-pos): New variable.
(occur-1): Use it.
(occur-engine): Idem.
Show the current line with 'list-matching-lines-current-line-face'.
Set point on the first matching line after the current one.
* etc/NEWS: Add entry for the new option.

1 files changed, 4 insertions, 0 deletions

diff --git a/doc/emacs/search.texi b/doc/emacs/search.texi
index 2a67619678b..a6cb1a4c9f5 100644
--- a/doc/emacs/search.texi
+++ b/doc/emacs/search.texi
@@ -1726,6 +1726,10 @@ face.  A numeric argument @var{n} specifies that @var{n} lines of
 context are to be displayed before and after each matching line.
 The default number of context lines is specified by the variable
 @code{list-matching-lines-default-context-lines}.
+When @code{list-matching-lines-jump-to-current-line} is non-nil,
+the current line is shown highlighted with face
+@code{list-matching-lines-current-line-face} and the point is set
+at the first match after such line.
 
 You can also run @kbd{M-s o} when an incremental search is active;
 this uses the current search string.