Plutôt que de demander ce que fait Emacs, on gagnerait du temps à chercher
ce qu'il ne fait pas.
Il ne fait pas la vaisselle ou le café, par exemple.
Quoi que, il se trouvera bien un bidouilleur pour piloter un interrupteur
pour cafetière avec Emacs !
:-))
C'est le fil précédent sur Emacs et Palm qui m'a inspiré cette question.
Dominique
Merci, mais ma question etait "Comment profiter d'ansi-color dans un tampon normal, par ex. en mode fundamental, sans interpreteur de commande ?".
C-x h M-: (ansi-color-apply-on-region (region-beginning) (region-end)) RET
(Adapter pour en faire un truc utilisable.)
-- Romain Francoise | They're nothing but cold it's a miracle -- http://orebokech.com/ | little demons.
Daniel Déchelotte
Romain Francoise a écrit :
| C-x h M-: (ansi-color-apply-on-region (region-beginning) (region-end))
Aah. J'imagine que c'est parce que la fonction n'est pas "interactive" que l'on n'y a pas acces depuis M-x ... .
| (Adapter pour en faire un truc utilisable.)
C'est a ma portee :
(defun colorize-buffer () "Interprete les codes ASCII de couleur dans ce buffer." (interactive) (mark-whole-buffer) (ansi-color-apply-on-region (region-beginning) (region-end)))
Ce n'est pas parfait, loin s'en faut (perd la position dans le buffer, perd la region actuelle, fait croire a Emacs que le buffer a ete modifie, ... Si vous voulez ameliorer, ne vous genez pas) mais le fichier redevient lisible. Merci a vous trois.
-- Daniel Déchelotte http://yo.dan.free.fr/
Romain Francoise <romain@orebokech.com> a écrit :
| C-x h M-: (ansi-color-apply-on-region (region-beginning) (region-end))
Aah. J'imagine que c'est parce que la fonction n'est pas "interactive" que
l'on n'y a pas acces depuis M-x ... .
| (Adapter pour en faire un truc utilisable.)
C'est a ma portee :
(defun colorize-buffer ()
"Interprete les codes ASCII de couleur dans ce buffer."
(interactive)
(mark-whole-buffer)
(ansi-color-apply-on-region (region-beginning) (region-end)))
Ce n'est pas parfait, loin s'en faut (perd la position dans le buffer, perd
la region actuelle, fait croire a Emacs que le buffer a ete modifie, ... Si
vous voulez ameliorer, ne vous genez pas) mais le fichier redevient lisible.
Merci a vous trois.
| C-x h M-: (ansi-color-apply-on-region (region-beginning) (region-end))
Aah. J'imagine que c'est parce que la fonction n'est pas "interactive" que l'on n'y a pas acces depuis M-x ... .
| (Adapter pour en faire un truc utilisable.)
C'est a ma portee :
(defun colorize-buffer () "Interprete les codes ASCII de couleur dans ce buffer." (interactive) (mark-whole-buffer) (ansi-color-apply-on-region (region-beginning) (region-end)))
Ce n'est pas parfait, loin s'en faut (perd la position dans le buffer, perd la region actuelle, fait croire a Emacs que le buffer a ete modifie, ... Si vous voulez ameliorer, ne vous genez pas) mais le fichier redevient lisible. Merci a vous trois.
-- Daniel Déchelotte http://yo.dan.free.fr/
Pascal Bourguignon
Daniel Déchelotte writes:
Romain Francoise a écrit :
| C-x h M-: (ansi-color-apply-on-region (region-beginning) (region-end))
Aah. J'imagine que c'est parce que la fonction n'est pas "interactive" que l'on n'y a pas acces depuis M-x ... .
| (Adapter pour en faire un truc utilisable.)
C'est a ma portee :
(defun colorize-buffer () "Interprete les codes ASCII de couleur dans ce buffer." (interactive) (mark-whole-buffer) (ansi-color-apply-on-region (region-beginning) (region-end)))
Ce n'est pas parfait, loin s'en faut (perd la position dans le buffer, pe rd la region actuelle, fait croire a Emacs que le buffer a ete modifie, ... Si vous voulez ameliorer, ne vous genez pas) mais le fichier redevient lisib le. Merci a vous trois.
On peut éviter d'utiliser mark-whole-buffer en utilisant point-min et point-max. (Sinon, il y a save-excursion).
(defun colorize-buffer () "Interprete les codes ASCII de couleur dans ce buffer." (interactive) (let ((modified (buffer-modified-p))) (ansi-color-apply-on-region (point-min) (point-max)) (set-buffer-modified-p modified)))
-- __Pascal Bourguignon__
Daniel Déchelotte <maitre_yodan@fr.club-internet.invalid> writes:
Romain Francoise <romain@orebokech.com> a écrit :
| C-x h M-: (ansi-color-apply-on-region (region-beginning) (region-end))
Aah. J'imagine que c'est parce que la fonction n'est pas "interactive" que
l'on n'y a pas acces depuis M-x ... .
| (Adapter pour en faire un truc utilisable.)
C'est a ma portee :
(defun colorize-buffer ()
"Interprete les codes ASCII de couleur dans ce buffer."
(interactive)
(mark-whole-buffer)
(ansi-color-apply-on-region (region-beginning) (region-end)))
Ce n'est pas parfait, loin s'en faut (perd la position dans le buffer, pe rd
la region actuelle, fait croire a Emacs que le buffer a ete modifie, ... Si
vous voulez ameliorer, ne vous genez pas) mais le fichier redevient lisib le.
Merci a vous trois.
On peut éviter d'utiliser mark-whole-buffer en utilisant point-min et
point-max. (Sinon, il y a save-excursion).
(defun colorize-buffer ()
"Interprete les codes ASCII de couleur dans ce buffer."
(interactive)
(let ((modified (buffer-modified-p)))
(ansi-color-apply-on-region (point-min) (point-max))
(set-buffer-modified-p modified)))
| C-x h M-: (ansi-color-apply-on-region (region-beginning) (region-end))
Aah. J'imagine que c'est parce que la fonction n'est pas "interactive" que l'on n'y a pas acces depuis M-x ... .
| (Adapter pour en faire un truc utilisable.)
C'est a ma portee :
(defun colorize-buffer () "Interprete les codes ASCII de couleur dans ce buffer." (interactive) (mark-whole-buffer) (ansi-color-apply-on-region (region-beginning) (region-end)))
Ce n'est pas parfait, loin s'en faut (perd la position dans le buffer, pe rd la region actuelle, fait croire a Emacs que le buffer a ete modifie, ... Si vous voulez ameliorer, ne vous genez pas) mais le fichier redevient lisib le. Merci a vous trois.
On peut éviter d'utiliser mark-whole-buffer en utilisant point-min et point-max. (Sinon, il y a save-excursion).
(defun colorize-buffer () "Interprete les codes ASCII de couleur dans ce buffer." (interactive) (let ((modified (buffer-modified-p))) (ansi-color-apply-on-region (point-min) (point-max)) (set-buffer-modified-p modified)))
