所以,我正在尝试在Elisp中创建一个通用的网络搜索函数:
(defun look-up-base (url-formatter)
(let (search url)
(setq search(thing-at-point 'symbol))
(setq url (url-formatter search))
(browse-url url))
)
这个函数将仅获取光标下的单词,使用url格式化程序为Web搜索格式化单词,然后在Web浏览器中打开搜索字符串以执行搜索。
接下来,我尝试实现一个函数,该函数将使用前一个函数作为基础,在Google中搜索光标下的单词。
(defun google ()
(interactive)
(look-up-base (lambda (search) (concat "http://www.google.com/search?q=" search))))
如果我尝试评估它,Emacs不会抱怨,但是当我尝试使用它时,Emacs会给我这个错误消息:
setq: Symbol's function definition is void: url-formatter
我不知道为什么会发生这种情况。我无法看出函数有什么错,我做错了什么吗?