method copy () = match self#selected_rr with None -> () | Some rr -> let row = rr#iter in let item = copy_item (store#get ~row ~column: col_data) in clipboard := Some item