*** pub/pgnus/lisp/gnus-art.el Tue Sep 8 21:41:35 1998 --- pgnus/lisp/gnus-art.el Tue Sep 8 22:25:55 1998 *************** *** 810,816 **** (defun article-treat-dumbquotes () "Translate M******** sm*rtq**t*s into proper text." (interactive) ! (article-translate-characters "\221\222\223\223" "`'\"\"")) (defun article-translate-characters (from to) "Translate all characters in the body of the article according to FROM and TO. --- 810,816 ---- (defun article-treat-dumbquotes () "Translate M******** sm*rtq**t*s into proper text." (interactive) ! (article-translate-characters "\221\222\223\224" "`'\"\"")) (defun article-translate-characters (from to) "Translate all characters in the body of the article according to FROM and TO. *** pub/pgnus/lisp/gnus.el Tue Sep 8 21:41:36 1998 --- pgnus/lisp/gnus.el Tue Sep 8 22:25:56 1998 *************** *** 250,256 **** :link '(custom-manual "(gnus)Exiting Gnus") :group 'gnus) ! (defconst gnus-version-number "0.20" "Version number for this version of Gnus.") (defconst gnus-version (format "Pterodactyl Gnus v%s" gnus-version-number) --- 250,256 ---- :link '(custom-manual "(gnus)Exiting Gnus") :group 'gnus) ! (defconst gnus-version-number "0.21" "Version number for this version of Gnus.") (defconst gnus-version (format "Pterodactyl Gnus v%s" gnus-version-number) *** pub/pgnus/lisp/mm-util.el Tue Sep 8 07:07:55 1998 --- pgnus/lisp/mm-util.el Tue Sep 8 22:25:56 1998 *************** *** 196,201 **** --- 196,206 ---- (point-min) (point-max))))) (mm-mule-charset-to-mime-charset charset))) + (defun mm-multibyte-p () + "Say whether multibyte is enabled." + (and (fboundp 'enable-multibyte-characters) + enable-multibyte-characters)) + (provide 'mm-util) ;;; mm-util.el ends here *** pub/pgnus/lisp/rfc2047.el Tue Sep 8 21:41:37 1998 --- pgnus/lisp/rfc2047.el Tue Sep 8 22:25:56 1998 *************** *** 255,276 **** (prog1 (match-string 0) (delete-region (match-beginning 0) (match-end 0))))) ! (when enable-multibyte-characters (mm-decode-coding-region b e rfc2047-default-charset)) (setq b (point))) ! (when enable-multibyte-characters (mm-decode-coding-region b (point-max) rfc2047-default-charset)))))) ;;;###autoload (defun rfc2047-decode-string (string) ! "Decode the quoted-printable-encoded STRING and return the results." ! (with-temp-buffer ! (mm-enable-multibyte) ! (insert string) ! (inline ! (rfc2047-decode-region (point-min) (point-max))) ! (buffer-string))) ! (defun rfc2047-parse-and-decode (word) "Decode WORD and return it if it is an encoded word. Return WORD if not." --- 255,278 ---- (prog1 (match-string 0) (delete-region (match-beginning 0) (match-end 0))))) ! (when (mm-multibyte-p) (mm-decode-coding-region b e rfc2047-default-charset)) (setq b (point))) ! (when (mm-multibyte-p) (mm-decode-coding-region b (point-max) rfc2047-default-charset)))))) ;;;###autoload (defun rfc2047-decode-string (string) ! "Decode the quoted-printable-encoded STRING and return the results." ! (let ((m (mm-multibyte-p))) ! (with-temp-buffer ! (when m ! (mm-enable-multibyte)) ! (insert string) ! (inline ! (rfc2047-decode-region (point-min) (point-max))) ! (buffer-string)))) ! (defun rfc2047-parse-and-decode (word) "Decode WORD and return it if it is an encoded word. Return WORD if not." *** pub/pgnus/lisp/ChangeLog Tue Sep 8 21:41:34 1998 --- pgnus/lisp/ChangeLog Tue Sep 8 22:25:55 1998 *************** *** 1,3 **** --- 1,15 ---- + Tue Sep 8 22:25:53 1998 Lars Magne Ingebrigtsen + + * gnus.el: Pterodactyl Gnus v0.21 is released. + + 1998-09-08 Hrvoje Niksic + + * gnus-art.el (article-treat-dumbquotes): Handle \224 correctly. + + 1998-09-08 22:18:03 Lars Magne Ingebrigtsen + + * mm-util.el (mm-multibyte-p): New function. + Tue Sep 8 21:43:03 1998 Lars Magne Ingebrigtsen * gnus.el: Pterodactyl Gnus v0.20 is released. *** pub/pgnus/texi/gnus.texi Tue Sep 8 21:41:38 1998 --- pgnus/texi/gnus.texi Tue Sep 8 22:25:57 1998 *************** *** 1,7 **** \input texinfo @c -*-texinfo-*- @setfilename gnus ! @settitle Pterodactyl Gnus 0.20 Manual @synindex fn cp @synindex vr cp @synindex pg cp --- 1,7 ---- \input texinfo @c -*-texinfo-*- @setfilename gnus ! @settitle Pterodactyl Gnus 0.21 Manual @synindex fn cp @synindex vr cp @synindex pg cp *************** *** 318,324 **** @tex @titlepage ! @title Pterodactyl Gnus 0.20 Manual @author by Lars Magne Ingebrigtsen @page --- 318,324 ---- @tex @titlepage ! @title Pterodactyl Gnus 0.21 Manual @author by Lars Magne Ingebrigtsen @page *************** *** 354,360 **** spool or your mbox file. All at the same time, if you want to push your luck. ! This manual corresponds to Pterodactyl Gnus 0.20. @end ifinfo --- 354,360 ---- spool or your mbox file. All at the same time, if you want to push your luck. ! This manual corresponds to Pterodactyl Gnus 0.21. @end ifinfo *** pub/pgnus/texi/message.texi Tue Sep 8 21:41:38 1998 --- pgnus/texi/message.texi Tue Sep 8 22:25:57 1998 *************** *** 1,7 **** \input texinfo @c -*-texinfo-*- @setfilename message ! @settitle Pterodactyl Message 0.20 Manual @synindex fn cp @synindex vr cp @synindex pg cp --- 1,7 ---- \input texinfo @c -*-texinfo-*- @setfilename message ! @settitle Pterodactyl Message 0.21 Manual @synindex fn cp @synindex vr cp @synindex pg cp *************** *** 42,48 **** @tex @titlepage ! @title Pterodactyl Message 0.20 Manual @author by Lars Magne Ingebrigtsen @page --- 42,48 ---- @tex @titlepage ! @title Pterodactyl Message 0.21 Manual @author by Lars Magne Ingebrigtsen @page *************** *** 83,89 **** * Key Index:: List of Message mode keys. @end menu ! This manual corresponds to Pterodactyl Message 0.20. Message is distributed with the Gnus distribution bearing the same version number as this manual has. --- 83,89 ---- * Key Index:: List of Message mode keys. @end menu ! This manual corresponds to Pterodactyl Message 0.21. Message is distributed with the Gnus distribution bearing the same version number as this manual has.