(middle-pos (1- (/ w2 2)))\r
(middle-bit (expt 2 middle-pos))\r
(insert-bmp (make-vector w2 (* 3 middle-bit))))\r
- (define-fringe-bitmap 'diff-hl-bmp-delete (make-vector 2 delete-row))\r
+ (define-fringe-bitmap 'diff-hl-bmp-delete (make-vector 2 delete-row) w2 w2)\r
(aset insert-bmp 0 0)\r
(aset insert-bmp middle-pos delete-row)\r
(aset insert-bmp (1+ middle-pos) delete-row)\r
(aset insert-bmp (1- w2) 0)\r
- (define-fringe-bitmap 'diff-hl-bmp-insert insert-bmp)\r
+ (define-fringe-bitmap 'diff-hl-bmp-insert insert-bmp w2 w2)\r
(define-fringe-bitmap 'diff-hl-bmp-change (make-vector\r
- w2 (* 3 middle-bit))))))\r
+ w2 (* 3 middle-bit)) w2 w2))))\r
\r
(defvar diff-hl-spec-cache (make-hash-table :test 'equal))\r
\r