Mercurial > emacs

comparison lisp/arc-mode.el @ 62714:ec0621e2b94f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(archive-mode): Use run-mode-hooks.
author Lute Kamstra <lute@gnu.org>
date Thu, 26 May 2005 12:11:10 +0000
parents 9918f801db35
children abe14daaa679 01137c1fdbe9
comparison
equal deleted inserted replaced
62713:cf8babc6db4b 62714:ec0621e2b94f
670 (buffer-file-name))))) 670 (buffer-file-name)))))
671 671
672 (setq major-mode 'archive-mode) 672 (setq major-mode 'archive-mode)
673 (setq mode-name (concat typename "-Archive")) 673 (setq mode-name (concat typename "-Archive"))
674 ;; Run archive-foo-mode-hook and archive-mode-hook 674 ;; Run archive-foo-mode-hook and archive-mode-hook
675 (run-hooks (archive-name "mode-hook") 'archive-mode-hook) 675 (run-mode-hooks (archive-name "mode-hook") 'archive-mode-hook)
676 (use-local-map archive-mode-map)) 676 (use-local-map archive-mode-map))
677 677
678 (make-local-variable 'archive-proper-file-start) 678 (make-local-variable 'archive-proper-file-start)
679 (make-local-variable 'archive-file-list-start) 679 (make-local-variable 'archive-file-list-start)
680 (make-local-variable 'archive-file-list-end) 680 (make-local-variable 'archive-file-list-end)