|
@@ -663,11 +663,10 @@ region as a drawer without further ado."
|
|
|
(when (invisible-p (max (1- (point)) (point-min)))
|
|
|
(goto-char post)))))))
|
|
|
|
|
|
-(defun org-cycle-hide-drawers (state &optional exceptions)
|
|
|
+(defun org-cycle-hide-drawers (state &optional _)
|
|
|
"Re-hide all drawers after a visibility state change.
|
|
|
STATE should be one of the symbols listed in the docstring of
|
|
|
-`org-cycle-hook'. When non-nil, optional argument EXCEPTIONS is
|
|
|
-a list of strings specifying which drawers should not be hidden."
|
|
|
+`org-cycle-hook'."
|
|
|
(declare (obsolete "use `org-hide-drawer' instead." "Org 9.4"))
|
|
|
(when (and (derived-mode-p 'org-mode)
|
|
|
(not (memq state '(overview folded contents))))
|