emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
From: Michael Brand <michael.ch.brand@gmail.com>
To: Org Mode <emacs-orgmode@gnu.org>
Subject: Re: [WORG] How to ediff folded Org files?
Date: Thu, 19 Dec 2013 20:00:19 +0100	[thread overview]
Message-ID: <CALn3zoh5UAZWzSukBrngFiE=XRFprVm4H0g3fHLSQCPTGWN3DA@mail.gmail.com> (raw)
In-Reply-To: <CALn3zoh-xvKJJMyAgyWN16P3dr2u6JXYLQ21SDKB_gXHU_uprA@mail.gmail.com>

Hi all

An update for this thread from April:

On Sun, Apr 7, 2013 at 12:24 AM, Michael Brand
<michael.ch.brand@gmail.com> wrote:
> #+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 ()
[...]
> #+END_SRC

To get the "=>" in narrowed columns of aligned tables out of the way I
changed f-org-vis-mod-maximum in the meantime:

#+BEGIN_SRC emacs-lisp
  (defun f-org-vis-mod-maximum ()
    "Org visibility: Modify settings to show maximum.
  Useful for e. g. `ediff-prepare-buffer-hook' in Org buffer."
    (interactive)
    (cond
     ((eq major-mode 'org-mode)
      (setq truncate-lines nil)
      (visible-mode 1)
      ;; Get the "=>" in narrowed columns of aligned tables out of the way.
      ;; - It is important to also remove the text property "invisible" for
      ;;   the case that the Visible mode is turned off after the removed "=>"
      ;;   does not indicate invisible content anymore.
      ;; - Negative site effect to put up with: When the Visible mode is
      ;;   turned off again it will show some parts that were invisible before
      (with-silent-modifications
        (remove-text-properties
         (point-min) (point-max)
         (list 'invisible 'dummy-prop-or-val  ; e. g. truncated table field
               'display   'dummy-prop-or-val))))  ; e. g. the "=>" in a table
     (t
      (message "ERR: not in Org mode")
      (ding))))
#+END_SRC

Michael

  parent reply	other threads:[~2013-12-19 19:00 UTC|newest]

Thread overview: 12+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2013-04-06  9:47 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
2013-12-19 19:00       ` Michael Brand [this message]
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='CALn3zoh5UAZWzSukBrngFiE=XRFprVm4H0g3fHLSQCPTGWN3DA@mail.gmail.com' \
    --to=michael.ch.brand@gmail.com \
    --cc=emacs-orgmode@gnu.org \
    --subject='Re: [WORG] How to ediff folded Org files?' \
    /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

Code repositories for project(s) associated with this 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).