summaryrefslogtreecommitdiff
path: root/lisp/emulation/viper-mous.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/emulation/viper-mous.el')
-rw-r--r--lisp/emulation/viper-mous.el25
1 files changed, 19 insertions, 6 deletions
diff --git a/lisp/emulation/viper-mous.el b/lisp/emulation/viper-mous.el
index 73cef2eef85..aaab02e5f6c 100644
--- a/lisp/emulation/viper-mous.el
+++ b/lisp/emulation/viper-mous.el
@@ -1,6 +1,6 @@
;;; viper-mous.el --- mouse support for Viper
-;; Copyright (C) 1994, 1995, 1996 Free Software Foundation, Inc.
+;; Copyright (C) 1994, 1995, 1996, 1997 Free Software Foundation, Inc.
;; This file is part of GNU Emacs.
@@ -21,12 +21,28 @@
;; Code
-(require 'viper-util)
+(provide 'viper-mous)
;; compiler pacifier
(defvar double-click-time)
(defvar mouse-track-multi-click-time)
-;; end compiler pacifier
+(defvar vip-search-start-marker)
+(defvar vip-local-search-start-marker)
+(defvar vip-search-history)
+(defvar vip-s-string)
+(defvar vip-re-search)
+
+(eval-when-compile
+ (let ((load-path (cons (expand-file-name ".") load-path)))
+ (or (featurep 'viper-util)
+ (load "viper-util.el" nil nil 'nosuffix))
+ (or (featurep 'viper)
+ (load "viper.el" nil nil 'nosuffix))
+ ))
+;; end pacifier
+
+(require 'viper-util)
+
;;; Variables
@@ -453,7 +469,4 @@ bindings in viper.el and in the Viper manual."
)))
-
-(provide 'viper-mous)
-
;;; viper-mous.el ends here