diff options
| author | Lute Kamstra | 2005-04-04 09:02:15 +0000 |
|---|---|---|
| committer | Lute Kamstra | 2005-04-04 09:02:15 +0000 |
| commit | baeabe078c8fcb52a12b920518c5a837bcfb76c4 (patch) | |
| tree | 320a991da0cb4e69f6fb4cfcf6eb29455825cd57 | |
| parent | 6786cab27226019951ab4247097c98c5cf1c785a (diff) | |
| download | emacs-baeabe078c8fcb52a12b920518c5a837bcfb76c4.tar.gz emacs-baeabe078c8fcb52a12b920518c5a837bcfb76c4.zip | |
Don't require easy-mmode.
(master): New customization group.
(master-mode): Specify :group.
| -rw-r--r-- | lisp/master.el | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/lisp/master.el b/lisp/master.el index ce4144f087c..b9908e82b55 100644 --- a/lisp/master.el +++ b/lisp/master.el | |||
| @@ -1,6 +1,6 @@ | |||
| 1 | ;;; master.el --- make a buffer the master over another buffer | 1 | ;;; master.el --- make a buffer the master over another buffer |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1999, 2000, 2001 Alexander Schroeder | 3 | ;; Copyright (C) 1999, 2000, 2001, 2005 Alexander Schroeder |
| 4 | 4 | ||
| 5 | ;; Author: Alex Schroeder <alex@gnu.org> | 5 | ;; Author: Alex Schroeder <alex@gnu.org> |
| 6 | ;; Maintainer: Alex Schroeder <alex@gnu.org> | 6 | ;; Maintainer: Alex Schroeder <alex@gnu.org> |
| @@ -55,7 +55,10 @@ | |||
| 55 | 55 | ||
| 56 | ;;; Code: | 56 | ;;; Code: |
| 57 | 57 | ||
| 58 | (require 'easy-mmode) | 58 | (defgroup master nil |
| 59 | "Support for master/slave relationships between buffers." | ||
| 60 | :version "22.1" | ||
| 61 | :group 'convenience) | ||
| 59 | 62 | ||
| 60 | ;; Variables that don't need initialization. | 63 | ;; Variables that don't need initialization. |
| 61 | 64 | ||
| @@ -83,16 +86,13 @@ following commands: | |||
| 83 | The slave buffer is stored in the buffer-local variable `master-of'. | 86 | The slave buffer is stored in the buffer-local variable `master-of'. |
| 84 | You can set this variable using `master-set-slave'. You can show | 87 | You can set this variable using `master-set-slave'. You can show |
| 85 | yourself the value of `master-of' by calling `master-show-slave'." | 88 | yourself the value of `master-of' by calling `master-show-slave'." |
| 86 | ;; The initial value. | 89 | :group 'master |
| 87 | nil | 90 | :keymap |
| 88 | ;; The indicator for the mode line. | 91 | '(("\C-c\C-n" . master-says-scroll-up) |
| 89 | nil | 92 | ("\C-c\C-p" . master-says-scroll-down) |
| 90 | ;; The minor mode bindings. | 93 | ("\C-c<" . master-says-beginning-of-buffer) |
| 91 | '(("\C-c\C-n" . master-says-scroll-up) | 94 | ("\C-c>" . master-says-end-of-buffer) |
| 92 | ("\C-c\C-p" . master-says-scroll-down) | 95 | ("\C-c\C-l" . master-says-recenter))) |
| 93 | ("\C-c<" . master-says-beginning-of-buffer) | ||
| 94 | ("\C-c>" . master-says-end-of-buffer) | ||
| 95 | ("\C-c\C-l" . master-says-recenter))) | ||
| 96 | 96 | ||
| 97 | ;; Initialize Master mode by setting a slave buffer. | 97 | ;; Initialize Master mode by setting a slave buffer. |
| 98 | 98 | ||