view lisp/emacs-lisp/lucid.el @ 2088:aa90bb7c515b

Initial revision
author Jim Blandy <jimb@redhat.com>
date Tue, 09 Mar 1993 23:02:46 +0000
parents
children cc2e35185964
line wrap: on
line source

(defun add-timeout (secs function object &optional resignal)
  (run-at-time secs resignal function object))

(defun disable-timeout (timeout)
  (cancel-timer timeout))