let
paste () =
match
!buffer
with
None
->
None
|
Some
e
->
Some
(copy_report_ele e)