view etc/images/diropen.xpm @ 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.

/* XPM */
static char * diropen_xpm[] = {
"19 24 17 1",
" 	c None",
".	c #000100",
"+	c #C6C9A6",
"@	c #D0D3AF",
"#	c #93997C",
"$	c #E6E7D0",
"%	c #BEC19E",
"&	c #B4B895",
"*	c #A7AA88",
"=	c #6B6D59",
"-	c #4A4E40",
";	c #7C8166",
">	c #898E72",
",	c #3C4032",
"'	c #575845",
")	c #34332C",
"!	c #24231D",
"  ...............  ",
" .+@@@@@@@@@@@@@#. ",
".$@@@@@@@@@@@@@@@#.",
".++++%%%%%%%%%&&&*.",
".&&&&&&&&&&******#.",
".*%+++%%%%%%%%%&=#.",
".*+***********##-#.",
".*+****;===;####-#.",
".*+****=*****###-#.",
".*+****;*****###-#.",
".*+****########>-#.",
".*&######>>>>>>>,>.",
".*#-------------'>)",
".*&&&&&&&&&&&&&*#>)",
".*&************#'>)",
".*&***********##,>)",
".*&****====;###>,>)",
".#&****=**#**##>,;)",
".#&****>****###>,;)",
".#&****########>,;)",
".##''''''''''''',;)",
".#>==============;)",
".''''''''''''''''-!",
" ................. "};