*** pub/pgnus/lisp/gnus-xmas.el Sat Aug 29 22:25:17 1998 --- pgnus/lisp/gnus-xmas.el Sun Aug 30 12:16:07 1998 *************** *** 52,58 **** (grape "#b264cc" "#cf7df") (labia "#cc64c2" "#fd7dff") (berry "#cc6485" "#ff7db5") ! (dino "#cc6485" "#ff7db5") (neutral "#b4b4b4" "#878787") (september "#bf9900" "#ffcc00")) "Color alist used for the Gnus logo.") --- 52,58 ---- (grape "#b264cc" "#cf7df") (labia "#cc64c2" "#fd7dff") (berry "#cc6485" "#ff7db5") ! (dino "#8e4900" "#911e1e") (neutral "#b4b4b4" "#878787") (september "#bf9900" "#ffcc00")) "Color alist used for the Gnus logo.") *************** *** 62,68 **** :type '(choice (const flame) (const pine) (const moss) (const irish) (const sky) (const tin) (const velvet) (const grape) (const labia) ! (const berry) (const neutral) (const september)) :group 'gnus-xmas) (defvar gnus-xmas-logo-colors --- 62,69 ---- :type '(choice (const flame) (const pine) (const moss) (const irish) (const sky) (const tin) (const velvet) (const grape) (const labia) ! (const berry) (const neutral) (const september) ! (const dino)) :group 'gnus-xmas) (defvar gnus-xmas-logo-colors *** pub/pgnus/lisp/gnus.el Sun Aug 30 00:59:59 1998 --- pgnus/lisp/gnus.el Sun Aug 30 12:16:07 1998 *************** *** 250,256 **** :link '(custom-manual "(gnus)Exiting Gnus") :group 'gnus) ! (defconst gnus-version-number "0.6" "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.7" "Version number for this version of Gnus.") (defconst gnus-version (format "Pterodactyl Gnus v%s" gnus-version-number) *************** *** 1698,1704 **** gnus-article-treat-overstrike gnus-article-word-wrap gnus-article-remove-cr gnus-article-remove-trailing-blank-lines gnus-article-display-x-face gnus-article-de-quoted-unreadable ! gnus-article-mime-decode-quoted-printable gnus-article-hide-pgp gnus-article-hide-pem gnus-article-hide-signature gnus-article-strip-leading-blank-lines gnus-article-date-local gnus-article-date-original gnus-article-date-lapsed --- 1698,1704 ---- gnus-article-treat-overstrike gnus-article-word-wrap gnus-article-remove-cr gnus-article-remove-trailing-blank-lines gnus-article-display-x-face gnus-article-de-quoted-unreadable ! gnus-article-hide-pgp gnus-article-hide-pem gnus-article-hide-signature gnus-article-strip-leading-blank-lines gnus-article-date-local gnus-article-date-original gnus-article-date-lapsed *** pub/pgnus/lisp/mm-decode.el Sun Aug 30 00:59:59 1998 --- pgnus/lisp/mm-decode.el Sun Aug 30 12:16:07 1998 *************** *** 82,87 **** --- 82,92 ---- (fset 'mm-decode-coding-string 'decode-coding-string) (fset 'mm-decode-coding-string (lambda (s a) s)))) + (eval-and-compile + (if (fboundp 'coding-system-list) + (fset 'mm-coding-system-list 'coding-system-list) + (fset 'mm-coding-system-list 'ignore))) + (defun mm-decode-text (charset encoding string) "Decode STRING as an encoded text. Valid ENCODINGs are \"B\" and \"Q\". *************** *** 104,110 **** (gb2312 . cn-gb-2312) (iso-2022-jp-2 . iso-2022-7bit-ss2) (x-ctext . ctext))) ! (systems (coding-system-list)) dest) (while rest (let ((pair (car rest))) --- 109,115 ---- (gb2312 . cn-gb-2312) (iso-2022-jp-2 . iso-2022-7bit-ss2) (x-ctext . ctext))) ! (systems (mm-coding-system-list)) dest) (while rest (let ((pair (car rest))) *************** *** 126,133 **** charset)) (when lbt (setq charset (intern (format "%s-%s" charset lbt)))) ! (when (memq charset (coding-system-list)) ! charset)) (provide 'mm-decode) --- 131,147 ---- charset)) (when lbt (setq charset (intern (format "%s-%s" charset lbt)))) ! (cond ! ;; Running in a non-MULE environment. ! ((and (null (mm-coding-system-list)) ! (eq charset 'iso-8859-1)) ! charset) ! ;; Check to see whether we can handle this charset. ! ((memq charset (mm-coding-system-list)) ! charset) ! ;; Nope. ! (t ! nil))) (provide 'mm-decode) *** pub/pgnus/lisp/ChangeLog Sun Aug 30 00:59:58 1998 --- pgnus/lisp/ChangeLog Sun Aug 30 12:16:07 1998 *************** *** 1,3 **** --- 1,25 ---- + Sun Aug 30 12:15:54 1998 Lars Magne Ingebrigtsen + + * gnus.el: Pterodactyl Gnus v0.7 is released. + + 1998-08-30 01:26:12 Lars Magne Ingebrigtsen + + * gnus.el: Remove autoload for + gnus-article-mime-decode-quoted-printable. + + * mm-decode.el (mm-charset-to-coding-system): Allow iso-8859-1 to + be decoded in non-MULE Emacsen. + + * gnus-xmas.el (gnus-xmas-logo-color-alist): More brown. + + 1998-08-29 SL Baur + + * gnus-xmas.el (gnus-xmas-logo-color-alist): Try shades of brown. + + 1998-08-30 01:04:57 Lars Magne Ingebrigtsen + + * mm-decode.el: Check for coding-system-list. + Sun Aug 30 00:59:15 1998 Lars Magne Ingebrigtsen * gnus.el: Pterodactyl Gnus v0.6 is released. *** pub/pgnus/texi/gnus.texi Sun Aug 30 01:00:01 1998 --- pgnus/texi/gnus.texi Sun Aug 30 12:16:08 1998 *************** *** 1,7 **** \input texinfo @c -*-texinfo-*- @setfilename gnus ! @settitle Pterodactyl Gnus 0.6 Manual @synindex fn cp @synindex vr cp @synindex pg cp --- 1,7 ---- \input texinfo @c -*-texinfo-*- @setfilename gnus ! @settitle Pterodactyl Gnus 0.7 Manual @synindex fn cp @synindex vr cp @synindex pg cp *************** *** 318,324 **** @tex @titlepage ! @title Pterodactyl Gnus 0.6 Manual @author by Lars Magne Ingebrigtsen @page --- 318,324 ---- @tex @titlepage ! @title Pterodactyl Gnus 0.7 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.6. @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.7. @end ifinfo *** pub/pgnus/texi/message.texi Sun Aug 30 01:00:01 1998 --- pgnus/texi/message.texi Sun Aug 30 12:16:08 1998 *************** *** 1,7 **** \input texinfo @c -*-texinfo-*- @setfilename message ! @settitle Pterodactyl Message 0.6 Manual @synindex fn cp @synindex vr cp @synindex pg cp --- 1,7 ---- \input texinfo @c -*-texinfo-*- @setfilename message ! @settitle Pterodactyl Message 0.7 Manual @synindex fn cp @synindex vr cp @synindex pg cp *************** *** 42,48 **** @tex @titlepage ! @title Pterodactyl Message 0.6 Manual @author by Lars Magne Ingebrigtsen @page --- 42,48 ---- @tex @titlepage ! @title Pterodactyl Message 0.7 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.6. 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.7. Message is distributed with the Gnus distribution bearing the same version number as this manual has.