瀏覽代碼

org-inlinetask: Fix visibility toggling

* lisp/org-inlinetask.el (org-inlinetask-toggle-visibility): Fix
  visibility toggling when starting with a link.

Reported-by: Anders Johansson <mejlaandersj@gmail.com>
<http://permalink.gmane.org/gmane.emacs.orgmode/97603>
Nicolas Goaziou 10 年之前
父節點
當前提交
f7173d551d
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      lisp/org-inlinetask.el

+ 1 - 1
lisp/org-inlinetask.el

@@ -314,7 +314,7 @@ If the task has an end part, also demote it."
      ;; Nothing to show/hide.
      ((= end start))
      ;; Inlinetask was folded: expand it.
-     ((get-char-property (1+ start) 'invisible)
+     ((eq (get-char-property (1+ start) 'invisible) 'outline)
       (outline-flag-region start end nil)
       (org-cycle-hide-drawers 'children))
      (t (outline-flag-region start end t)))))