- (term-send-raw-string
- ;; From `mouse-yank-primary':
- (or (if (fboundp 'x-get-selection-value)
- (if (eq system-type 'windows-nt)
- (or (x-get-selection 'PRIMARY)
- (x-get-selection-value))
- (or (x-get-selection-value)
- (x-get-selection 'PRIMARY)))
- (x-get-selection 'PRIMARY))
- (error "No selection is available")))))