From a3d15b8fdd837de63ddcbaec9e388ce20cc1dea3 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Sat, 13 Oct 2001 19:19:01 +0000 Subject: [PATCH] * play/gomoku.el (gomoku-mode): * textmodes/page-ext.el (pages-directory-mode): * textmodes/scribe.el (scribe-mode): Use define-derived-mode. --- lisp/textmodes/page-ext.el | 7 +------ 1 file changed, 1 insertion(+), 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)) -- 2.39.2