>>> Suraj Acharya <[EMAIL PROTECTED]> seems to think that:
>Hi Eric,
>
>Thanks for your answers.
>
>I've just checked out the code from CVS and it is neat. If you'd like
>I could take a shot at adding the addtional features from my code and
>creating a patch for semantic-fold.el.
I have not spent enough time to decide which is the better
implementation to start from... other than that mine crashes Emacs. ;)
If you think the baseline in semantic-cvs is better, feel free to
upgrade it.
>On Fri, 18 Feb 2005 22:27:23 -0500, Eric M. Ludlam
><[EMAIL PROTECTED]> wrote:
>> Hi,
>>
>> That is quite nifty. I wrote one also which is in CEDET CVS only
>> right now, but yours is much niftier. I like the "highlight" that is
>> the line down the side. That is a nice effect. The pre-existing
>> function `semantic-momentary-unhighlight-tag' could do well to emulate
>> it.
>>
>> In CEDET cvs, you will find new utility functions to make folding
>> easier, including `semantic-set-tag-folded' which works well with
>> isearch. That is in CVS in semantic-decorate.el.
>
>I'll take a look. Btw, if you set the 'reveal-toggle-invisible
>property on 'semantic-fold you can make the fringe bitmaps when if the
>tag is opened by reveal-mode.
I'm not that familiar with that mode, but the doc makes it sound
useful.
>> I my version, if I click on the little + or - in the fringe too
>> much, my Emacs would crash, so I didn't persue it very far as I still
>> need to produce a good bug report.
>>
>[...]
>> >4) Once semantic-decoration-mode is up and running and all the tags
>> >have been decorated, if I make any edits in a tag it looks like all
>> >the decorations for the tag are deleted and it is sent to the
>> >highlight-default function again. Is there any way for the function to
>> >be called with the old decorations intact so it can remove them only
>> >if it wants to ?
>> [ ... ]
>>
>> I'm not quite sure what you mean. Are you trying to prevent a folded
>> tag from being decorated by other decoration modes? That could be
>> tricky as you probably want to keep some, but disable others.
>
>What I'm trying to do is quite simple. Currently, if I unfold a tag,
>make some edits inside and then move outside it, then the next time
>the idle-timer kicks in and the tag is reparsed, it gets folded again.
>What I'd like is that it remember the fact that I unfolded the tag and
>not fold it. The simplest way to do this would be to somehow not clear
>the decorations on the tag at all, since any edits would not require
>them to be changed. Perhaps the <decoration-style>-highlight-default
>function could get called only for new tags, while something like
><decoration-style>-update-after-edits could get called when the tag is
>updated.
>
>But I don't know much about semantic internals, so this might not make
>sense. In that case I just can store the fold state as an attribute
>on the tag overlay or somewhere else.
[ ... ]
Ah, I see. I used decoration mode to put the markers in the file, but
not to actually fold the tags. Having tag folded or not is a separate
attribute which I placed on the tags using the new function
`semantic-set-tag-folded'. The option of folding all the tags (or
not) is then part of the major mode initialization.
As my version doesn't start stuff out folded, doing so would have
conflicting goals. I've tried to set things up so files are not
parsed until after the buffer is shown, with the exception of tags
loaded in from a database. This conflicts with the goal of forcing
the tags to be folded when the minor-mode starts up.
Loading a file might look like this:
- find-file
- foo-mode
- foo-mode-hook
- semantic-setup-foo-mode
- semantic-init
- semantic-init-hook
- semanticdb-semantic-init-hook-fcn
- semantic-tag-folding-mode
* If no tags from DB, setup a reparse hook
otherwise fold everything.
* file is displayed
- semantic-idle-scheduler
- semantic-fetch-tags
- semantic-after-toplevel-cache-change-hook
- semantic-folding-tag-mode-after-first-reparse-hook
* Decide if you want to fold all your new tags.
* remove hook from list.
Does that make sense?
One other thing I noticed:
>Here are a couple other comments I have about your code:
>
> "Returns non-nil if TAG is to be considered for folding. TAG
> has to have valid start and end locations in the
> buffer. Customize `semantic-tag-folding-allow-folding-of' to
> influence the output of this
> function."
> (let ((c (semantic-tag-class tag)))
> (and
> (semantic-tag-end tag)
> (semantic-tag-start tag)
You can use `semantic-tag-with-position-p' to find out if the tag has
a position.
Eric
--
Eric Ludlam: [EMAIL PROTECTED], [EMAIL PROTECTED]
Home: http://www.ludlam.net Siege: www.siege-engine.com
Emacs: http://cedet.sourceforge.net GNU: www.gnu.org
