emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
* noutline bug
@ 2007-06-04 17:34 Aaron Kaplan
  2007-06-04 18:16 ` Carsten Dominik
  0 siblings, 1 reply; 2+ messages in thread
From: Aaron Kaplan @ 2007-06-04 17:34 UTC (permalink / raw)
  To: emacs-orgmode

A bug in xemacs/noutline.el was brought to the surface by a couple of
recent org-mode changes.  Here are some test cases:

-------snip-----------------
* Heading 1
  note


* Heading 2
** subheading
-------snip-----------------

If org-cycle-separator-lines is 2 then doing org-cycle on Heading 1
fails to fold it, and if subheading is followed by the end of the file
then org-cycle on Heading 2 fails to fold it as well.  These two
problems surfaced because of two different org-mode changes, but I
traced both problems back to the same misplaced parenthesis in
noutline.el: 

*** noutline.el 2007/06/04 17:03:41     1.1
--- noutline.el 2007/06/04 17:22:18
***************
*** 724,733 ****
  		  (set-extent-endpoints (copy-extent ex)
  					(extent-start-position ex) beg)
  		  (set-extent-endpoints ex end (extent-end-position ex)))
!             (set-extent-endpoints ex (extent-start-position ex) beg)))
  	  (if (> (extent-end-position ex) end)
  	      (set-extent-endpoints ex end (extent-end-position ex))
!              (delete-extent ex)))
       (current-buffer) beg end nil 'end-closed 'outline)))
  
  (defun outline-flag-region (from to flag)
--- 724,733 ----
  		  (set-extent-endpoints (copy-extent ex)
  					(extent-start-position ex) beg)
  		  (set-extent-endpoints ex end (extent-end-position ex)))
!             (set-extent-endpoints ex (extent-start-position ex) beg))
  	  (if (> (extent-end-position ex) end)
  	      (set-extent-endpoints ex end (extent-end-position ex))
!              (delete-extent ex))))
       (current-buffer) beg end nil 'end-closed 'outline)))
  
  (defun outline-flag-region (from to flag)


You might want to do a bit of reindenting while you're in there, it
looks like this file has been edited by people with different tab widths
at different times.

-Aaron

^ permalink raw reply	[flat|nested] 2+ messages in thread

* Re: noutline bug
  2007-06-04 17:34 noutline bug Aaron Kaplan
@ 2007-06-04 18:16 ` Carsten Dominik
  0 siblings, 0 replies; 2+ messages in thread
From: Carsten Dominik @ 2007-06-04 18:16 UTC (permalink / raw)
  To: Aaron Kaplan; +Cc: emacs-orgmode


Hi Aaron,

thank you very much, I have applied the patch.

- Carsten


On Jun 4, 2007, at 19:34, Aaron Kaplan wrote:

> A bug in xemacs/noutline.el was brought to the surface by a couple of
> recent org-mode changes.  Here are some test cases:
>
> -------snip-----------------
> * Heading 1
>   note
>
>
> * Heading 2
> ** subheading
> -------snip-----------------
>
> If org-cycle-separator-lines is 2 then doing org-cycle on Heading 1
> fails to fold it, and if subheading is followed by the end of the file
> then org-cycle on Heading 2 fails to fold it as well.  These two
> problems surfaced because of two different org-mode changes, but I
> traced both problems back to the same misplaced parenthesis in
> noutline.el:
>
> *** noutline.el 2007/06/04 17:03:41     1.1
> --- noutline.el 2007/06/04 17:22:18
> ***************
> *** 724,733 ****
>   		  (set-extent-endpoints (copy-extent ex)
>   					(extent-start-position ex) beg)
>   		  (set-extent-endpoints ex end (extent-end-position ex)))
> !             (set-extent-endpoints ex (extent-start-position ex) 
> beg)))
>   	  (if (> (extent-end-position ex) end)
>   	      (set-extent-endpoints ex end (extent-end-position ex))
> !              (delete-extent ex)))
>        (current-buffer) beg end nil 'end-closed 'outline)))
>
>   (defun outline-flag-region (from to flag)
> --- 724,733 ----
>   		  (set-extent-endpoints (copy-extent ex)
>   					(extent-start-position ex) beg)
>   		  (set-extent-endpoints ex end (extent-end-position ex)))
> !             (set-extent-endpoints ex (extent-start-position ex) beg))
>   	  (if (> (extent-end-position ex) end)
>   	      (set-extent-endpoints ex end (extent-end-position ex))
> !              (delete-extent ex))))
>        (current-buffer) beg end nil 'end-closed 'outline)))
>
>   (defun outline-flag-region (from to flag)
>
>
> You might want to do a bit of reindenting while you're in there, it
> looks like this file has been edited by people with different tab 
> widths
> at different times.
>
> -Aaron
>
>
> _______________________________________________
> 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

^ permalink raw reply	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2007-06-04 18:16 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2007-06-04 17:34 noutline bug Aaron Kaplan
2007-06-04 18:16 ` Carsten Dominik

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).