comparison lisp/simple.el @ 85997:12109b56601f

(interprogram-cut-function, interprogram-paste-function): Don't make them frame-local any more.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Fri, 09 Nov 2007 20:55:29 +0000
parents 69cfa82e45bb
children 108c751714f7 880960b70474
comparison
equal deleted inserted replaced
85996:79b1a2c5b3cb 85997:12109b56601f
2559 The first argument, TEXT, is a string containing 2559 The first argument, TEXT, is a string containing
2560 the text which should be made available. 2560 the text which should be made available.
2561 The second, optional, argument PUSH, has the same meaning as the 2561 The second, optional, argument PUSH, has the same meaning as the
2562 similar argument to `x-set-cut-buffer', which see.") 2562 similar argument to `x-set-cut-buffer', which see.")
2563 2563
2564 (make-variable-frame-local 'interprogram-cut-function)
2565
2566 (defvar interprogram-paste-function nil 2564 (defvar interprogram-paste-function nil
2567 "Function to call to get text cut from other programs. 2565 "Function to call to get text cut from other programs.
2568 2566
2569 Most window systems provide some sort of facility for cutting and 2567 Most window systems provide some sort of facility for cutting and
2570 pasting text between the windows of different programs. 2568 pasting text between the windows of different programs.
2586 than Emacs has provided a string for pasting; if Emacs provided the 2584 than Emacs has provided a string for pasting; if Emacs provided the
2587 most recent string, the function should return nil. If it is 2585 most recent string, the function should return nil. If it is
2588 difficult to tell whether Emacs or some other program provided the 2586 difficult to tell whether Emacs or some other program provided the
2589 current string, it is probably good enough to return nil if the string 2587 current string, it is probably good enough to return nil if the string
2590 is equal (according to `string=') to the last text Emacs provided.") 2588 is equal (according to `string=') to the last text Emacs provided.")
2591
2592 (make-variable-frame-local 'interprogram-paste-function)
2593 2589
2594 2590
2595 2591
2596 ;;;; The kill ring data structure. 2592 ;;;; The kill ring data structure.
2597 2593