branch: master commit a1e135af6ffd1018ba86e2dd2f3dbc630674a63e Author: Leo Perrin <leoper...@picarresursix.fr> Commit: Alexey Veretennikov <alexey.veretenni...@gmail.com>
Added loccur-no-highlight function. --- loccur.el | 8 ++++++++ 1 files changed, 8 insertions(+), 0 deletions(-) diff --git a/loccur.el b/loccur.el index 1dc93d8..e374f6e 100644 --- a/loccur.el +++ b/loccur.el @@ -274,6 +274,14 @@ containing match" (forward-line 1)) (setq lines (nreverse lines))))) +(defun loccur-no-highlight(regex) + "Displays only the lines matching a given regex with no +highlithing of any part of the lines." + (let (old-highlighting) + (setq old-highlighting loccur-highlight-matching-regexp) + (setq loccur-highlight-matching-regexp nil) + (loccur regex) + (setq loccur-highlight-matching-regexp old-highlighting))) (provide 'loccur)