diff options
author | Carsten Dominik <carsten.dominik@gmail.com> | 2009-11-15 10:01:23 +0100 |
---|---|---|
committer | Carsten Dominik <carsten.dominik@gmail.com> | 2009-11-15 10:01:23 +0100 |
commit | c6a2f2deae382d5f21a5d1dcc4a404a5106a82f1 (patch) | |
tree | 7c427c47229ea4eba6c1d908f20b4cda617e09ea | |
parent | 2129ea6494da529925bb5f05581aa652a7cfb6e0 (diff) | |
download | org-mode-c6a2f2deae382d5f21a5d1dcc4a404a5106a82f1.tar.gz |
Remove unused function `org-compact-display-after-subtree-move'
-rwxr-xr-x | lisp/ChangeLog | 1 | ||||
-rw-r--r-- | lisp/org.el | 13 |
2 files changed, 1 insertions, 13 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 128d4c6..5c48eb1 100755 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -2,6 +2,7 @@ * org.el (org-set-effort): Improve prompt. (org-get-outline-path): Widen to get full path. + (org-compact-display-after-subtree-move): Function removed. * org-latex.el (org-export-as-latex): Add the :drawers property. diff --git a/lisp/org.el b/lisp/org.el index feddf0b..bf6573b 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -5413,19 +5413,6 @@ This function is the default value of the hook `org-cycle-hook'." ((eq state 'children) (or (org-subtree-end-visible-p) (recenter 1))) ((eq state 'subtree) (or (org-subtree-end-visible-p) (recenter 1)))))) -;; FIXME: no longer in use -(defun org-compact-display-after-subtree-move () - "Show a compacter version of the tree of the entry's parent." - (save-excursion - (if (org-up-heading-safe) - (progn - (hide-subtree) - (show-entry) - (show-children) - (org-cycle-show-empty-lines 'children) - (org-cycle-hide-drawers 'children)) - (org-overview)))) - (defun org-remove-empty-overlays-at (pos) "Remove outline overlays that do not contain non-white stuff." (mapc |