Mercurial > emacs
annotate etc/nxml/01740-0175F.el @ 109678:14830418f9fc
Change `select-active-region' mechanics.
Save region text prior to buffer modification.
Set window selection lazily, during `deactivate-mark' or after each
command when the region is temporarily active.
* lisp/cus-start.el: Add custom declaration for select-active-regions.
* lisp/mouse.el (mouse-drag-track): Remove hacks to deal with old
select-active-regions implementation.
(mouse-yank-at-click): Doc fix.
* lisp/simple.el (select-active-regions): Move to keyboard.c.
(deactivate-mark): Used saved-region-selection.
(select-active-region): Function removed.
(activate-mark, set-mark, push-mark-command)
(handle-shift-selection): Don't call it.
(keyboard-quit): Avoid adding the region to the window selection.
* src/insdel.c (prepare_to_modify_buffer): Save active region text to
Vsaved_region_selection.
* src/keyboard.c (Vselect_active_regions): Move from simple.el.
(Vsaved_region_selection, Qx_set_selection, QPRIMARY, Qlazy): New
vars.
(command_loop_1): Set window selection prior to deactivating the
mark.
* src/xselect.c (QPRIMARY): Move to keyboard.c.
author | Chong Yidong <cyd@stupidchicken.com> |
---|---|
date | Sat, 07 Aug 2010 15:39:04 -0400 |
parents | 66513d8e67ea |
children | ef719132ddfa |
rev | line source |
---|---|
86605
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
1 (nxml-define-char-name-set 'buhid |
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
2 '(("BUHID LETTER A" #x1740) |
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
3 ("BUHID LETTER I" #x1741) |
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
4 ("BUHID LETTER U" #x1742) |
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
5 ("BUHID LETTER KA" #x1743) |
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
6 ("BUHID LETTER GA" #x1744) |
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
7 ("BUHID LETTER NGA" #x1745) |
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
8 ("BUHID LETTER TA" #x1746) |
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
9 ("BUHID LETTER DA" #x1747) |
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
10 ("BUHID LETTER NA" #x1748) |
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
11 ("BUHID LETTER PA" #x1749) |
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
12 ("BUHID LETTER BA" #x174A) |
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
13 ("BUHID LETTER MA" #x174B) |
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
14 ("BUHID LETTER YA" #x174C) |
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
15 ("BUHID LETTER RA" #x174D) |
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
16 ("BUHID LETTER LA" #x174E) |
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
17 ("BUHID LETTER WA" #x174F) |
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
18 ("BUHID LETTER SA" #x1750) |
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
19 ("BUHID LETTER HA" #x1751) |
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
20 ("BUHID VOWEL SIGN I" #x1752) |
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
21 ("BUHID VOWEL SIGN U" #x1753) |
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
22 )) |
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
23 |
66513d8e67ea
Move here from lisp/nxml/char-name/unicode
Glenn Morris <rgm@gnu.org>
parents:
diff
changeset
|
24 ;; arch-tag: a30b6352-4c93-4908-a5df-0172b643ae23 |