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

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

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

revision 1.29 by zsh, Sat Feb 16 19:03:14 2002 UTC revision 1.29.2.1 by fx, Mon Jun 24 19:07:02 2002 UTC
# Line 2185  The following commands are available: Line 2185  The following commands are available:
2185    (make-local-hook 'pre-command-hook)    (make-local-hook 'pre-command-hook)
2186    (add-hook 'pre-command-hook 'gnus-set-global-variables nil t)    (add-hook 'pre-command-hook 'gnus-set-global-variables nil t)
2187    (gnus-run-hooks 'gnus-summary-mode-hook)    (gnus-run-hooks 'gnus-summary-mode-hook)
2188    (mm-enable-multibyte-mule4)    (mm-enable-multibyte)
2189    (gnus-update-format-specifications nil 'summary 'summary-mode 'summary-dummy)    (gnus-update-format-specifications nil 'summary 'summary-mode 'summary-dummy)
2190    (gnus-update-summary-mark-positions))    (gnus-update-summary-mark-positions))
2191    
# Line 5942  Given a prefix, will force an `article' Line 5942  Given a prefix, will force an `article'
5942    "Display ARTICLE in article buffer."    "Display ARTICLE in article buffer."
5943    (when (gnus-buffer-live-p gnus-article-buffer)    (when (gnus-buffer-live-p gnus-article-buffer)
5944      (with-current-buffer gnus-article-buffer      (with-current-buffer gnus-article-buffer
5945        (mm-enable-multibyte-mule4)))        (mm-enable-multibyte)))
5946    (gnus-set-global-variables)    (gnus-set-global-variables)
5947    (if (null article)    (if (null article)
5948        nil        nil
# Line 5996  be displayed." Line 5996  be displayed."
5996              (when (gnus-buffer-live-p gnus-article-buffer)              (when (gnus-buffer-live-p gnus-article-buffer)
5997                 (with-current-buffer gnus-article-buffer                 (with-current-buffer gnus-article-buffer
5998                  (if (not gnus-article-decoded-p) ;; a local variable                  (if (not gnus-article-decoded-p) ;; a local variable
5999                      (mm-disable-multibyte-mule4))))                      (mm-disable-multibyte))))
6000              (when (or all-headers gnus-show-all-headers)              (when (or all-headers gnus-show-all-headers)
6001                (gnus-article-show-all-headers))                (gnus-article-show-all-headers))
6002              (gnus-article-set-window-start              (gnus-article-set-window-start
# Line 7952  groups." Line 7952  groups."
7952          (gnus-summary-show-article t)          (gnus-summary-show-article t)
7953          (when (and (not raw) (gnus-buffer-live-p gnus-article-buffer))          (when (and (not raw) (gnus-buffer-live-p gnus-article-buffer))
7954            (with-current-buffer gnus-article-buffer            (with-current-buffer gnus-article-buffer
7955              (mm-enable-multibyte-mule4)))              (mm-enable-multibyte)))
7956          (if (equal gnus-newsgroup-name "nndraft:drafts")          (if (equal gnus-newsgroup-name "nndraft:drafts")
7957              (setq raw t))              (setq raw t))
7958          (gnus-article-edit-article          (gnus-article-edit-article

Legend:
Removed from v.1.29  
changed lines
  Added in v.1.29.2.1

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