summaryrefslogtreecommitdiff
path: root/lisp/textmodes/page-ext.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2001-10-13 19:19:01 +0000
committerStefan Monnier <monnier@iro.umontreal.ca>2001-10-13 19:19:01 +0000
commita3d15b8fdd837de63ddcbaec9e388ce20cc1dea3 (patch)
treee49318ca6a176cf6bbd9de6a305de4077dc84b98 /lisp/textmodes/page-ext.el
parentd1a27f1dd8c4cc89de0d58ef65a2b08c709ca201 (diff)
downloademacs-a3d15b8fdd837de63ddcbaec9e388ce20cc1dea3.tar.gz
emacs-a3d15b8fdd837de63ddcbaec9e388ce20cc1dea3.tar.bz2
emacs-a3d15b8fdd837de63ddcbaec9e388ce20cc1dea3.zip
* play/gomoku.el (gomoku-mode):
* textmodes/page-ext.el (pages-directory-mode): * textmodes/scribe.el (scribe-mode): Use define-derived-mode.
Diffstat (limited to 'lisp/textmodes/page-ext.el')
-rw-r--r--lisp/textmodes/page-ext.el7
1 files changed, 1 insertions, 6 deletions
diff --git a/lisp/textmodes/page-ext.el b/lisp/textmodes/page-ext.el
index 87059d21b0a..9bf4588a43b 100644
--- a/lisp/textmodes/page-ext.el
+++ b/lisp/textmodes/page-ext.el
@@ -694,16 +694,11 @@ Used by `pages-directory' function."
(terpri))
(end-of-line 1)))
-(defun pages-directory-mode ()
+(define-derived-mode pages-directory-mode nil "Pages-Directory"
"Mode for handling the pages-directory buffer.
Move point to one of the lines in this buffer, then use \\[pages-directory-goto] to go
to the same line in the pages buffer."
-
- (kill-all-local-variables)
- (use-local-map pages-directory-map)
- (setq major-mode 'pages-directory-mode)
- (setq mode-name "Pages-Directory")
(make-local-variable 'pages-buffer)
(make-local-variable 'pages-pos-list)
(make-local-variable 'pages-directory-buffer-narrowing-p))