(when (and backward (bolp) (not (eobp))) (forward-char))\r
(while (not (if backward (bobp) (eobp)))\r
(goto-char (if backward\r
- (1- (previous-overlay-change (point)))\r
+ (previous-overlay-change (point))\r
(next-overlay-change (point))))\r
(let ((o (diff-hl-hunk-overlay-at (point))))\r
(when (and o (if backward\r