Mercurial > emacs
view lisp/toolbar/lc-paste.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 | e3fc28ed75ac |
| children |
line wrap: on
line source
/* XPM */ static char * paste2_xpm[] = { "24 24 8 1", " c None", ". c #FFFFFF", "+ c #BBBDBA", "@ c #000100", "# c #6B6B66", "$ c #504D46", "% c #D3B354", "& c #974F3D", " @@@@ ", " @@@@@@+..#@@@@@@ ", "@.....$.++#$+...+@ ", "@.++++$.##+$#+++%@ ", "@.+++$..+++#$#++%@ ", "@.++$++++++#$$++%@ ", "@.++#$$$$$$$$#++%@ ", "@.+++########+++%@ ", "@.+++++#$@@@@@$$@@@@@ ", "@.+++++$+...........+@ ", "@.+++++$.............@ ", "@.+++++@.+##+..+#.#+.@ ", "@.+++++@.............@ ", "@.+++++$.##.###+.+#..@ ", "@.+++++$.............@ ", "@.+++++$.+##.###+.+#.@ ", "@.+++++@.............@ ", "@.+++++@.##.###+.+#..@ ", "@.+++++$.............@ ", "@.+++++$.+##.###+.+#.@ ", "@+%%%%&@.............@ ", " @@@@@@@+...........+@ ", " @@@@@@@@@@@@@ ", " "};