From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Eli Zaretskii Newsgroups: gmane.emacs.bugs Subject: bug#21448: 25.0.50; `unicode-property-table-internal' in Elisp manual Date: Thu, 10 Sep 2015 20:12:19 +0300 Message-ID: <831te65hcc.fsf@gnu.org> References: <83io7j5rye.fsf@gnu.org> <029d2a95-ca25-48be-bf19-2159ed753d81@default> <83fv2n573m.fsf@gnu.org> Reply-To: Eli Zaretskii NNTP-Posting-Host: plane.gmane.org X-Trace: ger.gmane.org 1441905208 26037 80.91.229.3 (10 Sep 2015 17:13:28 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Thu, 10 Sep 2015 17:13:28 +0000 (UTC) Cc: 21448@debbugs.gnu.org To: Drew Adams Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Thu Sep 10 19:13:17 2015 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1Za5PK-0003YJ-Dy for geb-bug-gnu-emacs@m.gmane.org; Thu, 10 Sep 2015 19:13:10 +0200 Original-Received: from localhost ([::1]:50552 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Za5PJ-0007R5-PD for geb-bug-gnu-emacs@m.gmane.org; Thu, 10 Sep 2015 13:13:09 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:49858) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Za5PH-0007QW-4u for bug-gnu-emacs@gnu.org; Thu, 10 Sep 2015 13:13:07 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Za5PC-0004Ek-53 for bug-gnu-emacs@gnu.org; Thu, 10 Sep 2015 13:13:07 -0400 Original-Received: from debbugs.gnu.org ([208.118.235.43]:35056) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Za5PC-0004Ea-27 for bug-gnu-emacs@gnu.org; Thu, 10 Sep 2015 13:13:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.80) (envelope-from ) id 1Za5PB-0000cQ-JU for bug-gnu-emacs@gnu.org; Thu, 10 Sep 2015 13:13:01 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Eli Zaretskii Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Thu, 10 Sep 2015 17:13:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 21448 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: Original-Received: via spool by 21448-submit@debbugs.gnu.org id=B21448.14419051522345 (code B ref 21448); Thu, 10 Sep 2015 17:13:01 +0000 Original-Received: (at 21448) by debbugs.gnu.org; 10 Sep 2015 17:12:32 +0000 Original-Received: from localhost ([127.0.0.1]:55499 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1Za5Oh-0000bl-Qr for submit@debbugs.gnu.org; Thu, 10 Sep 2015 13:12:32 -0400 Original-Received: from mtaout26.012.net.il ([80.179.55.182]:36005) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1Za5Of-0000bd-43 for 21448@debbugs.gnu.org; Thu, 10 Sep 2015 13:12:29 -0400 Original-Received: from conversion-daemon.mtaout26.012.net.il by mtaout26.012.net.il (HyperSendmail v2007.08) id <0NUH0000017OGR00@mtaout26.012.net.il> for 21448@debbugs.gnu.org; Thu, 10 Sep 2015 20:14:49 +0300 (IDT) Original-Received: from HOME-C4E4A596F7 ([84.94.185.246]) by mtaout26.012.net.il (HyperSendmail v2007.08) with ESMTPA id <0NUH0002T18PHH00@mtaout26.012.net.il>; Thu, 10 Sep 2015 20:14:49 +0300 (IDT) In-reply-to: X-012-Sender: halo1@inter.net.il X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.15 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 3.x X-Received-From: 208.118.235.43 X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.bugs:106373 Archived-At: > Date: Thu, 10 Sep 2015 08:27:46 -0700 (PDT) > From: Drew Adams > Cc: 21448@debbugs.gnu.org > > I think that all that is missing wrt explaining the example is to > say (in this node) what `uniprop-table' is here, and why and how > it is used. Is the text below OK? Here's an example of defining a new category for characters that have strong right-to-left directionality (*note Bidirectional Display::) and using it in a special category table. To obtain the information about the directionality of characters, the example code uses the `bidi-class' Unicode property (*note bidi-class: Character Properties.). (defvar special-category-table-for-bidi ;; Make an empty category-table. (let ((category-table (make-category-table)) ;; Create a char-table which gives the 'bidi-class' Unicode ;; property for each character. (uniprop-table (unicode-property-table-internal 'bidi-class))) (define-category ?R "Characters of bidi-class R, AL, or RLO" category-table) ;; Modify the category entry of each character whose 'bidi-class' ;; Unicode property is R, AL, or RLO -- these have a ;; right-to-left directionality. (map-char-table #'(lambda (key val) (if (memq val '(R AL RLO)) (modify-category-entry key ?R category-table))) uniprop-table) category-table))