Lines Matching defs:global
236 ;; The final feature provided by CUA is the "global mark", which
238 ;; files into the current text. To enable and cancel the global mark,
239 ;; use [S-C-space]. The cursor will blink when the global mark
240 ;; is active. The following commands behave differently when the global
243 ;; at the global mark!
245 ;; at the global mark, and the global mark is advanced.
247 ;; at the global mark, and the global mark is advanced.
248 ;; [C-v] Copies a single character to the global mark.
250 ;; global mark.
251 ;; [backspace] deletes the character before the global mark, while
252 ;; [delete] deltes the character after the global mark.
254 ;; [S-C-space] Jumps to and cancels the global mark.
255 ;; [C-u S-C-space] Cancels the global mark (stays in current buffer).
258 ;; global mark.
402 (defvar cua-global-keymap) ; forward
411 (define-key cua-global-keymap value
432 "*If non-nil, automatically show help for region, rectangle and global mark."
451 (defcustom cua-global-mark-keep-visible t
452 "*If non-nil, always keep global mark visible in other window."
456 (defface cua-global-mark
460 "*Font used by CUA for highlighting the global mark."
463 (defcustom cua-global-mark-blink-cursor-interval 0.20
464 "*Blink cursor at this interval when global mark is active."
558 (defcustom cua-global-mark-cursor-color "cyan"
559 "*Indication for active global mark.
600 (autoload 'cua-toggle-global-mark "cua-gmrk" nil t nil)
605 (defvar cua--global-mark-active)
606 (setq cua--global-mark-active nil))
673 ;; are inactive, so the timeout in cua-global-keymap binding is used, or the
674 ;; normal prefix key binding from the global or local map will be used.
867 ;;; Generic commands for regions, rectangles, and global marks
870 "Cancel the active region, rectangle, or global mark."
881 If global mark is active, copy from register or one character."
890 (cua--global-mark-active
892 (cua--insert-at-global-mark regtxt)
894 (cua--insert-at-global-mark (filter-buffer-substring (point) (+ (point) count)))
1075 global mark ring if last mark was set in another buffer.
1078 the local mark ring (this does not affect the global mark ring).
1079 Use \\[pop-global-mark] to jump to a mark off the global mark ring
1080 \(see `pop-global-mark').
1086 off the local (or global) mark ring.
1096 ((and (eq last-command 'pop-global-mark) (not arg))
1097 (setq this-command 'pop-global-mark)
1098 (pop-global-mark))
1163 ((and cua--global-mark-active
1164 cua-global-mark-cursor-color)
1165 cua-global-mark-cursor-color)
1270 (when cua--global-mark-active
1271 (cua--global-mark-post-command))
1315 ;; global-map.
1316 (if (memq (global-key-binding (this-single-command-keys))
1320 (defvar cua-global-keymap (make-sparse-keymap)
1326 (defvar cua--global-mark-keymap (make-sparse-keymap)) ; Initalized when cua-gmrk.el is loaded
1334 (defvar cua--ena-global-mark-keymap nil)
1340 (cua--ena-global-mark-keymap . ,cua--global-mark-keymap)
1343 (cua-mode . ,cua-global-keymap)))
1366 (setq cua--ena-global-mark-keymap
1367 (and cua--global-mark-active
1400 (define-key cua-global-keymap cua-rectangle-mark-key 'cua-set-rectangle-mark)
1402 (cua--M/H-key cua-global-keymap ?\s 'cua-set-rectangle-mark)
1403 (define-key cua-global-keymap
1406 (define-key cua-global-keymap [(shift control ?\s)] 'cua-toggle-global-mark)
1409 (define-key cua-global-keymap [remap yank] 'cua-paste)
1410 (define-key cua-global-keymap [remap clipboard-yank] 'cua-paste)
1411 (define-key cua-global-keymap [remap x-clipboard-yank] 'cua-paste)
1413 (define-key cua-global-keymap [remap yank-pop] 'cua-paste-pop)
1415 (define-key cua-global-keymap [remap set-mark-command] 'cua-set-mark)
1418 (define-key cua-global-keymap [remap scroll-up] 'cua-scroll-up)
1419 (define-key cua-global-keymap [remap scroll-down] 'cua-scroll-down)
1525 :global t