Am 15.10.2010 08:25, schrieb Noorul Islam K M:
Andreas Röhler<andreas.roeh...@easy-emacs.de>  writes:

Hi.

as org-mode knows a command `org-show-entry' looked for
`org-hide-entry', but couldn't get it.

So here it is.

Andreas

--
https://code.launchpad.net/~a-roehler/python-mode/python-mode-components


diff --git a/lisp/org.el b/lisp/org.el
index a80286f..df9ae99 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -19391,6 +19391,24 @@ Stop at the first and last subheadings of a superior 
heading."
       (org-end-of-subtree t t))
     nil))

+(defun org-hide-entry ()
+  "Hide the body directly following this heading. "
+  (interactive)
+  (save-excursion
+    (condition-case nil
+       (progn
+         (org-back-to-heading t)
+         (outline-flag-region
+          (max (point-min) (1- (point)))
+          (save-excursion
+            (if (re-search-forward
+                 (concat "[\r\n]\\(" outline-regexp "\\)") nil t)
+                (1- (match-beginning 1))
+              (point-max)))
+          t)
+         (org-cycle-hide-drawers 'children))
+      (error nil))))
+
  (defun org-show-entry ()
    "Show the body directly following this heading.
  Show the heading too, if it is currently invisible."

Are you going to use it in org-mode code base in future?

Thanks and Regards
Noorul



Hi,

telling the future is hard.
Concerning the present state, I'd say programm should follow certain rules, meet expectations.

Which one is hard to say again. So it's rather my personal view: if a forward- function exists, I expect a backward-.

If hide-something exists I expect show-something.

And so on.

With Emacs in general it's better to expect the uncommon rather than the common, but why not have both?

Yours

Andreas

_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode

Reply via email to