[Mew-dist 722] tiny patches for 1.65

Kazuhiko Yamamoto kazu at example.com
1997年 3月 21日 (金) 22:14:49 JST


10 minutes escape from BSD/OS 3.0 codes resulted in these
patches. They address charset guess problem and CTE: vs CD ordering
problem.

After applying these patch, "iso-2022-jp" will be correctly chosen
even if JIS X0201 is contained and MIME decoding will succeed even if 
CTE: locates after CD:.

I'm willing to admit that the charset patch is very ad-hoc, though,
better than nothing.

--Kazu

*** mew-decode.el.orig	Thu Mar 20 14:08:58 1997
--- mew-decode.el	Fri Mar 21 11:58:18 1997
***************
*** 217,223 ****
  	      (delete-region end (point))
  	      (insert value)
  	      (setq value (substring value 0 -1)) ;; delete \n
! 	      (forward-line))
  	     )
  	    (aset vec position value)
  	    ))
--- 217,223 ----
  	      (delete-region end (point))
  	      (insert value)
  	      (setq value (substring value 0 -1)) ;; delete \n
! 	      )
  	     )
  	    (aset vec position value)
  	    ))
*** mew-mule3.el.orig	Thu Mar 20 13:08:44 1997
--- mew-mule3.el	Fri Mar 21 11:58:13 1997
***************
*** 90,96 ****
       ((equal (length lc) 1)
        (mew-mule-lc-content 
         (mew-mule-lc-attr (car lc) mew-mule-character-set)))
!      (t "iso-2022-jp-2")
       )
      ))
  
--- 90,100 ----
       ((equal (length lc) 1)
        (mew-mule-lc-content 
         (mew-mule-lc-attr (car lc) mew-mule-character-set)))
!      (t 
!       (if (and (member 'latin-jisx0201 lc) (member 'japanese-jisx0208 lc))
! 	  "iso-2022-jp"
! 	"iso-2022-jp-2")
!       )
       )
      ))
  
***************
*** 103,109 ****
       ((equal (length lc) 1)
        (mew-mule-lc-content 
         (mew-mule-lc-attr (car lc) mew-mule-character-set)))
!      (t "iso-2022-jp-2")
       )
      ))
  
--- 107,117 ----
       ((equal (length lc) 1)
        (mew-mule-lc-content 
         (mew-mule-lc-attr (car lc) mew-mule-character-set)))
!      (t
!       (if (and (member 'latin-jisx0201 lc) (member 'japanese-jisx0208 lc))
! 	  "iso-2022-jp"
! 	"iso-2022-jp-2")
!       )
       )
      ))
  



Mew-dist メーリングリストの案内