.emacs-my
changeset 298 9fdaecd9336d
parent 297 d5e742141a44
child 299 459f0024fcea
equal deleted inserted replaced
297:d5e742141a44 298:9fdaecd9336d
   144 
   144 
   145 ;; 1/-1, when the mark is active, the region is highlighted.
   145 ;; 1/-1, when the mark is active, the region is highlighted.
   146 (transient-mark-mode 1)
   146 (transient-mark-mode 1)
   147 (delete-selection-mode 1)               ; 1/-1
   147 (delete-selection-mode 1)               ; 1/-1
   148 
   148 
   149 ;; Order of next item is important.
   149 ;; Order of next items is important, (assignment must done before pc-selection-mode enabled).
   150 (require 'pc-select)
   150 (require 'pc-select)
   151 ;; To avoid some key bindings as F6, etc. Must set before 'pc-selection-mode' invoke.
   151 (setq pc-select-selection-keys-only t)  ; To avoid some key bindings as F6, etc.
   152 (setq pc-select-selection-keys-only t)
   152 (setq pc-select-meta-moves-sexps t)
   153 (setq pc-select-meta-moves-sexps t)     ; must set before pc-selection-mode enable
       
   154 (pc-selection-mode 1)
   153 (pc-selection-mode 1)
   155 
   154 
   156 (when (eq window-system 'x)
   155 (when (eq window-system 'x)
   157   (setq x-select-enable-clipboard t)    ; for Emacs 21.2.1 and newer
   156   (setq x-select-enable-clipboard t)    ; for Emacs 21.2.1 and newer
   158   )
   157   )