/usr/lib/ruby/1.9.1/tk/clipboard.rb is in libtcltk-ruby1.9.1 1.9.3.0-1ubuntu1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 | #
# tk/clipboard.rb : methods to treat clipboard
#
require 'tk'
module TkClipboard
include Tk
extend Tk
TkCommandNames = ['clipboard'.freeze].freeze
def self.clear(win=nil)
if win
tk_call_without_enc('clipboard', 'clear', '-displayof', win)
else
tk_call_without_enc('clipboard', 'clear')
end
end
def self.clear_on_display(win)
tk_call_without_enc('clipboard', 'clear', '-displayof', win)
end
def self.get(type=nil)
if type
tk_call_without_enc('clipboard', 'get', '-type', type)
else
tk_call_without_enc('clipboard', 'get')
end
end
def self.get_on_display(win, type=nil)
if type
tk_call_without_enc('clipboard', 'get', '-displayof', win, '-type', type)
else
tk_call_without_enc('clipboard', 'get', '-displayof', win)
end
end
def self.set(data, keys=nil)
clear
append(data, keys)
end
def self.set_on_display(win, data, keys=nil)
clear(win)
append_on_display(win, data, keys)
end
def self.append(data, keys=nil)
args = ['clipboard', 'append']
args.concat(hash_kv(keys))
args.concat(['--', data])
tk_call(*args)
end
def self.append_on_display(win, data, keys=nil)
args = ['clipboard', 'append', '-displayof', win]
args.concat(hash_kv(keys))
args.concat(['--', data])
tk_call(*args)
end
def clear
TkClipboard.clear_on_display(self)
self
end
def get(type=nil)
TkClipboard.get_on_display(self, type)
end
def set(data, keys=nil)
TkClipboard.set_on_display(self, data, keys)
self
end
def append(data, keys=nil)
TkClipboard.append_on_display(self, data, keys)
self
end
end
|