~ Line 539:
(defun highlight-tail-make-new-overlay ()
“Make new highlight in the current point.”
(let* ((end-point (point))
(start-point (1- end-point))
(point-face-bgcolor-hex nil))
(highlight-tail-fade-out-step)
;; remove any highlight-tail’s overlays at point
(let ((overlays-at-start-point (highlight-tail-overlays-at start-point))

~ Line 1051:

(setq highlight-tail-fading-timer
(if (featurep ‘xemacs) ()()))
;(start-itimer “highlight-tail-fade-out-step”
; ‘highlight-tail-fade-out-step
; highlight-tail-timer
; highlight-tail-timer)
;(run-at-time nil highlight-tail-timer
; ‘highlight-tail-fade-out-step)))
(setq highlight-tail-defaultbgcolor-timer