From: Christian Egli <christian.egli@sbs.ch>
To: emacs-orgmode@gnu.org
Subject: Re: [WORG] How to ediff folded Org files?
Date: Tue, 09 Apr 2013 09:29:28 +0200 [thread overview]
Message-ID: <878v4sb1rb.fsf@sbs.ch> (raw)
In-Reply-To: CALn3zoh-xvKJJMyAgyWN16P3dr2u6JXYLQ21SDKB_gXHU_uprA@mail.gmail.com
Michael Brand <michael.ch.brand@gmail.com> writes:
> But instead of the above I use this for ediff generally, it persists
> in Org mode:
>
> #+BEGIN_SRC emacs-lisp
> (add-hook 'ediff-prepare-buffer-hook 'f-ediff-prepare-buffer-hook-setup)
> (defun f-ediff-prepare-buffer-hook-setup ()
> ;; specific modes
> (cond ((eq major-mode 'org-mode)
> (f-org-vis-mod-maximum))
> ;; room for more modes
> )
> ;; all modes
> (setq truncate-lines nil))
> (defun f-org-vis-mod-maximum ()
> "Visibility: Show the most possible."
> (cond
> ((eq major-mode 'org-mode)
> (visible-mode 1) ; default 0
> (setq truncate-lines nil) ; no `org-startup-truncated' in hook
> (setq org-hide-leading-stars t)) ; default nil
> (t
> (message "ERR: not in Org mode")
> (ding))))
> > #+END_SRC
I condensed this to the following since I don't use truncate-lines and
org-hide-leading-stars
;; ediff for org-mode files
(add-hook 'ediff-prepare-buffer-hook
(lambda ()
(cond ((eq major-mode 'org-mode)
(visible-mode 1)))))
But now the problem now is that the visible-mode persists even when I
quit ediff. I tried to find a hook which lets me undo the visible-mode
but I couldn't find an obvious one. There is ediff-quit-hook but this is
done in the ediff-control-buffer.
Maybe after all it might be better to use ediff-select-hook and
ediff-unselect-hook.
Thanks
Christian
--
Christian Egli
Swiss Library for the Blind, Visually Impaired and Print Disabled
Grubenstrasse 12, CH-8045 Zürich, Switzerland
next prev parent reply other threads:[~2013-04-09 7:29 UTC|newest]
Thread overview: 12+ messages / expand[flat|nested] mbox.gz Atom feed top
2013-04-06 9:47 [WORG] How to ediff folded Org files? Thorsten Jolitz
2013-04-06 20:20 ` Marc-Oliver Ihm
2013-04-06 21:32 ` Thorsten Jolitz
2013-04-06 22:24 ` Michael Brand
2013-04-06 22:40 ` Thorsten Jolitz
2013-04-06 23:01 ` Bill White
2013-04-09 7:29 ` Christian Egli [this message]
2013-12-19 19:00 ` Michael Brand
2013-07-31 23:19 ` Ratish Punnoose
2013-08-01 14:44 ` Thorsten Jolitz
2013-08-01 15:09 ` Rémi Vanicat
2013-08-02 12:22 ` Suvayu Ali
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=878v4sb1rb.fsf@sbs.ch \
--to=christian.egli@sbs.ch \
--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).