Mercurial > emacs
annotate lisp/sb-tag-gt.xpm @ 56433:a7600d0e7fdc
(cua--preserve-mark-commands): New defvar.
Init to beginning-of-buffer and end-of-buffer.
(cua--undo-push-mark): New defvar.
(cua--pre-command-handler): Set inhibit-mark-movement if mark is
already active and command is in cua--preserve-mark-commands.
Also fix check for shift modifier on non-window systems.
(cua--post-command-handler): Clear inhibit-mark-movement if set.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Fri, 16 Jul 2004 10:42:26 +0000 |
parents | c2a09ac7b7b1 |
children |
rev | line source |
---|---|
28974 | 1 /* XPM */ |
2 static char * sb_tag_gt_xpm[] = { | |
55471 | 3 "20 15 5 1", |
28974 | 4 " c None", |
55471 | 5 ". c #B8B8B8", |
28974 | 6 "+ c #000000", |
7 "@ c #FFF993", | |
55471 | 8 "# c #828282", |
28974 | 9 " ", |
10 " ", | |
55471 | 11 " .............. ", |
12 " .++++++++++++++. ", | |
13 " .+@@@@@++@@@@@@@+#", | |
14 " .+@@@@@@+++@@@@@@+#", | |
15 ".+@@@@@@@++++@@@@@+#", | |
16 ".+@++@@@@+++++@@@@+#", | |
17 ".+@++@@@@+++++#@@@+#", | |
18 ".+@@@@@@@++++#@@@@+#", | |
19 " #+@@@@@@+++#@@@@@+#", | |
20 " #+@@@@@++#@@@@@@+#", | |
21 " #++++++#+++++++# ", | |
22 " ############## ", | |
28974 | 23 " "}; |