Re: Character U+00A7 is shown as U+00A6

[Kenichi Handa]

In article <address@hidden>, Ognyan Kulev <address@hidden> writes:
> I'm talking about CVS Emacs compiled today (2004-01-21).  All is 
> happening inside LANG=bg_BG.CP1251 and bulgarian language environment 
> (that uses windows-1251 coding system).

> Character 0xA7, which is paragraph mark, is shown in Emacs as 0xA6. 
> With C-u C-x =, it's buffer code is reported as 0x81 0xA7, but in 
> display: section it's reported that 0xA6 is used (and it is used in 
> reality).  The font is -monotype-courier 
> new-semilight-r-normal--15-153-72-71-m-90-microsoft-cp1251.  When emacs 
> is started with "emacs -q", 
> -cronyx-Fixed-Bold-R-Normal--16-160-75-75-C-80-Microsoft-CP1251 is used, 
> but, again, 0xA6 is displayed.  Both fonts have fine 0xA7.

Oops, I've just committed the attached fix.  Please try again.

---
Ken'ichi HANDA
address@hidden

2004-01-22  Kenichi Handa  <address@hidden>

        * language/cyrillic.el (ccl-encode-windows-1251-font): Rearrange
        code point (register r1) only for charset mule-unicode-0100-24ff.

*** cyrillic.el.~1.45.~ Mon Dec 29 15:59:47 2003
--- cyrillic.el Thu Jan 22 09:15:37 2004
***************
*** 476,486 ****
      (push elt ctext-non-standard-encodings-alist)))
  
  (define-ccl-program ccl-encode-windows-1251-font
!   '(0
!     ((r1 <<= 7)
!      (r1 += r2)
!      (translate-character encode-windows-1251 r0 r1)
!      )))
  
  (add-to-list 'font-ccl-encoder-alist
             '("microsoft-cp1251" . ccl-encode-windows-1251-font))
--- 476,486 ----
      (push elt ctext-non-standard-encodings-alist)))
  
  (define-ccl-program ccl-encode-windows-1251-font
!   `(0
!     ((if (r0 == ,(charset-id 'mule-unicode-0100-24ff))
!        ((r1 <<= 7)
!         (r1 += r2)))
!      (translate-character encode-windows-1251 r0 r1))))
  
  (add-to-list 'font-ccl-encoder-alist
             '("microsoft-cp1251" . ccl-encode-windows-1251-font))