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

Re: windows-1252



>>>>> In [emacs-w3m : No.08021] Elias Oltmanns wrote:

> However, I still have trouble to get codepage-ex.el working.

> Debugger entered--Lisp error: (wrong-type-argument symbolp "windows-1252")
>   symbol-name("windows-1252")

Here's a quick fix to codepage-ex.el.  ARISAWA-san?
--- codepage-ex.el~	2005-04-06 13:48:55 +0000
+++ codepage-ex.el	2005-04-07 11:51:49 +0000
@@ -317,7 +317,8 @@
   (save-match-data
     (let* ((coding-name (symbol-name coding))
 	   (mime-charset (when (string-match "cp" coding-name)
-			   (replace-match "windows-" t nil coding-name)))
+			   (intern
+			    (replace-match "windows-" t nil coding-name))))
 	   (undef (if (eq system-type 'ms-dos)
 		      (if dos-unsupported-char-glyph
 			  (logand dos-unsupported-char-glyph 255)
@@ -369,7 +370,8 @@
        `((safe-chars . ,safe-chars)
 	 (mime-charset . ,mime-charset)
 	 (valid-codes (0 . 255))))
-      (define-coding-system-alias (intern mime-charset) coding))))
+      (if mime-charset
+	  (define-coding-system-alias mime-charset coding)))))
 
 (defun cp-ex-decoding-vector-for-codepage
   (table charset offset decode-table-for-eight-bit-control)