[Date Prev][Date Next][Thread Prev][][Date Index][Thread Index]

Re: windows-1252



Katsumi Yamaoka <yamaoka@jpl.org> wrote:
>>>>>> In [emacs-w3m : No.08016] Katsumi Yamaoka wrote:
>
>> Today I've changed nnrss.el in the Gnus CVS repository so that
>> it may use the windows-1252 coding system if it is available as
>> a substitute for iso-8859-1 [1].  And then, I tried the same way
>> in emacs-w3m.  It seems to go well so far.  Although it requires
>> that windows-1252 is available, it can be provided even in Emacs
>> 21 using ARISAWA Akihiro's codepage-ex.el.
>
> I've committed those changes in the CVS trunk.  However,
> shimbun-fau-coding-system is still necessary since the fau.org
> site doesn't specify the content charset.
>
> In addition, I've synch'd shimbun-rss-find-el with Gnus so as to
> make sb-laut-de.el work.  It works now, however I feel there are
> many garbage in shimbun articles especially in the laut-de.news
> group.  I cannot discriminate between significant ones and
> others since I don't read German, though.  Could anyone look
> into it?

Unfortunately I'm unable to test the cvs version of gnus and / or
emacs at the moment. If I can help you with emacs 21 and emacs-w3m
cvs, I'm happy to do that. However, I still have trouble to get
codepage-ex.el working. After installing codepage-ex.el (byte
compiled) in the load path and changing .emacs, emacs doesn't load
properly anymore and emacs --debug gives the backtrace attached at the
end of this message. However, if I start emacs with my original .emacs
or even with emacs -q and execute your code for initialising
codepage-ex in the scratch buffer, everything works fine. Any idea how
to fix that?

Regards,

Elias

--- Backtrace ---
-*-coding: utf-8;-*-
Debugger entered--Lisp error: (wrong-type-argument symbolp "windows-1252")
  symbol-name("windows-1252")
  #[(x) "Æ!�\n=�Ç�ÈÉ	Ê\"��)ËÌÍ!\"�%Î�*Ï�*È)\\	\f>�6Ð�7È\\ËÑÍ	!\"�EÈ�FÒ\\Ó	!Ô=��Õ	!�ÈH:�o
ÖH:�o
ÔH:�o
×H:��
ÐH�{
ØH�È��Ö��Ô)��Ö\\)�" [x base most-preferred mime lang-preferred flags coding-system-base 64 0 coding-system-get mime-charset string-match "^x-" symbol-name 16 32 8 "-with-esc$" 4 coding-system-type 2 coding-system-flags 1 3 9] 6](cp1252)
  #[(x y) "	!\n!V�" [func x y] 3](cp1252 cp1254)
  sort((emacs-mule undecided no-conversion iso-2022-7bit-ss2 iso-2022-7bit-lock iso-latin-9-with-esc iso-latin-1-with-esc iso-latin-2-with-esc iso-latin-3-with-esc iso-latin-4-with-esc cyrillic-iso-8bit-with-esc) #[(x y) "	!\n!V�" [func x y] 3])
  sort-coding-systems((emacs-mule undecided no-conversion iso-2022-7bit-ss2 iso-2022-7bit-lock iso-latin-9-with-esc iso-latin-1-with-esc iso-latin-2-with-esc iso-latin-3-with-esc iso-latin-4-with-esc cyrillic-iso-8bit-with-esc))
  byte-code("ÆÇ!�ÈÉÊ\"��cËÌ!�cËÍ!�cÍÌÎ!!Ï���\f�_\f�A@ÐÑ\"�=ÐÒ\"��(ÐÓ\"�Ô=�(\n��(\nÕÖ	\"BB�(�-Ï�" [alist mule mime cs css mm-mime-mule-charset-alist featurep xemacs eval-after-load "un-define" (mm-enrich-utf-8-by-mule-ucs) fboundp coding-system-list sort-coding-systems base-only nil coding-system-get :mime-charset mime-charset safe-charsets t delq ascii] 6)
  require(mm-util)
  byte-code("ÀÁ!�ÀÂ!�ÀÃ!�ÄÅÆ\"�ÄÇÆ\"�ÄÈÆ\"�ÄÉÆ\"�" [require mail-utils mm-util gnus-util autoload gnus-sorted-intersection "gnus-range" gnus-intersection gnus-sorted-complement gnus-sorted-difference] 3)
  require(nnheader)
  byte-code("ÀÁ!�ÀÂ!�ÀÃ!�ÄÅ!�ÀÆ!��ÀÇ!�ÀÈ!�ÀÉ!�ÀÊ!�ËÌÍ\"�ËÎÏ\"�ËÐÑ\"�ÒÓÔÕÖ×ØÙØÚ&	�ÛÜÝÞ#�ÛßÝÞ#�ÒàáâÖãØÓ&�ÒäáåÖæØÓ&�ÒçáèÖéØÓ&�ÒêáëÖìØÓ&�ÒíáîÖïØê&�ÒðáñÖòØÓ&�ÒóáôÖõØÓ&�Òöá÷ØÓ%�ÒøáùØÓ%�ÒúáûØÓØü&�" [require canlock mailheader nnheader featurep xemacs mail-abbrevs mailabbrev mail-parse mml rfc822 autoload gnus-find-method-for-group "gnus" nnvirtual-find-group-art "nnvirtual" gnus-group-decoded-name "gnus-group" custom-declare-group message ((user-mail-address custom-variable) (user-full-name custom-variable)) "Mail and news message composing." :link (custom-manual "(message)Top") :group mail news put user-mail-address custom-type string user-full-name message-various nil "Various Message Variables" (custom-manual "(message)Various Message Variables") message-buffers "Message Buffers" (custom-manual "(message)Message Buffers") message-sending "Message Sending" (custom-manual "(message)Sending Variables") message-interface "Message Interface" (custom-manual "(message)Interface") message-forwarding "Message Forwarding" (custom-manual "(message)Forwarding") message-insertion "Message Insertion" ...] 10)
  require(message)
  byte-code("ÆÇÈ\"�ÉÊ!�ÉË!�ÌÍÎÏÐÑÆ�" [message-cite-function message-from-style message-sendmail-envelope-from gnus-message-archive-group gnus-gcc-mark-as-read gnus-posting-styles add-hook w3m-mode-hook dh-w3m-mode-hook require ispell message message-cite-original-without-signature angles header ((if ... ... ...)) t ((".*" ... ...) ("Posteingang" ... ...) ("cam\\|dep\\|mcr\\|soc" ... ...) (... ... ...))] 3)
  load("~/.emacs" t t)
  #[nil "��	Æ=�ÇÈQ�5	É=�'ÊÇËÌ#�#Í�5Î�5	Ï=�1Ð�5ÇÑQÒÓ\nÒ�#�Ò=�FË��Ô!Õ���Ö!�×PØ
!�d
�oØ\f!�n\f�oË���Ù\f\"��ÚÛ\f#�ÜÝ!�\f*��Ë ÓÞÒ�#))�" [init-file-user system-type user-init-file-1 user-init-file source alt ms-dos "~" "/_emacs" windows-nt directory-files nil "^\\.emacs\\(\\.elc?\\)?$" "~/.emacs" "~/_emacs" vax-vms "sys$login:.emacs" "/.emacs" t load file-name-extension "elc" file-name-sans-extension ".el" file-exists-p file-newer-than-file-p message "Warning: %s is newer than %s" sit-for 1 "default" inhibit-default-init inhibit-startup-message] 5]()
  command-line()
  normal-top-level()