Mercurial > emacs
view etc/nxml/02400-0243F.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 | 7d96f9094dcf |
children | ef719132ddfa |
line wrap: on
line source
(nxml-define-char-name-set 'control-pictures '(("SYMBOL FOR NULL" #x2400) ("SYMBOL FOR START OF HEADING" #x2401) ("SYMBOL FOR START OF TEXT" #x2402) ("SYMBOL FOR END OF TEXT" #x2403) ("SYMBOL FOR END OF TRANSMISSION" #x2404) ("SYMBOL FOR ENQUIRY" #x2405) ("SYMBOL FOR ACKNOWLEDGE" #x2406) ("SYMBOL FOR BELL" #x2407) ("SYMBOL FOR BACKSPACE" #x2408) ("SYMBOL FOR HORIZONTAL TABULATION" #x2409) ("SYMBOL FOR LINE FEED" #x240A) ("SYMBOL FOR VERTICAL TABULATION" #x240B) ("SYMBOL FOR FORM FEED" #x240C) ("SYMBOL FOR CARRIAGE RETURN" #x240D) ("SYMBOL FOR SHIFT OUT" #x240E) ("SYMBOL FOR SHIFT IN" #x240F) ("SYMBOL FOR DATA LINK ESCAPE" #x2410) ("SYMBOL FOR DEVICE CONTROL ONE" #x2411) ("SYMBOL FOR DEVICE CONTROL TWO" #x2412) ("SYMBOL FOR DEVICE CONTROL THREE" #x2413) ("SYMBOL FOR DEVICE CONTROL FOUR" #x2414) ("SYMBOL FOR NEGATIVE ACKNOWLEDGE" #x2415) ("SYMBOL FOR SYNCHRONOUS IDLE" #x2416) ("SYMBOL FOR END OF TRANSMISSION BLOCK" #x2417) ("SYMBOL FOR CANCEL" #x2418) ("SYMBOL FOR END OF MEDIUM" #x2419) ("SYMBOL FOR SUBSTITUTE" #x241A) ("SYMBOL FOR ESCAPE" #x241B) ("SYMBOL FOR FILE SEPARATOR" #x241C) ("SYMBOL FOR GROUP SEPARATOR" #x241D) ("SYMBOL FOR RECORD SEPARATOR" #x241E) ("SYMBOL FOR UNIT SEPARATOR" #x241F) ("SYMBOL FOR SPACE" #x2420) ("SYMBOL FOR DELETE" #x2421) ("BLANK SYMBOL" #x2422) ("OPEN BOX" #x2423) ("SYMBOL FOR NEWLINE" #x2424) ("SYMBOL FOR DELETE FORM TWO" #x2425) ("SYMBOL FOR SUBSTITUTE FORM TWO" #x2426) )) ;; arch-tag: efc349c9-065d-4033-b261-7cb961c54072