Mercurial > emacs
view lisp/language/burmese.el @ 96231:2b8c49fb8d24
* buffer.h (struct buffer): New member word_wrap.
* buffer.c (syms_of_buffer): New variables default-word-wrap and
word-wrap.
(init_buffer_once): Initialize them.
* dispextern.h (struct it): Replace bool truncate_lines_p with a
line_wrap enum possessing three possible values.
* termopts.h: Replace truncate_partial_width_windows with
Vtruncate_partial_width_windows.
* dispnew.c (direct_output_for_insert): Avoid direct output when
inserting a space with word wrap on.
* indent.c (compute_motion): Obey integer values of
truncate-partial-width-windows.
* xdisp.c (Vtruncate_partial_width_windows): New Lisp_Object,
replacing truncate_partial_width_windows.
(init_iterator): If Vtruncate_partial_width_windows is an integer,
truncate only if the window width is below that integer.
(start_display. resize_mini_window, produce_stretch_glyph)
(display_string, move_it_in_display_line_to): Use line_wrap.
(back_to_previous_visible_line_start, reseat_1): Reset
string_from_display_prop_p.
(display_line): Extend default face to end of line when wrapping.
(display_line, move_it_in_display_line_to): Add ability
to wrap continued lines at word boundaries.
author | Chong Yidong <cyd@stupidchicken.com> |
---|---|
date | Tue, 24 Jun 2008 17:54:59 +0000 |
parents | 55b7f25d920a |
children | f799f54cd1dd |
line wrap: on
line source
;;; burmese.el --- support for Burmese -*- coding: utf-8; no-byte-compile: t -*- ;; Copyright (C) 2008 ;; National Institute of Advanced Industrial Science and Technology (AIST) ;; Registration Number H13PRO009 ;; Keywords: multilingual, Burma, i18n ;; This file is part of GNU Emacs. ;; GNU Emacs is free software: you can redistribute it and/or modify ;; it under the terms of the GNU General Public License as published by ;; the Free Software Foundation, either version 3 of the License, or ;; (at your option) any later version. ;; GNU Emacs is distributed in the hope that it will be useful, ;; but WITHOUT ANY WARRANTY; without even the implied warranty of ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ;; GNU General Public License for more details. ;; You should have received a copy of the GNU General Public License ;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. ;;; Commentary: ;; Aung San Suu Kyi says to call her country "Burma". ;; The murderous generals say to call it "Myanmar". ;; We will call it "Burma". -- rms, Chief GNUisance. ;;; Code: (set-language-info-alist "Burmese" '((charset unicode) (coding-system utf-8) (coding-priority utf-8) (sample-text . "Burmese (မ္ရန္မာ) မင္ဂလာပာ") (documentation . t))) (set-char-table-range composition-function-table '(#x1000 . #x107F) '(("[\x1000-\x107F\x200C\x200D]+" . font-shape-text))) ;; arch-tag: 8ba5f4cd-ef89-4008-b784-397edd0cb32e