elisp编写显示本buffer最初60个字符

[yinxiuqu]

(defun show-first-60-chars ()
  "Print the first 60 characters of the buffer."
  (interactive)
  (save-restriction
    (widen)
    (save-excursion
      (buffer-substring (point-min) (+ (point-min) 60)))))

这个函数运行时什么返回都没有，怎么修改？

[Kinney]

@yinxiuqu

(defun show-first-60-chars ()
  "Print the first 60 characters of the buffer."
  (interactive)
  (save-restriction
    (widen)
    (save-excursion
      (buffer-substring (point-min) (+ (point-min) 60)))))

返回了呀，你是指在minibuffer没有打印吗？用 message 函数可以在minibuffer显示返回的字符串。

[yinxiuqu]

加个message函数搞定了，谢谢