Vérifiez si le tampon Emacs actuel contient une chaîne

Question

J'ai un tampon ouvert dans emacs. Je veux une fonction qui retournera t si le tampon actuel contient la chaîne, sinon il renvoie nil.

(defun buffer-contains-substring (string) 
    ... 
) 

Answer 1

Ceci est prudent de ne pas changer où vous êtes, ou d'endommager les données de correspondance.

(defun buffer-contains-substring (string) 
    (save-excursion 
    (save-match-data 
     (goto-char (point-min)) 
     (search-forward string nil t))))