But how to do it？


Besides， I‘m glad to view your opinions，so here comes the codes：


The place：(defun org-ctrl-c-ctrl-c       the first      (cond


add：

 (cond
   ((overlayp (car (overlays-at (point)))) (let ((overlay (car (overlays-at (point)))))
                              (if (overlayp overlay)
                              (delete-overlay overlay)
                              )))


so that I won’t make all overlays disappear at only once “C-c C-c”




Sent from Windows Mail