summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/lucid.el
diff options
context:
space:
mode:
authorJim Blandy <jimb@redhat.com>1993-03-09 23:02:46 +0000
committerJim Blandy <jimb@redhat.com>1993-03-09 23:02:46 +0000
commit92e30bc5e0b07ce719bf810f76ab1079a6ed1a94 (patch)
tree812e2b2441e0041a1bd83f129349f98603627e6c /lisp/emacs-lisp/lucid.el
parent00b3f57b23991486d72b595b602b012839c04bcf (diff)
downloademacs-92e30bc5e0b07ce719bf810f76ab1079a6ed1a94.tar.gz
Initial revision
Diffstat (limited to 'lisp/emacs-lisp/lucid.el')
-rw-r--r--lisp/emacs-lisp/lucid.el5
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/lucid.el b/lisp/emacs-lisp/lucid.el
new file mode 100644
index 00000000000..8ee8603694d
--- /dev/null
+++ b/lisp/emacs-lisp/lucid.el
@@ -0,0 +1,5 @@
+(defun add-timeout (secs function object &optional resignal)
+ (run-at-time secs resignal function object))
+
+(defun disable-timeout (timeout)
+ (cancel-timer timeout))