Parcourir la source

add advice to competing-read

pull/1/head
10sr il y a 11 ans
Parent
révision
5a2a544350
1 fichiers modifiés avec 5 ajouts et 0 suppressions
  1. +5
    -0
      emacs.el

+ 5
- 0
emacs.el Voir le fichier

@@ -2082,3 +2082,8 @@ this is test, does not rename files"
(ad-set-arg 0
(concat my-system-info
(ad-get-arg 0))))

(defadvice completing-read (before info-in-prompt activate)
(ad-set-arg 0
(concat my-system-info
(ad-get-arg 0))))

Chargement…
Annuler
Enregistrer