16/03/20 00:28:19.30 .net
結構便利かもしれんので俺もさらす
(defun ad-isearch-repeat-quick-reverse (direction)
(when (and (not (boundp 'in-ad-isearch-repeat-quick-reverse))
(eq isearch-forward (eq direction 'backward)))
(let (in-ad-isearch-repeat-quick-reverse)
(isearch-repeat direction))))
(advice-add 'isearch-repeat :before 'ad-isearch-repeat-quick-reverse)