瀏覽代碼

org.el: Emulate outline's buffer-invisiblity-spec in orgstruct-mode

* org.el (orgstruct-mode): Emulate outline's
buffer-invisiblity-spec.
Christopher Schmidt 12 年之前
父節點
當前提交
ce6c048305
共有 1 個文件被更改,包括 4 次插入0 次删除
  1. 4 0
      lisp/org.el

+ 4 - 0
lisp/org.el

@@ -8716,6 +8716,10 @@ modes.  The following keys behave as if Org-mode were active, if
 the cursor is on a headline, or on a plain list item (both as
 defined by Org-mode)."
   nil " OrgStruct" (make-sparse-keymap)
+  (funcall (if orgstruct-mode
+	       'add-to-invisibility-spec
+	     'remove-from-invisibility-spec)
+	   '(outline . t))
   (when orgstruct-mode
     (org-load-modules-maybe)
     (unless orgstruct-initialized