[BUG] ZDate(Object)>>doesNotUnderstand: #asDateAndTime ( try FixObsoleteChronologyClasses-nk )

[Frank Shearar]

> >>> "ned at squeakland.org" 02/17/04 17:33 >>>
>
>
> I posted a fix for these ZDate etc. objects on the 15th. Can
> you try it?

Sorry about replying directly - I can't use BFAV right now. After I file in
your changeset (I must confess I should have known it was there in the first
place!) the load update stops reporting errors but I get another walkback:

18 February 2004 9:53:12 am

VM: Win32 - a SmalltalkImage
Image: Squeak3.7alpha [latest update: #5707]

UndefinedObject(Object)>>doesNotUnderstand: #<
	Receiver: nil
	Arguments and temporary variables:
<<error during printing>
	Receiver's instance variables:
nil

Date(Timespan)>><
	Receiver: <<error during printing>>
	Arguments and temporary variables:
<<error during printing>
	Receiver's instance variables:
		start: 	nil
		duration: 	nil

Date(Magnitude)>>>
	Receiver: <<error during printing>>
	Arguments and temporary variables:
<<error during printing>
	Receiver's instance variables:
		start: 	nil
		duration: 	nil

[] in PatchArchive>>archivePostGroups {[:groupA :groupB | groupA
mostRecentDate > groupB mostRecentDate]}
	Arguments and temporary variables:
<<error during printing>>


--- The full stack ---
UndefinedObject(Object)>>doesNotUnderstand: #<
Date(Timespan)>><
Date(Magnitude)>>>
[] in PatchArchive>>archivePostGroups {[:groupA :groupB | groupA
mostRecentDate > groupB mostRecentDate]}
 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
SortedCollection>>should:precede:
SortedCollection>>sort:to:
SortedCollection>>reSort
SortedCollection>>addAll:
Array(Collection)>>asSortedCollection:
PatchArchive>>sortArchivePostGroupsUsing:
PatchArchive>>archivePostGroups
PatchArchiveClient>>postGroups
PatchArchiveClient>>filteredPostGroups
[] in PatchArchiveClient>>initializeListing {[startTime := Time
millisecondClockValue.  self filteredPostGroups   do: [:g...]}
BlockContext>>ensure:
CursorWithMask(Cursor)>>showWhile:
PatchArchiveClient>>initializeListing
PatchArchiveClient>>listing
[] in PatchArchiveClient>>summaryString {[:strm | self model archivePosts
size > 0   ifTrue: [strm nextPutAll: self l...]}
String class(SequenceableCollection class)>>streamContents:
PatchArchiveClient>>summaryString
[] in PatchArchiveClient>>defaultWindowLabel {[:strm |  strm nextPutAll:
self model serverUrl authority.  self model archi...]}
String class(SequenceableCollection class)>>streamContents:
PatchArchiveClient>>defaultWindowLabel
PatchArchiveClient>>setDefaultWindowLabel
PatchArchiveClient>>noteChanged
PatchArchiveClient>>initializeFilters
PatchArchiveClient>>on:
PatchArchiveClient class>>newOn:
[] in PatchArchiveClient
class>>openOn:withLabel:withColor:withDisplayGroupsPref: {[client := self
newOn: aModel.  client windowColor: aColor.  client createWi...]}
BlockContext>>ensure:
CursorWithMask(Cursor)>>showWhile:
PatchArchiveClient class>>openOn:withLabel:withColor:withDisplayGroupsPref:
PatchArchiveClient class>>openOn:withLabel:withColor:
PatchArchiveClient class>>openOn:
PatchArchiveClient class>>open
TheWorldMenu>>doMenuItem:with:
[] in MenuItemMorph>>invokeWithEvent: {[(selArgCount := selector numArgs) =
0   ifTrue: [target perform: selector] ...]}
BlockContext>>ensure:
CursorWithMask(Cursor)>>showWhile:
MenuItemMorph>>invokeWithEvent:
MenuItemMorph>>mouseUp:
MenuItemMorph>>handleMouseUp:
MouseButtonEvent>>sentTo:
MenuItemMorph(Morph)>>handleEvent:
MorphicEventDispatcher>>dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with:
MenuItemMorph(Morph)>>processEvent:using:
MorphicEventDispatcher>>dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with:
MenuMorph(Morph)>>processEvent:using:
MenuMorph(Morph)>>processEvent:
MenuMorph>>handleFocusEvent:
[] in HandMorph>>sendFocusEvent:to:clear: {[ActiveHand := self.  ActiveEvent
:= anEvent.  result := focusHolder     han...]}
PasteUpMorph>>becomeActiveDuring:
HandMorph>>sendFocusEvent:to:clear:
HandMorph>>sendEvent:focus:clear:
HandMorph>>sendMouseEvent:
HandMorph>>handleEvent:
HandMorph>>processEvents
[] in WorldState>>doOneCycleNowFor: {[:h |  ActiveHand := h.  h
processEvents.  h isGenieRecognizing   ifTrue: [r...]}
-- and more not shown --