grep.el and `function-name' ?

grep.el and `function-name' ?

[Michaël Cadilhac]

[-- Attachment #1.1: Type: text/plain, Size: 1176 bytes --]


Hi!

In the font-locking mechanism of grep.el, the following appears :

(defvar grep-mode-font-lock-keywords
   '(;; Command output lines.
     ("^\\([A-Za-z_0-9/\.+-]+\\)[ \t]*:" 1 font-lock-function-name-face)

I don't see what this regexp is meant to match. In fact, it doesn't
give a good result with a file like:

/<<<<<<<<<<<<<<<<<<
(make-network-process
   :name "--"
   :family 'local
   :buffer nil
   :service (expand-file-name file))
/>>>>>>>>>>>>>>>>>>>

With a M-x grep RET grep -nH -e expand FILE -B1 RET:

/<<<<<<<<<<<<<<<<<<
grep -nH -e expand /delete-daily/* -B1
/delete-daily/tst-4-   :buffer nil                          <= Here.
/delete-daily/tst:5:   :service (expand-file-name file))
/>>>>>>>>>>>>>>>>>>>

Maybe it's just too minor.

-- 
/!\ My mail address changed, please update your files accordingly.
 |      Michaël `Micha' Cadilhac   |  Un certain Blaise Pascal              |
 |         Epita/LRDE Promo 2007   |    etc... etc...                       |
 |  http://michael.cadilhac.name   |  -- Prévert (Les paris stupides)       |
 `--  -   JID: micha@amessage.be --'                                   -  --'

[-- Attachment #1.2: Type: application/pgp-signature, Size: 188 bytes --]

[-- Attachment #2: Type: text/plain, Size: 142 bytes --]

_______________________________________________
Emacs-devel mailing list
Emacs-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-devel

Re: grep.el and `function-name' ?

[Juri Linkov]

> In the font-locking mechanism of grep.el, the following appears :
>
> (defvar grep-mode-font-lock-keywords
>    '(;; Command output lines.
>      ("^\\([A-Za-z_0-9/\.+-]+\\)[ \t]*:" 1 font-lock-function-name-face)
>
> I don't see what this regexp is meant to match.

It matches lines like

grep: ../info/dirinfo: No such file or directory

(You can see how it is highlighted in etc/grep.txt)

-- 
Juri Linkov
http://www.jurta.org/emacs/