[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: How to get the connected forms of Syriac letters?
From: |
Benjamin Riefenstahl |
Subject: |
Re: How to get the connected forms of Syriac letters? |
Date: |
Mon, 15 Dec 2014 23:32:53 +0100 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/24.4 (gnu/linux) |
Hi Fabian,
Fabian Rieger writes:
> Is there a method to make Emacs show the connected (initial, medial,
> final) forms of Syriac letters?
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)))
benny
Re: How to get the connected forms of Syriac Letters?, Fabian Rieger, 2014/12/16
Re: How to get the connected forms of Syriac Letters?, Stefan Monnier, 2014/12/17