Emacs Part 51 - 暇つぶし2ch

Emacs Part 51 ..

327:名無しさん＠お腹いっぱい。
18/08/08 18:24:05.31 .net
とりあえず、logical-line問題はこれで解決できるかなぁ。
(defun ad-next-logical-line (orig-fun &rest args)
(if (eq last-command 'next-logical-line)
(let ((last-command 'next-line))
(apply orig-fun args))
(apply orig-fun args)))
(advice-add 'next-logical-line :around #'ad-next-logical-line)
(defun ad-previous-logical-line (orig-fun &rest args)
(if (eq last-command 'previous-logical-line)
(let ((last-command 'previous-line))
(apply orig-fun args))
(apply orig-fun args)))
(advice-add 'previous-logical-line :around #'ad-previous-logical-line)
でも、multiple-cursors問題はさらに別なところにあることが分かった。
temporary-goal-columnが保管される仕組みがあるみたい。
mc/cursor-specific-vars変数に定義されている。

次ページ

続きを表示

1を表示