From: "Scott Jaderholm" <jaderholm@gmail.com>
To: Carsten Dominik <dominik@science.uva.nl>
Cc: emacs-orgmode@gnu.org
Subject: Re: no blank lines in org file opened in Emacs on Windows
Date: Fri, 20 Apr 2007 08:59:26 -0600 [thread overview]
Message-ID: <b2e202b30704200759w5bf80a7dob0524b308e60a481@mail.gmail.com> (raw)
In-Reply-To: <3a1bfc164968651192935a29ea98ea08@science.uva.nl>
[-- Attachment #1.1: Type: text/plain, Size: 3653 bytes --]
On 4/20/07, Carsten Dominik <dominik@science.uva.nl> wrote:
>
> You probably have Emacs 21 under Linux and Emacs 22 under Windows.
> This is a difference in the implementation of `outline-hide-sublevels'
> between these versions, and Org-mode simply calls this function.
Thanks Carsten, you're right on. I really like the emacs21 behavior a lot
more than that of emacs 22.
I believe you could take the Emacs 21 definition of this function and
> overwrite the Emacs 22 one by placing the definition into
> outline-mode-hook, but I have not tested this.
I found a hide-sublevels in outline.el but never found any
outline-hide-sublevels, so I assume they're they same.
(defun hide-sublevels (levels)
"Hide everything but the top LEVELS levels of headers, in whole buffer."
(interactive "p")
(if (< levels 1)
(error "Must keep at least one level of headers"))
(setq levels (1- levels))
(let (outline-view-change-hook)
(save-excursion
(goto-char (point-min))
;; Keep advancing to the next top-level heading.
(while (or (and (bobp) (outline-on-heading-p))
(outline-next-heading))
(let ((end (save-excursion (outline-end-of-subtree) (point))))
;; Hide everything under that.
(outline-flag-region (point) end t)
;; Show the first LEVELS levels under that.
(if (> levels 0)
(show-children levels))
;; Move to the next, since we already found it.
(goto-char end)))))
(run-hooks 'outline-view-change-hook))
(add-hook 'outline-mode-hook 'hide-sublevels)
I gave this a try but it didn't work automatically, and I don't know where
to go from here.
Debugger entered--Lisp error: (wrong-number-of-arguments #[(levels) [A whole
bunch of special characters here]
[levels outline-view-change-hook beg end 1 error "Must keep at least one
level of headers" nil outline-on-heading-p t outline-next-heading
outline-flag-region outline-map-region #[nil "\b [outline-level levels
outline-show-heading] 2] run-hooks] 4 ("c:/Program
Files/Emacs/emacs/lisp/outline.elc" . 28111) (list (cond (current-prefix-arg
(prefix-numeric-value current-prefix-arg)) ((save-excursion
(beginning-of-line) (looking-at outline-regexp)) (funcall outline-level)) (t
1)))] 0)
Thanks,
Scott
On Apr 19, 2007, at 23:18, Scott Jaderholm wrote:
>
> > On Linux I can have org open a file and display it like this:
> >
> > * Local Settings...
> >
> > * Projects
> > ** Foo
> >
> > * Something
> >
> > Notice that it's nice about letting me having blank lines between my
> > top level headings, even though they are to some degree compacted. I
> > think my setting is "content" for how expanded it should be.
> >
> > When I open the same file in Emacs on Windows, with the same
> > configuration files, I get this:
> >
> > * Local Settings...
> > * Projects
> > ** Foo
> > * Something
> >
> > There are no blank lines at all, but if I use S-Tab to expand it all
> > out there are plenty of blank lines.
> >
> > The file does say it's in Unix mode and I suspect this problem is more
> > likely caused by a setting I have wrong than a bug. Has anyone seen
> > this before or have an idea what is causing this behavior?
> >
> > Thanks,
> > Scott
> >
> >
> > _______________________________________________
> > Emacs-orgmode mailing list
> > Emacs-orgmode@gnu.org
> > http://lists.gnu.org/mailman/listinfo/emacs-orgmode
> >
>
> --
> Carsten Dominik
> Sterrenkundig Instituut "Anton Pannekoek"
> Universiteit van Amsterdam
> Kruislaan 403
> NL-1098SJ Amsterdam
> phone: +31 20 525 7477
>
>
[-- Attachment #1.2: Type: text/html, Size: 5054 bytes --]
[-- Attachment #2: Type: text/plain, Size: 149 bytes --]
_______________________________________________
Emacs-orgmode mailing list
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode
next prev parent reply other threads:[~2007-04-20 15:04 UTC|newest]
Thread overview: 5+ messages / expand[flat|nested] mbox.gz Atom feed top
2007-04-19 21:18 no blank lines in org file opened in Emacs on Windows Scott Jaderholm
2007-04-20 6:52 ` Carsten Dominik
2007-04-20 14:59 ` Scott Jaderholm [this message]
2007-04-20 16:47 ` Carsten Dominik
2007-04-20 19:54 ` Scott Jaderholm
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.orgmode.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=b2e202b30704200759w5bf80a7dob0524b308e60a481@mail.gmail.com \
--to=jaderholm@gmail.com \
--cc=dominik@science.uva.nl \
--cc=emacs-orgmode@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).