Walkback in DSDN code

Not sure where to report this to - but finally decided to try DSDN (wow
- its very handy).

However I just entered a search for "automated build" and I get a
walkback in the following method:

highlightNextTargetIn: aUrlOrTextPresenter
        | aFindDetails |
        self canLocate ifFalse: [^self].
        aFindDetails := (FindDetails new)
                                pattern: DsdnSearch current searchFor;
                                isForwards: true;
                                isWholeWord: DsdnSearch current wholeWord;
                                isCaseSensitive: DsdnSearch current ignoreCase not;
                                isWrapAround: true;
                                yourself.
        (aUrlOrTextPresenter view)
                findNextWrapped: aFindDetails;
                lineScroll: (aUrlOrTextPresenter view lineFromPosition:
aUrlOrTextPresenter selectionRange first)

Basically - aUrlOrTextPresenter selectionRange first is a range (1 to:
0) - and so first raises an error.

A simple fix could be to  refactor this into a method and do something
like:?

presenterRange: aUrlOrTextPresenter
        | range |
        ^(range := aUrlOrTextPresenter selectionRange) isEmpty ifTrue: [1]
ifFalse: [range first]


Tim

Tim,

this is a known issue. See earlier post in this group:

http://groups.google.com/group/comp.lang.smalltalk.dolphin/browse_frm/thread/b17649e3f25da3d8/acd265d76679f29d?q=DSDN&rnum=6#acd265d76679f29d

Regards,
Janos

Janos,

> this is a known issue. See earlier post in this group:

Thanks for the reminder.  I've (finally) got round to updating the
download at http://www.smalltalk.vispa.com/files/dsdn.zip

--
Ian

Use the Reply-To address to contact me (limited validity).
Mail sent to the From address is ignored.