Function: erc-netsplit-timer

erc-netsplit-timer is a byte-compiled function defined in erc-netsplit.el.gz.

Signature

(erc-netsplit-timer NOW)

Documentation

Clean cruft from erc-netsplit-list older than 10 minutes.

Source Code

;; Defined in /usr/src/emacs/lisp/erc/erc-netsplit.el.gz
(defun erc-netsplit-timer (now)
  "Clean cruft from `erc-netsplit-list' older than 10 minutes."
  (when erc-server-connected
    (dolist (elt erc-netsplit-list)
      (when (> (erc-time-diff (cadr elt) now) 600)
	(when erc-netsplit-debug
	  (erc-display-message
	   nil 'notice (current-buffer)
	   (concat "Netsplit: Removing " (car elt))))
	(setq erc-netsplit-list (delq elt erc-netsplit-list))))))