[Emacs-diffs] Changes to emacs/lisp/gnus/gnus-salt.el

[Miles Bader]

Index: emacs/lisp/gnus/gnus-salt.el
diff -c emacs/lisp/gnus/gnus-salt.el:1.10 emacs/lisp/gnus/gnus-salt.el:1.11
*** emacs/lisp/gnus/gnus-salt.el:1.10   Tue Sep  7 03:47:29 2004
--- emacs/lisp/gnus/gnus-salt.el        Mon May 30 08:20:18 2005
***************
*** 1,6 ****
  ;;; gnus-salt.el --- alternate summary mode interfaces for Gnus
  
! ;; Copyright (C) 1996, 1997, 1998, 1999, 2001
  ;;        Free Software Foundation, Inc.
  
  ;; Author: Lars Magne Ingebrigtsen <address@hidden>
--- 1,6 ----
  ;;; gnus-salt.el --- alternate summary mode interfaces for Gnus
  
! ;; Copyright (C) 1996, 1997, 1998, 1999, 2001, 2002, 2004, 2005
  ;;        Free Software Foundation, Inc.
  
  ;; Author: Lars Magne Ingebrigtsen <address@hidden>
***************
*** 496,502 ****
      (gnus-set-work-buffer)
      (gnus-tree-node-insert (make-mail-header "") nil)
      (setq gnus-tree-node-length (1- (point))))
!   (gnus-run-hooks 'gnus-tree-mode-hook))
  
  (defun gnus-tree-read-summary-keys (&optional arg)
    "Read a summary buffer key sequence and execute it."
--- 496,502 ----
      (gnus-set-work-buffer)
      (gnus-tree-node-insert (make-mail-header "") nil)
      (setq gnus-tree-node-length (1- (point))))
!   (gnus-run-mode-hooks 'gnus-tree-mode-hook))
  
  (defun gnus-tree-read-summary-keys (&optional arg)
    "Read a summary buffer key sequence and execute it."
***************
*** 1009,1015 ****
    (buffer-disable-undo)
    (setq buffer-read-only t)
    (make-local-variable 'gnus-carpal-attached-buffer)
!   (gnus-run-hooks 'gnus-carpal-mode-hook))
  
  (defun gnus-carpal-setup-buffer (type)
    (let ((buffer (symbol-value (intern (format "gnus-carpal-%s-buffer" 
type)))))
--- 1009,1015 ----
    (buffer-disable-undo)
    (setq buffer-read-only t)
    (make-local-variable 'gnus-carpal-attached-buffer)
!   (gnus-run-mode-hooks 'gnus-carpal-mode-hook))
  
  (defun gnus-carpal-setup-buffer (type)
    (let ((buffer (symbol-value (intern (format "gnus-carpal-%s-buffer" 
type)))))