Захватить текущую строку в буфере в виде строки в elisp

Как я могу собрать текущую строку буфера в виде строкового значения в elisp? я могу это сделать,

(let (p1 p2 myLine)
 (setq p1 (line-beginning-position) )
  (setq p2 (line-end-position) )
  (setq myLine (buffer-substring-no-properties p1 p2))
)

но все равно я могу сделать это в одной строке, поскольку

(with-current-buffer get-current-line)

Ответы

Ответ 1

Используйте thing-at-point:

(thing-at-point 'line t)

но обратите внимание, что это также возвращает любую новую строку в конце строки.