diff options
Diffstat (limited to 'lisp/emacs-lisp/lucid.el')
| -rw-r--r-- | lisp/emacs-lisp/lucid.el | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/lucid.el b/lisp/emacs-lisp/lucid.el index d1b541d34b9..5ff77c5b01e 100644 --- a/lisp/emacs-lisp/lucid.el +++ b/lisp/emacs-lisp/lucid.el @@ -1,3 +1,23 @@ +;;; lucid.el --- Emulate some Lucid Emacs functions. +;; Copyright (C) 1993 Free Software Foundation, Inc. + +;; This file is part of GNU Emacs. + +;; GNU Emacs is free software; you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation; either version 2, or (at your option) +;; any later version. + +;; GNU Emacs is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. + +;; You should have received a copy of the GNU General Public License +;; along with GNU Emacs; see the file COPYING. If not, write to +;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. + + (defun add-timeout (secs function object &optional resignal) (run-at-time secs resignal function object)) @@ -152,3 +172,5 @@ ll (fset 'set-screen-width 'set-frame-width) (fset 'window-screen 'window-frame) (fset 'x-create-screen 'x-create-frame) (fset 'x-new-screen 'new-frame) + +;;; end of lucid.el |