comment remplacer les fonctions dans Emacs Lisp pour le mode spécifique?

Question

Comment puis-je remplacer la fonction emacs avec ma propre implémentation pour un mode spécifique? exemple/référence serait grand

Merci

Answer 1

Cela semble être une chose étrange à vouloir faire, mais vous pouvez le faire en conseillant la fonction, je suppose. Exemple:

(defadvice * (around ultimate-answer activate) 
    (if (and (eq major-mode 'html-mode) (equal (ad-get-args 0) '(6 9))) 
     (setq ad-return-value 42) 
    ad-do-it)) 

Après avoir évalué cet avis, la fonction * retourne 42 si on lui donne les deux arguments 6 et 9, mais seulement en mode HTML.