shigemk2 https://blog.hatena.ne.jp/shigemk2/ by shigemk2 https://www.shigemk2.com/ Emacs Lisp save-excursionを使う。 (defun print-word-at-eol-old () "カーソルを動かさずに、行末の単語を表示する。従来版" (interactive) (let ((orig-pt (point))) ;; 最初のポイントを明示する (end-of-line) (message "%s" (word-at-point)) (goto-char orig-pt))) (defun print-word-at-eol () "カーソルを動かさずに、行末の単語を表示する。従来版" (interactive) (save-excursion; カーソルをもとに戻すスペ… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fwww.shigemk2.com%2Fentry%2F20120410%2F1333996765" title="一時的な状態変更 - by shigemk2" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> http://ecx.images-amazon.com/images/I/51Wg39T8KAL.jpg Hatena Blog https://hatena.blog 2012-04-10 03:39:25 rich https://www.shigemk2.com/entry/20120410/1333996765 1.0 100%