🚀 go-pugleaf

* Gilles Pion <nosuchuser@nosuchdomain.com> in fr.comp.applications.emacs:
> Tiens, puisqu'il semble y avoir des personnes comp�tentes par ici,
> est-ce que quelqu'un saurait r�pondre � cette question que j'ai pos�e
> il y a peu sur superuser.com sans avoir de r�ponse jusqu'ici:
> http://superuser.com/questions/583552/prevent-emacs-shell-mode-to-apply-string-face-to-output-lines-containing-a-colon

Ben des fois, juste lancer un grep sur une sous-partie du code lisp
d'Emacs, �a peut aider... Pas besoin de magie noire :)

En cherchant font-lock-string-face dans shell.el, je trouve ceci :

(defvar shell-font-lock-keywords
  '(("[ \t]\\([+-][^ \t\n]+\\)" 1 font-lock-comment-face)
    ("^[^ \t\n]+:.*" . font-lock-string-face)
    ("^\\[[1-9][0-9]*\\]" . font-lock-string-face))
  "Additional expressions to highlight in Shell mode.")

et donc en adaptant �a � tes besoins, cela devrait fonctionner... Je
pense que tu peux soit modifier l'une de ces expressions r�guli�res, ou
en ajouter une qui �vitera string-face dans les cas que tu souhaites.

-- 
DW

Bonjour,

Gilles Pion <nosuchuser@nosuchdomain.com> writes:

> Tiens, puisqu'il semble y avoir des personnes compétentes par ici, est-ce que
> quelqu'un saurait répondre à cette question que j'ai posée il y a peu sur
> superuser.com sans avoir de réponse jusqu'ici:
> http://superuser.com/questions/583552/prevent-emacs-shell-mode-to-apply-string-face-to-output-lines-containing-a-colon

cf. shell-font-lock-keywords dans shell.el.

;;; dans shell.el, ne pas décorer les lignes du type "^foo: bar"
(setq local/unwanted-shell-font-lock-keywords-entry
      '("^[^ \t\n]+:.*" . font-lock-string-face))
(eval-after-load "shell"
  '(setq shell-font-lock-keywords
	 (delete local/unwanted-shell-font-lock-keywords-entry
		 shell-font-lock-keywords)))


Testé un peu trop vite pour être sûr que ça marche ©.

Et attention aux possibles futures modifications de cet élément de
shell-font-lock-keywords.

-- 
Jérémie Courrèges-Anglas
Empreinte PGP : 61DB D9A0 00A4 67CF 2A90  8961 6191 8FBF 06A1 1494

Ref: <5170d7e0$0$2401$426a34cc@news.free.fr> de Damien Wyart
>
>En cherchant font-lock-string-face dans shell.el, je trouve ceci :
>
>(defvar shell-font-lock-keywords
>  '(("[ \t]\\([+-][^ \t\n]+\\)" 1 font-lock-comment-face)
>    ("^[^ \t\n]+:.*" . font-lock-string-face)
>    ("^\\[[1-9][0-9]*\\]" . font-lock-string-face))
>  "Additional expressions to highlight in Shell mode.")
>
>et donc en adaptant �a � tes besoins, cela devrait fonctionner... Je
>pense que tu peux soit modifier l'une de ces expressions r�guli�res, ou
>en ajouter une qui �vitera string-face dans les cas que tu souhaites.

Le pire c'est que j'avais trouv� aussi ce bout de code, mais apr�s avoir
red�fini cette variable sans le deuxi�me �l�ment j'avais toujours la
colorisation.

Je viens de m'apercevoir que la modif ne s'applique qu'aux buffers shells
ouverts *apres* avoir modifi� la variable.


-- 
Gilles Pion

Ref: <87k3nz3vm1.fsf@moo.wxcvbn.org> de J�r�mie Courr�ges-Anglas
>
>cf. shell-font-lock-keywords dans shell.el.
>
>;;; dans shell.el, ne pas d�corer les lignes du type "^foo: bar"
>(setq local/unwanted-shell-font-lock-keywords-entry
>      '("^[^ \t\n]+:.*" . font-lock-string-face))
>(eval-after-load "shell"
>  '(setq shell-font-lock-keywords
>	 (delete local/unwanted-shell-font-lock-keywords-entry
>		 shell-font-lock-keywords)))
>
>
>Test� un peu trop vite pour �tre s�r que �a marche �.
>

Ok �a marche apr�s avoir utilis� un autre nom que
"local/unwanted-shell-font-lock-keywords-entry" (quelle est cette sorte de elisp
qui accepte un "/" dans les symboles ?)


-- 
Gilles Pion

Gilles Pion <nosuchuser@nosuchdomain.com> writes:

> Ref: <87k3nz3vm1.fsf@moo.wxcvbn.org> de Jérémie Courrèges-Anglas
>>
>>cf. shell-font-lock-keywords dans shell.el.
>>
>>;;; dans shell.el, ne pas décorer les lignes du type "^foo: bar"
>>(setq local/unwanted-shell-font-lock-keywords-entry
>>      '("^[^ \t\n]+:.*" . font-lock-string-face))
>>(eval-after-load "shell"
>>  '(setq shell-font-lock-keywords
>>	 (delete local/unwanted-shell-font-lock-keywords-entry
>>		 shell-font-lock-keywords)))
>>
>>
>>Testé un peu trop vite pour être sûr que ça marche ©.
>>
>
> Ok ça marche après avoir utilisé un autre nom que
> "local/unwanted-shell-font-lock-keywords-entry" (quelle est cette sorte de elisp
> qui accepte un "/" dans les symboles ?)

Oh bah Emacs Lisp ; j'utilise un préfixe jca/ pour pas mal de trucs dans
ma conf, cf. (info "(elisp) Symbol Type") pour les caractères acceptés
dans un nom de symbole.

-- 
Jérémie Courrèges-Anglas
Empreinte PGP : 61DB D9A0 00A4 67CF 2A90  8961 6191 8FBF 06A1 1494

Ref: <87fvym41lu.fsf@moo.wxcvbn.org> de J�r�mie Courr�ges-Anglas
>> Ok �a marche apr�s avoir utilis� un autre nom que
>> "local/unwanted-shell-font-lock-keywords-entry" (quelle est cette sorte de elisp
>> qui accepte un "/" dans les symboles ?)
>
>Oh bah Emacs Lisp�; j'utilise un pr�fixe jca/ pour pas mal de trucs dans
>ma conf, cf. (info "(elisp) Symbol Type") pour les caract�res accept�s
>dans un nom de symbole.

Tiens, pour ma part j'utilise "my-" en pr�fixe pour *exactement* le m�me usage!

Mais et en effet �a marche, je devais avoir un autre typo dans mon source
(pourtant me semblait bien avoir juste fait copier/coller), j'ai cru que �a
venait de l� et j'ai corrig� le nom de variable.

Reste qu'il me serait int�ressant de comprendre la raison d'avoir fait ces choix
par d�faut pour la colorisation du stdout dans les buffers shell?

Pour cette regexp particuli�re par exemple, �a fontifie comme "string" les
lignes commen�ant par une suite de caract�res "non-espace" suivis d'un ":". 


-- 
Gilles Pion

Gilles Pion <nosuchuser@nosuchdomain.com> writes:

[...]

> Reste qu'il me serait intéressant de comprendre la raison d'avoir fait ces choix
> par défaut pour la colorisation du stdout dans les buffers shell?

Ah voui, j'ai essayé de chercher ce matin-là, mais j'ai abandonné après
une dizaine de minutes sans réponse de la part de git (le dépôt d'emacs
est assez gros et complexe).

> Pour cette regexp particulière par exemple, ça fontifie comme "string" les
> lignes commençant par une suite de caractères "non-espace" suivis d'un ":". 

Je suppose que c'est pour matcher les warnings des compilateurs et autres
grep -l, une version canada dry de compilation-mode, en somme.

-- 
Jérémie Courrèges-Anglas
Empreinte PGP : 61DB D9A0 00A4 67CF 2A90  8961 6191 8FBF 06A1 1494

Le samedi 20 avril 2013 09:18:56 UTC+2, Gilles Pion a écrit :

> Reste qu'il me serait intéressant de comprendre la raison d'avoir fait
> ces choix par défaut pour la colorisation du stdout dans les buffers shell?
> 
> Pour cette regexp particulière par exemple, ça fontifie comme "string" les
> lignes commençant par une suite de caractères "non-espace" suivis d'un ":". 


Pour moi, ça ressemble furieusement à la sortie d'un "grep truc *" où les noms des fichiers matchant sont suivis de ':'

Ref: <17891abf-3558-43d7-ae44-f121a1d0edda@googlegroups.com> de
duthen.cnv@gmail.com
>> 
>> Pour cette regexp particuli�re par exemple, �a fontifie comme "string" les
>> lignes commen�ant par une suite de caract�res "non-espace" suivis d'un ":". 
>
>
>Pour moi, �a ressemble furieusement � la sortie d'un "grep truc *" o� les noms des fichiers matchant sont suivis de ':'

En effet, mais cette regexp matche aussi bien d'autre choses et je pense que
pour faire un grep dans emacs on va plut�t utiliser la function d�finie dans
grep.el comme l'a �voqu� entre les lignes jca.
-- 
Gilles Pion