help-gnu-emacs
[Top][All Lists]
Advanced

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

Re: How to get the connected forms of Syriac Letters?


From: Fabian Rieger
Subject: Re: How to get the connected forms of Syriac Letters?
Date: Tue, 16 Dec 2014 12:00:56 +0100
User-agent: Mozilla/5.0 (X11; Linux x86_64; rv:31.0) Gecko/20100101 Icedove/31.3.0

Benjamin Riefenstahl wrote
> I use something like this in my .emacs with Emacs 24.4.1 on Debian
> Jessie:
>
>     ;; Tell Emacs to actually use shaping for Syriac (via m17n).
>     ;; \u0700-\u074F: Syriac
>     ;; \u0640: TATWEEL
>     ;; \u200D: ZWJ
>     (set-char-table-range
>      composition-function-table
>      '(?\u0700 . ?\u074F)
>      (list ["[\u0700-\u074F\u0640\u200D]+" 0 font-shape-gstring]))
>
>     (defun benny-setup-fonts (frame)
>       (set-fontset-font t (?\u0700 . ?\u074F) "Serto Mardin 16" frame))
>
>     ;; Run font setup whenever a new frame is constructed.
>     (add-to-list 'after-make-frame-functions 'benny-setup-fonts)
>
>     ;; Run font setup now if we already have a frame.
>     (let ((frame (selected-frame)))
>       (if frame (benny-setup-fonts frame)))

Hi Benny,

that solved the problem. I just had to replace

   (set-fontset-font t (?\u0700 . ?\u074F) ...

with

   (set-fontset-font t (cons (decode-char 'ucs ?\x0700)
                             (decode-char 'ucs ?\x074F) ...

(The reason for this maybe I'll try to understand next week ...)
and now Syriac really looks fine.

Thanks for your help.

Fabian



reply via email to

[Prev in Thread] Current Thread [Next in Thread]