diff options
author | Jim Porter <jporterbugs@gmail.com> | 2021-05-12 10:47:07 +0200 |
---|---|---|
committer | Michael Albinus <michael.albinus@gmx.de> | 2021-05-12 10:47:07 +0200 |
commit | d2034296a906bf444472c02b958dba21cbaae762 (patch) | |
tree | 32f409438eb7cfa8593d349a3a6aefc2853920ec /lisp | |
parent | b41f39d22cdb921fe88311f4fd113cbb9c2f0c76 (diff) | |
download | emacs-d2034296a906bf444472c02b958dba21cbaae762.tar.gz emacs-d2034296a906bf444472c02b958dba21cbaae762.tar.bz2 emacs-d2034296a906bf444472c02b958dba21cbaae762.zip |
Abbreviate rgrep command on MS Windows (bug#48302)
* lisp/progmodes/grep.el (grep-mode-font-lock-keywords):
Adapt regexp to match MS Windows-style shell-quoting.
* test/lisp/progmodes/grep-tests.el: New file.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/progmodes/grep.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/progmodes/grep.el b/lisp/progmodes/grep.el index e9fbcbbfcd0..80c3e7840f0 100644 --- a/lisp/progmodes/grep.el +++ b/lisp/progmodes/grep.el @@ -473,7 +473,7 @@ buffer `default-directory'." (1 (if (eq (char-after (match-beginning 1)) ?\0) `(face nil display ,(match-string 2))))) ;; Hide excessive part of rgrep command - ("^find \\(\\. -type d .*\\\\)\\)" + ("^find \\(\\. -type d .*\\(?:\\\\)\\|\")\"\\)\\)" (1 (if grep-find-abbreviate grep-find-abbreviate-properties '(face nil abbreviated-command t)))) ;; Hide excessive part of lgrep command |