emacs - 带有破折号但没有空格的单词的最简单正则表达式

Question

当目标是只选择这个但不选择空格时，选择“words-with-dashes-but-no-whitespace”之类的文本最方便的正则表达式是什么？

我用过(search-forward-regexp "\\s-")，但我相信这会更容易。

我主要希望在点处选择包含破折号的单词，并使用 buffer-substring-no-properties 将其设置为变量。

编辑： artscan在评论中给出了答案。使用 (current-word) 解决了这个问题。

但现在这个：如何删除这个(current-word)包括破折号？

我用至今(delete-backward-char (string-width (current-word))

Answer 1

要回答第二个问题，请尝试：

(let ((bounds (bounds-of-thing-at-point 'symbol)))
   (when bounds
     (delete-region (car bounds) (cdr bounds))))

它对点位置的依赖比(delete-backward-char ...).