检查当前的Emacs缓冲区是否包含字符串

Question

我有一个在emacs中打开的缓冲区。如果当前缓冲区包含字符串，我想要一个返回t的函数，否则返回nil。

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

Answer 1

这是小心不要改变你在哪里，或损坏任何匹配数据。

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