[Emacs-diffs] Changes to emacs/lisp/textmodes/page-ext.el

[Richard M. Stallman]

Index: emacs/lisp/textmodes/page-ext.el
diff -c emacs/lisp/textmodes/page-ext.el:1.23 
emacs/lisp/textmodes/page-ext.el:1.24
*** emacs/lisp/textmodes/page-ext.el:1.23       Sat Oct 13 15:19:01 2001
--- emacs/lisp/textmodes/page-ext.el    Fri Aug  9 12:40:43 2002
***************
*** 694,704 ****
        (terpri))
      (end-of-line 1)))
  
! (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."
    (make-local-variable 'pages-buffer)
    (make-local-variable 'pages-pos-list)
    (make-local-variable 'pages-directory-buffer-narrowing-p))
--- 694,709 ----
        (terpri))
      (end-of-line 1)))
  
! (defun pages-directory-mode ()
    "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))