Re: hiding footnotes

[42 147 <aeuster@gmail.com>]

[-- Attachment #1: Type: text/plain, Size: 1628 bytes --]

Set it to 20, thanks.

Hopefully I never need to hit the 26 limit.

2012/11/29 Nick Dokos <nicholas.dokos@hp.com>

> 42 147 <aeuster@gmail.com> wrote:
>
> > Very nice.
> >
> > However, I'd like to write a function that toggles the color value
> (without
> > recourse to the customize menu), since it would be useful to highlight
> the
> > footnotes from time to time.
> >
>
> Anything that can be done interactively can also be done
> programatically. You know what face you are dealing with, you can get
> its foreground color with face-foreground, and you can set it with
> set-face-attribute. A crude implementation to show the basic outline:
>
> --8<---------------cut here---------------start------------->8---
> (setq org-footnote-fg-color (face-foreground 'org-footnote))
>
> (setq org-text-fg-color (face-foreground 'default))
>
> (defun my-toggle-footnote-fg-color ()
>   "Toggle the org-footnote face foreground color."
>   (interactive)
>   (let ((fg (face-foreground 'org-footnote)))
>     (if (string-equal fg org-footnote-fg-color)
>         (set-face-attribute 'org-footnote nil :foreground
> org-text-fg-color)
>       (set-face-attribute 'org-footnote nil :foreground
> org-footnote-fg-color))))
> --8<---------------cut here---------------end--------------->8---
>
> The difficulties start (but do not end) with footnotes in all sorts of
> weird places (e.g. headlines) with all sorts of different
> fontifications. You'd want to blend the footnote with its immediate
> surroundings.
>
> Taking care of such situations (and various others that the above code
> mishandles) is left as an exercise...
>
> Nick
>

[-- Attachment #2: Type: text/html, Size: 2185 bytes --]