/[emacs]/emacs/lisp/gnus/gnus-salt.el
ViewVC logotype

Diff of /emacs/lisp/gnus/gnus-salt.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.12 by lute, Mon Jul 4 17:55:13 2005 UTC revision 1.13 by miles, Thu Jul 14 05:45:23 2005 UTC
# Line 128  It accepts the same format specs that `g Line 128  It accepts the same format specs that `g
128        ;; Set up the menu.        ;; Set up the menu.
129        (when (gnus-visual-p 'pick-menu 'menu)        (when (gnus-visual-p 'pick-menu 'menu)
130          (gnus-pick-make-menu-bar))          (gnus-pick-make-menu-bar))
131        (gnus-add-minor-mode 'gnus-pick-mode " Pick" gnus-pick-mode-map        (gnus-add-minor-mode 'gnus-pick-mode " Pick" gnus-pick-mode-map)
                            nil 'gnus-pick-mode)  
132        (gnus-run-hooks 'gnus-pick-mode-hook))))        (gnus-run-hooks 'gnus-pick-mode-hook))))
133    
134  (defun gnus-pick-setup-message ()  (defun gnus-pick-setup-message ()
# Line 362  This must be bound to a button-down mous Line 361  This must be bound to a button-down mous
361        ;; Set up the menu.        ;; Set up the menu.
362        (when (gnus-visual-p 'binary-menu 'menu)        (when (gnus-visual-p 'binary-menu 'menu)
363          (gnus-binary-make-menu-bar))          (gnus-binary-make-menu-bar))
364        (gnus-add-minor-mode 'gnus-binary-mode " Binary"        (gnus-add-minor-mode 'gnus-binary-mode " Binary" gnus-binary-mode-map)
                            gnus-binary-mode-map nil 'gnus-binary-mode)  
365        (gnus-run-hooks 'gnus-binary-mode-hook))))        (gnus-run-hooks 'gnus-binary-mode-hook))))
366    
367  (defun gnus-binary-display-article (article &optional all-header)  (defun gnus-binary-display-article (article &optional all-header)

Legend:
Removed from v.1.12  
changed lines
  Added in v.1.13

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26