EMACS24.1。Ctrl-space次のようなカスタム関数に再バインドする必要があります。
- 行末に移動
- 末尾のスペースがある場合は削除します
- マークを設定します(通常どおりCtrl-space)
これは私のコードが機能していません:
(define-key global-map [?\C- ] 'my-set-mark-command)
(defun my-set-mark-command()
(interactive)
(end-of-line)
(delete-char (* -1 (skip-chars-backward "\t\s")));;delete trailing spaces
(set-mark-command nil))
末尾にスペースがない場合は正常に機能します。領域の選択と強調表示を開始します。末尾のスペースの場合:末尾のスペースを削除し、行末で停止し、[マーク]を設定しますが、領域を強調表示しません。
最後のコマンド(set-mark-command
)を削除して手動M-xset-mark-command
で実行すると、機能します。この機能を正しく動作させるために誰かが私を助けてくれませんか?