diff lisp/hyperbole/wconfig.el @ 24:4103f0995bd7 r19-15b95

Import from CVS: tag r19-15b95
author cvs
date Mon, 13 Aug 2007 08:51:03 +0200
parents 376386a54a3c
children 131b0175ea99
line wrap: on
line diff
--- a/lisp/hyperbole/wconfig.el	Mon Aug 13 08:50:31 2007 +0200
+++ b/lisp/hyperbole/wconfig.el	Mon Aug 13 08:51:03 2007 +0200
@@ -6,10 +6,10 @@
 ;; KEYWORDS:     frames, hypermedia
 ;;
 ;; AUTHOR:       Bob Weiner
-;; ORG:          Brown U.
+;; ORG:          InfoDock Associates
 ;;
 ;; ORIG-DATE:    15-Mar-89
-;; LAST-MOD:     14-Apr-95 at 16:26:27 by Bob Weiner
+;; LAST-MOD:      9-Dec-96 at 18:39:50 by Bob Weiner
 ;;
 ;; This file is part of Hyperbole.
 ;; Available for use and distribution under the same terms as GNU Emacs.
@@ -65,6 +65,15 @@
 (defconst wconfig-ring-max 10
   "*Maximum length of window configuration ring before oldest elements are deleted.")
 
+(defvar wconfig-names (set:create)
+  "Set of (name . window-configuration) elements.")
+
+(defvar wconfig-ring nil
+  "List of window configurations saved in a ring.")
+
+(defvar wconfig-ring-yank-pointer nil
+  "The tail of the window configuration ring whose car is the last thing yanked.")
+
 ;;; ************************************************************************
 ;;; Public functions
 ;;; ************************************************************************
@@ -168,15 +177,6 @@
 ;;; Private variables
 ;;; ************************************************************************
 
-(defvar wconfig-names (set:create)
-  "Set of (name . window-configuration) elements.")
-
-(defvar wconfig-ring nil
-  "List of window configurations saved in a ring.")
-
-(defvar wconfig-ring-yank-pointer nil
-  "The tail of the window configuration ring whose car is the last thing yanked.")
-
 (run-hooks 'wconfig-load-hook)
 
 (provide 'wconfig)