Mercurial > emacs
changeset 109729:e198ded50074
language/hebrew.el: Exclude U+05BD (Hebrew MAQAF) from the composable pattern.
author | Kenichi Handa <handa@etlken> |
---|---|
date | Mon, 09 Aug 2010 20:08:23 +0900 |
parents | 64732fa6188a (current diff) 614e229f245a (diff) |
children | d50010a75cee |
files | |
diffstat | 2 files changed, 7 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Mon Aug 09 02:35:21 2010 -0700 +++ b/lisp/ChangeLog Mon Aug 09 20:08:23 2010 +0900 @@ -1,3 +1,8 @@ +2010-08-09 Kenichi Handa <handa@m17n.org> + + * language/hebrew.el: Exclude U+05BD (Hebrew MAQAF) from the + composable pattern. + 2010-08-08 Chong Yidong <cyd@stupidchicken.com> * tutorial.el (tutorial--default-keys): C-d is now bound to
--- a/lisp/language/hebrew.el Mon Aug 09 02:35:21 2010 -0700 +++ b/lisp/language/hebrew.el Mon Aug 09 20:08:23 2010 +0900 @@ -237,8 +237,8 @@ (setq idx (1+ idx)))))) gstring)) -(let ((pattern1 "[\u05D0-\u05F2][\u0591-\u05BF\u05C1-\u05C5\u05C7]+") - (pattern2 "[\u05D0-\u05F2]\u200D[\u0591-\u05BF\u05C1-\u05C5\u05C7]+")) +(let ((pattern1 "[\u05D0-\u05F2][\u0591-\u05BD\u05BF\u05C1-\u05C5\u05C7]+") + (pattern2 "[\u05D0-\u05F2]\u200D[\u0591-\u05BD\u05BF\u05C1-\u05C5\u05C7]+")) (set-char-table-range composition-function-table '(#x591 . #x5C7) (list (vector pattern2 3 'hebrew-shape-gstring)