summaryrefslogtreecommitdiff
path: root/lisp/sun-fns.el
diff options
context:
space:
mode:
authorEric S. Raymond <esr@snark.thyrsus.com>1992-07-16 21:47:34 +0000
committerEric S. Raymond <esr@snark.thyrsus.com>1992-07-16 21:47:34 +0000
commitb9c99972f575a5d8eb89e3ca1e801ca98e6f8346 (patch)
tree168346524f895502b2cfd3a0fab1e93a0abf5530 /lisp/sun-fns.el
parent462e258216ecb359cb8a34306bc414a7b35fe4ea (diff)
downloademacs-b9c99972f575a5d8eb89e3ca1e801ca98e6f8346.tar.gz
*** empty log message ***
Diffstat (limited to 'lisp/sun-fns.el')
-rw-r--r--lisp/sun-fns.el13
1 files changed, 11 insertions, 2 deletions
diff --git a/lisp/sun-fns.el b/lisp/sun-fns.el
index 95ed1ed50b3..bdb43faa1d6 100644
--- a/lisp/sun-fns.el
+++ b/lisp/sun-fns.el
@@ -1,12 +1,15 @@
;;; sun-fns.el --- subroutines of Mouse handling for Sun windows
+;; Author: Jeff Peck <peck@sun.com>
+;; Last-Modified: 14 Aug 1987
+
;; Copyright (C) 1987 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 1, or (at your option)
+;; 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,
@@ -18,6 +21,8 @@
;; along with GNU Emacs; see the file COPYING. If not, write to
;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
+;;; Commentary:
+
;;; Submitted Mar. 1987, Jeff Peck
;;; Sun Microsystems Inc. <peck@sun.com>
;;; Conceived Nov. 1986, Stan Jefferson,
@@ -25,7 +30,6 @@
;;; GoodIdeas Feb. 1987, Steve Greenbaum
;;; & UpClicks Reasoning Systems, Inc.
;;;
-(require 'sun-mouse)
;;;
;;; Functions for manipulating via the mouse and mouse-map definitions
;;; for accessing them. Also definitons of mouse menus.
@@ -48,6 +52,11 @@
;;; bind the mouse button to an s-exp that contains the necessary parameters.
;;; See "minibuffer" bindings for examples.
;;;
+
+;;; Code:
+
+(require 'sun-mouse)
+
(defconst cursor-pause-milliseconds 300
"*Number of milliseconds to display alternate cursor (usually the mark)")