Re: VISIBILITY property and C-u C-u <TAB>

[Carsten Dominik <carsten.dominik@gmail.com>]

Applied, thanks.

- Carsten

On Oct 24, 2010, at 8:43 AM, Michael Brand wrote:

>> On Oct 17, 2010, at 5:41 PM, Gez wrote:
>>> C-u C-u TAB also cycles when it's repeated.
>
> I have also noticed this buglet and have used a workaround until now.
>
> On Fri, Oct 22, 2010 at 18:14, Carsten Dominik
> <carsten.dominik@gmail.com> wrote:
>> I believe I have fixed this, please verify.
>
> Thank you for this, it resolves both `C-u C-u TAB' and
> `C-u C-u C-u TAB' except for the special case with the variable
> org-cycle-global-at-bob. For this special case I suggest additionally:
>
> ============================================================
> --- a/lisp/org.el
> +++ b/lisp/org.el
> @@ -5772,7 +5772,8 @@ in special contexts.
>   `org-cycle-emulate-tab' for details.
>
> - Special case: if point is at the beginning of the buffer and there  
> is
> -  no headline in line 1, this function will act as if called with  
> prefix arg.
> +  no headline in line 1, this function will act as if called with  
> prefix arg
> +  (C-u TAB, same as S-TAB) also when called without prefix arg.
>   But only if also the variable `org-cycle-global-at-bob' is t."
>   (interactive "P")
>   (org-load-modules-maybe)
> @@ -5798,7 +5799,7 @@ in special contexts.
>                      (if nstars (format "\\{1,%d\\}" nstars) "+")
>                      " \\|\\([ \t]*\\)\\([-+*]\\|[0-9]+[.)]\\) \\)"))
>             (t (concat "\\*" (if nstars (format "\\{1,%d\\} "  
> nstars) "+ ")))
> -          (bob-special (and org-cycle-global-at-bob (bobp)
> +          (bob-special (and org-cycle-global-at-bob (not arg) (bobp)
>                             (not (looking-at outline-regexp))))
>           (org-cycle-hook
>            (if bob-special
> ============================================================
>
> Michael