method remove s = if auto_read_write then M.read_multiclip st_clip; M.remove (M.storable_get_multiclip st_clip) s; if auto_read_write then M.write_multiclip st_clip; self#update