seaside June 2008

seaside@lists.squeakfoundation.org

72 participants
69 discussions

Seaside callbacks Firefox 3
by Sebastian Sastre 19 Jun '08

19 Jun '08

Hi there, I just found something very strange using the brand new Firefox 3 on a seaside app. Some anchor callbacks wont be found. The same page have proper callback with opera, safari, ff2 even IE6 I didnt found the cause yet but I wanted to know if others found this problem too or if there is a know issue about it, cheers, Sebastian Sastre

3 8

WAHtmlRoot>>writeHeadOn: broken when there is no request
by Boris Popov 19 Jun '08

19 Jun '08

[I'm not sure if this is VisualWorks specific, but here goes anyway] The fix to avoid writing extra head elements for Ajax requests assumes that rendering happens in response to a request, which might not always be the case, especially if you use seaside rendering facilities for any kind of report generation and such on the server. Current, writeHeadOn: aDocument aDocument nextPutAll: docType. aDocument openTag: 'html' attributes: htmlAttrs. aDocument openTag: 'head' attributes: headAttrs. WACurrentSession value currentRequest isXmlHttpRequest ifFalse: [ self writeElementsOn: aDocument; writeStylesOn: aDocument; writeScriptsOn: aDocument ]. aDocument closeTag: 'head'. aDocument openTag: 'body' attributes: bodyAttrs Workaround, writeHeadOn: aDocument | req | aDocument nextPutAll: docType. aDocument openTag: 'html' attributes: htmlAttrs. aDocument openTag: 'head' attributes: headAttrs. req := WACurrentSession value currentRequest. (req isNil or: [req isXmlHttpRequest not]) ifTrue: [self writeElementsOn: aDocument; writeStylesOn: aDocument; writeScriptsOn: aDocument]. aDocument closeTag: 'head'. aDocument openTag: 'body' attributes: bodyAttrs. -Boris -- +1.604.689.0322 DeepCove Labs Ltd. 4th floor 595 Howe Street Vancouver, Canada V6C 2T5 http://tinyurl.com/r7uw4 boris(a)deepcovelabs.com CONFIDENTIALITY NOTICE This email is intended only for the persons named in the message header. Unless otherwise indicated, it contains information that is private and confidential. If you have received it in error, please notify the sender and delete the entire message including any attachments. Thank you. _______________________________________________ vwnc mailing list vwnc(a)cs.uiuc.edu http://lists.cs.uiuc.edu/mailman/listinfo/vwnc

3 2

Anyone using a newer version of Magritte for VW w/ Seaside 2.8?
by Richard E. Flower 19 Jun '08

19 Jun '08

I tried loading MagritteForVisualworks (lr.251 CS12.NFR.11,niallr) and it had an issue w/ loading.. Anyone got a newer version for use w/ VW7.6? Thanks! Below is the MNU backtrace: Unhandled exception: Message not understood: #current Date class(Object)>>doesNotUnderstand: Magritte.MAObject class>>license Magritte.MAObject class>>initialize Magritte.MAObject class(ClassDescription)>>postLoad: optimized [] in Store.Package>>initializeClasses: optimized [] in OrderedCollection>>collect: OrderedCollection>>do: OrderedCollection>>collect: Store.Package>>initializeClasses: Store.Package>>doSourceLoad:within: optimized [] in [] in Store.Package>>sourceLoadFromDBloadWithin:warnReplace: optimized [] in Store.XMainChangeSet class>>ignoreMainChangesWhile: BlockClosure>>ensure: Store.XMainChangeSet class>>ignoreMainChangesWhile: optimized [] in Store.Package>>sourceLoadFromDBloadWithin:warnReplace: optimized [] in Store.BasicPackagePolicy>>forcePackage:while: BlockClosure>>ensure: Store.BasicPackagePolicy>>forcePackage:while: ---------------------------------------------------------------------- Date class(Object)>>doesNotUnderstand: Receiver: a Date class Instance Variables: superclass = Magnitude methodDict = a MethodDictionary[47] format = 16386 subclasses = nil instanceVariables = an Array[2] organization = ('comparing' #< #= #hash) ('accessing' #- #day #leap #month #monthIndex #monthName #next #previous #start #weekday #year) ('arithmetic' #addDays: #subtractDate: #subtractDays:) ('inquiries' #dayOfMonth #dayOfYear #daysInMonth #daysInYear #daysLeftInYear #firstDayOfMonth #previous:) ('converting' #asDateAndTime #asDays #asMonth #asSeconds #asTimeStamp #asTimestamp) ('printing' #glorpPrintSQLOn: #longPrintString #mmddyyyy #months #printOn: #shortPrintString #storeOn: #yyyymmdd) ('private' #day:year: #firstDayOfMonthIndex: #literalArrayEncoding #printOn:policy:format: #weekdayIndex) ('private-spin-button' #decrementBy:boundedBy:highValue:wrapAround: #incrementBy:boundedBy:lowValue:wrapAround:) ('backward compatiblity - printing' #printFormat: #printOn:format:) name = #Date classPool = a NameSpaceOfClass[5] environment = a NameSpace[228] Arguments: aMessage = a Message with selector: #current and arguments: #() Temporaries: excpt = a MessageNotUnderstood resumeValue = nil Context PC = 25 ---------------------------------------------------------------------- Magritte.MAObject class>>license Receiver: a Magritte.MAObject class Instance Variables: superclass = Object methodDict = a MethodDictionary[13] format = 16385 subclasses = nil instanceVariables = an Array[1] organization = ('copying' #postCopy) ('accessing' #properties #propertyAt: #propertyAt:ifAbsent: #propertyAt:ifAbsentPut: #propertyAt:ifPresent: #propertyAt:put:) ('visiting' #acceptMagritte:) ('testing' #hasProperty:) ('initialization' #initialize) ('private' #errorPropertyNotFound:) ('comparing' #= #hash) name = #MAObject classPool = a NameSpaceOfClass[0] environment = a FirstFindNameSpace[13] Context PC = 5 ---------------------------------------------------------------------- Magritte.MAObject class>>initialize Receiver: a Magritte.MAObject class Instance Variables: superclass = Object methodDict = a MethodDictionary[13] format = 16385 subclasses = nil instanceVariables = an Array[1] organization = ('copying' #postCopy) ('accessing' #properties #propertyAt: #propertyAt:ifAbsent: #propertyAt:ifAbsentPut: #propertyAt:ifPresent: #propertyAt:put:) ('visiting' #acceptMagritte:) ('testing' #hasProperty:) ('initialization' #initialize) ('private' #errorPropertyNotFound:) ('comparing' #= #hash) name = #MAObject classPool = a NameSpaceOfClass[0] environment = a FirstFindNameSpace[13] Context PC = 5 ---------------------------------------------------------------------- Magritte.MAObject class(ClassDescription)>>postLoad: Receiver: a Magritte.MAObject class Instance Variables: superclass = Object methodDict = a MethodDictionary[13] format = 16385 subclasses = nil instanceVariables = an Array[1] organization = ('copying' #postCopy) ('accessing' #properties #propertyAt: #propertyAt:ifAbsent: #propertyAt:ifAbsentPut: #propertyAt:ifPresent: #propertyAt:put:) ('visiting' #acceptMagritte:) ('testing' #hasProperty:) ('initialization' #initialize) ('private' #errorPropertyNotFound:) ('comparing' #= #hash) name = #MAObject classPool = a NameSpaceOfClass[0] environment = a FirstFindNameSpace[13] Arguments: aParcel = {'Magritte-Model-Core'-'lr.248'-47532} Context PC = 10 ---------------------------------------------------------------------- optimized [] in Store.Package>>initializeClasses: Receiver: an UndefinedObject Arguments: cls = ClassRecord{48925-MAObject} Temporaries: obj = Magritte.MAObject .super = {'Magritte-Model-Core'-'lr.248'-47532} Context PC = 14 ---------------------------------------------------------------------- optimized [] in OrderedCollection>>collect: Receiver: an UndefinedObject Arguments: each = ClassRecord{48925-MAObject} Temporaries: .newCollection = an OrderedCollection[1] .aBlock = BlockClosure [] in Store.Package>>initializeClasses: Context PC = 7 ---------------------------------------------------------------------- OrderedCollection>>do: Receiver: an OrderedCollection Instance Variables: firstIndex = 1 lastIndex = 2 Arguments: aBlock = BlockClosure [] in OrderedCollection>>collect: Temporaries: index = 2 Context PC = 17 ---------------------------------------------------------------------- OrderedCollection>>collect: Receiver: an OrderedCollection Instance Variables: firstIndex = 1 lastIndex = 2 Arguments: aBlock = BlockClosure [] in Store.Package>>initializeClasses: Temporaries: newCollection = an OrderedCollection[1] Context PC = 16 ---------------------------------------------------------------------- Store.Package>>initializeClasses: Receiver: a Store.Package Instance Variables: primaryKey = 47532 name = 'Magritte-Model-Core' timeStamp = 447072424 version = 'lr.248' userName = 'NiallRoss' trace = 16675 dbIdentifier = #psql_public_cst_2007 blessingLevel = 20 commentID = 0 propertiesID = 0 properties = an IdentityDictionary[0] propertyRecords = an OrderedCollection[0] commentStr = nil namespaces = an OrderedCollection[0] classes = an OrderedCollection[2] metaclasses = nil methods = an OrderedCollection[29] binFile = '' data = an OrderedCollection[0] overrides = nil parcelID = nil Arguments: dbClasses = an OrderedCollection[2] Temporaries: toPostLoad = nil toInit = nil Context PC = 8 ---------------------------------------------------------------------- Store.Package>>doSourceLoad:within: Receiver: a Store.Package Instance Variables: primaryKey = 47532 name = 'Magritte-Model-Core' timeStamp = 447072424 version = 'lr.248' userName = 'NiallRoss' trace = 16675 dbIdentifier = #psql_public_cst_2007 blessingLevel = 20 commentID = 0 propertiesID = 0 properties = an IdentityDictionary[0] propertyRecords = an OrderedCollection[0] commentStr = nil namespaces = an OrderedCollection[0] classes = an OrderedCollection[2] metaclasses = nil methods = an OrderedCollection[29] binFile = '' data = an OrderedCollection[0] overrides = nil parcelID = nil Arguments: imPkg = [Magritte-Model-Core] parentBundle = {'Magritte'-'lr.251'-22236} Temporaries: dbClasses = an OrderedCollection[2] dbNamespaces = an OrderedCollection[0] retry = an OrderedCollection[0] unloadable = an OrderedCollection[0] Context PC = 51 ---------------------------------------------------------------------- optimized [] in [] in Store.Package>>sourceLoadFromDBloadWithin:warnReplace: Receiver: an UndefinedObject Temporaries: .imPkg = [Magritte-Model-Core] .parentBundle = {'Magritte'-'lr.251'-22236} .super = {'Magritte-Model-Core'-'lr.248'-47532} loadRes = nil Context PC = 62 ---------------------------------------------------------------------- optimized [] in Store.XMainChangeSet class>>ignoreMainChangesWhile: Receiver: an UndefinedObject Temporaries: .aBlock = BlockClosure [] in [] in Store.Package>>sourceLoadFromDBloadWithin:warnReplace: Context PC = 9 ---------------------------------------------------------------------- BlockClosure>>ensure: Receiver: a BlockClosure Instance Variables: method = CompiledBlock [] in Store.XMainChangeSet class>>ignoreMainChangesWhile: outerContext = nil copiedValues = BlockClosure [] in [] in Store.Package>>sourceLoadFromDBloadWithin:warnReplace: Arguments: aBlock = BlockClosure [] in Store.XMainChangeSet class>>ignoreMainChangesWhile: Temporaries: result = nil Context PC = 4 ---------------------------------------------------------------------- Store.XMainChangeSet class>>ignoreMainChangesWhile: Receiver: a Store.XMainChangeSet class Instance Variables: superclass = Store.XChangeSet methodDict = a MethodDictionary[108] format = 20486 subclasses = nil instanceVariables = an Array[2] organization = ('public-method changes' #addSelector:class:toPackage: #changeSelector:class:toPackage: #correctSelector:class:toPackage: #removeSelector:class: #removeSelector:class:fromPackage: #removeSelectorChanges:class: #revertData:owner: #revertSelector:class:) ('public-data changes' #addDataKey:class:package: #addDataKey:nameSpace:package: #changeDataKey:class: #changeDataKey:class:package: #changeDataKey:nameSpace: #changeDataKey:nameSpace:package: #relocateBinding:from:to: #removeBinding:in: #removeChangesDataKey:class: #removeDataKey:class: #removeDataKey:class:from: #removeDataKey:nameSpace: #removeDataKey:nameSpace:from: #renameBinding:in:as:) ('public-fileIn/Out' #putStatsOn:) ('public-other changes' #addDoIt: #addPatch: #removeDoIt: #reorganizeClassData: #reorganizeSystem) ('public-testing' #isEmpty #isMainChangeSet) ('public-package movement' #moveClassDefinition:from:toPackage: #moveClassDefinition:toPackage: #moveClassModel:to: #moveClassName:from:to: #moveDataKey:class:toPackage: #moveDataKey:nameSpace:toPackage: #moveDataKey:owner:toPackage: #moveDefinition:toPackage: #moveNameSpaceDefinition:from:toPackage: #moveNameSpaceDefinition:toPackage: #moveNameSpaceModel:to: #moveObject:from:to: #moveSelector:class:fromPackage: #moveSelector:class:toPackage: #moveSelectors:class:toPackage: #moveUnpackagedClassDefinition:toPackage: #moveUnpackagedDataKey:nameSpace:toPackage: #moveUnpackagedInWholeClass:toPackage: #moveUnpackagedInWholeNameSpace:toPackage: #moveUnpackagedNameSpaceDefinition:toPackage: #moveUnpackagedSelector:class:toPackage: #moveWholeClass:toPackage: #moveWholeNameSpace:toPackage: #moveWholeObject:toPackage:) ('events' #addBinding:in: #addBinding:in:attributes: #addClass: #addClass:attributes: #addNameSpace: #addNameSpace:attributes: #addSelector:class: #addSelector:class:attributes: #changeBinding:in: #changeBinding:in:attributes: #changeClass: #changeClass:attributes: #changeNameSpace: #changeNameSpace:attributes: #changeSelector:class: #changeSelector:class:attributes: #changeSelector:class:documentation: #changeSelector:class:protocol: #packageFromAttributes: #reorganizeClass: #update:with:from:) ('public-namespace changes' #addNameSpace:toPackage: #addNameSpaceDefinition:toPackage: #changeNameSpace:toPackage: #commentNameSpace: #component:property:value: #component:renamedTo: #relocateNameSpace:from:to: #removeNameSpace: #renameNameSpace:as: #reorganizeNameSpace:) ('public-class changes' #addClass:toPackage: #addClassDefinition:toPackage: #changeClass:toPackage: #changeDefinitionClass: #commentClass: #relocateClass:from:to: #removeChangesPropagatingClass: #removeClass: #removeClass:from: #removeClassChanges: #renameClass:as:) ('private- cascade changes' #cascadeRelocateNameSpace:to: #renameClass:asAbsoluteSymbol: #renameNameSpace:asAbsoluteSymbol:) ('private-fileIn/Out' #fileOutSpecialOn:) ('events-parcels' #installedClasses:toPackage: #installedMethods:toPackage: #installedNameSpaces:toPackage: #installedOverrideMethods:toPackage:) ('db phantoms' #addRemoveClass:package: #addRemoveNameSpace:package: #addRemoveSelector:className:meta:package: #addRemoveStatic:ownerName:isInNameSpace:package:) name = #XMainChangeSet classPool = a NameSpaceOfClass[0] environment = a NameSpace[255] Arguments: aBlock = BlockClosure [] in [] in Store.Package>>sourceLoadFromDBloadWithin:warnReplace: Temporaries: currentCS = a Store.XMainChangeSet[1977] Context PC = 15 ---------------------------------------------------------------------- optimized [] in Store.Package>>sourceLoadFromDBloadWithin:warnReplace: Receiver: an UndefinedObject Temporaries: .imPkg = [Magritte-Model-Core] .parentBundle = {'Magritte'-'lr.251'-22236} .super = {'Magritte-Model-Core'-'lr.248'-47532} loadRes = nil Context PC = 12 ----------------------------------------------------------------------

2 2

Newbie: Deploying A Web Site in Seaside
by aditya siram 18 Jun '08

18 Jun '08

Hi all, I have an application ready to go. It currently resides in my examples directory. How do I get it to display when users go to my my base url? Is that the "Resource Base URL" setting? And how do I password protect the rest of the system? I have already removed the toolbar and executed the "trimForDeployment" command. Thanks Deech

1 0

How to include a css file in Seaside 2.8+?
by Richard E. Flower 18 Jun '08

18 Jun '08

Ok.. I've got my Apache proxy working just fine but can't get Seaside to load the css files.. I think I'm close with the following code.. Is there something else I need to do? This is to replace the old 2.6 "anHtmlRoot linkToStyle: '/resources/css/screen.css' line that used to work.. updateRoot: anHtmlRoot [ ..other stuff snipped ... ] anHtmlRoot stylesheet resourceUrl: (anHtmlRoot context urlForDocument:(WACachedDocument fileName: '/resources/css/ screen.css') mimeType: 'text/css' fileName: 'screen.css'). Thanks!

2 2

Re: [Seaside] Seaside 2.8x (for VW) equivalent of SeasideShortPath?
by Boris Popov 18 Jun '08

18 Jun '08

You just need to clear root value in seaside settings, no need for a parcel. Cheers! -Boris (via BlackBerry) ----- Original Message ----- From: seaside-bounces(a)lists.squeakfoundation.org <seaside-bounces(a)lists.squeakfoundation.org> To: Seaside Mailing List <seaside(a)lists.squeakfoundation.org> Sent: Tue Jun 17 15:07:57 2008 Subject: [Seaside] Seaside 2.8x (for VW) equivalent of SeasideShortPath? In the VW flavor of Seaside 2.8x, I'd like to be able to use the SeasideShortPath parcel but realize its really meant for the WebToolkit version of Seaside.. Is there an equivalent version that might work w/ Seaside 2.8x or higher? No, I've not tried loading this on top of my 2.8x image -- it just popped in my head while at work and don't have VW access here to try it.. Thanks! _______________________________________________ seaside mailing list seaside(a)lists.squeakfoundation.org http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside

2 1

Seaside 2.8x (for VW) equivalent of SeasideShortPath?
by Rick Flower 18 Jun '08

18 Jun '08

In the VW flavor of Seaside 2.8x, I'd like to be able to use the SeasideShortPath parcel but realize its really meant for the WebToolkit version of Seaside.. Is there an equivalent version that might work w/ Seaside 2.8x or higher? No, I've not tried loading this on top of my 2.8x image -- it just popped in my head while at work and don't have VW access here to try it.. Thanks!

1 0

Re: [Seaside] Re: Confused over the use of WAExternalFileLibrary...
by Boris Popov 17 Jun '08

17 Jun '08

Oh, now we are back to 'my gun is bigger than your gun' discussion again. It's great that one can achieve decent performance serving content with a built in server, let's have a group hug and move on ;) Thanks, Lukas, it's nice to see that piece get addressed. It means I can mostly get rid of my own directory emulation library and just dump files from an image into a subdirectory marked with a version number on deployment. Cheers! -Boris (via BlackBerry) ----- Original Message ----- From: seaside-bounces(a)lists.squeakfoundation.org <seaside-bounces(a)lists.squeakfoundation.org> To: Seaside - general discussion <seaside(a)lists.squeakfoundation.org> Sent: Tue Jun 17 04:26:22 2008 Subject: Re: [Seaside] Re: Confused over the use of WAExternalFileLibrary... Michael Lucas-Smith wrote: > Randal: Inefficient? That's a random stretch, if you're using > Opentalk-HTTP then it's not going to be particularly inefficient and > it's a wild call to assume that Komanche and Swazoo would be slow > without trying it out. Swazoo is definitely not inefficient serving static content anymore, on VW is now only 4x slower than Apache, achieving 36MBytes/s, which is about 300Mbits/s, that is 3 times saturation of 100M ethernet: http://www.swazoo.org/benchmarks/swazoo-vs-apache.html How much is Opentalk-HTTP able to achieve? Best regards Janko -- Janko Mivšek AIDA/Web Smalltalk Web Application Server http://www.aidaweb.si _______________________________________________ seaside mailing list seaside(a)lists.squeakfoundation.org http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside

2 1

Re: [Seaside] Re: Confused over the use of WAExternalFileLibrary...
by Boris Popov 17 Jun '08

17 Jun '08

That's actually something Cincom added I believe. Cheers! -Boris (via BlackBerry) ----- Original Message ----- From: Rick Flower <rickf(a)ca-flower.com> To: Boris Popov Cc: seaside(a)lists.squeakfoundation.org <seaside(a)lists.squeakfoundation.org> Sent: Mon Jun 16 18:08:38 2008 Subject: Re: [Seaside] Re: Confused over the use of WAExternalFileLibrary... Thanks Boris.. I guess I have to get my feet wet with modifying something within Seaside at some point eh!? This class looks nice-n-small so it's a good candidate.. Of course I'll let you-all that know more about ST than I do, review it.. -- Rick On Mon, June 16, 2008 5:59 pm, Boris Popov wrote: > Sure, submit it as a patch for Cincom to review. I imagine subdirectories > should be part of basic functionality for file serving. > > Cheers! > > -Boris (via BlackBerry) > > ----- Original Message ----- > From: seaside-bounces(a)lists.squeakfoundation.org > <seaside-bounces(a)lists.squeakfoundation.org> > To: Seaside - general discussion <seaside(a)lists.squeakfoundation.org> Sent: Mon Jun 16 17:58:04 2008 > Subject: Re: [Seaside] Re: Confused over the use of > WAExternalFileLibrary... > > Ok.. In thinking about the big picture here and trying to > help perspective future users of this class.. I'm wondering IF > I were to alter the existing WAExternalFileLibrary to be more > flexible (add support for subdirectories + more obvious config > features), would that annoy other users of this class? I'm not > sure how many people are actually using it for anything -- > comments? At a minimum I'll certainly document the current > behavior including where the 'files' directory lives within the > VW tree which was half the problem for me to guess. > > -- Rick > > On Sun, June 15, 2008 8:07 pm, Richard E. Flower wrote: >> This is really odd to me.. I finally got it working. In my case, I used the name "include" in the dispatch editor for Seaside (where the configuration of the WAExternalFileLibrary lives) and my links needed to be named "include/external/foo.jpg" but the files live in >> the VW image directory as "vw7.6/image/files/foo.jpg".. It also does not appear to handle subdirectories from what I've seen.. I guess I'll have to spend some time looking into Apache again since this isn't doing what I was hoping.. Oh well.. >> -- Rick >> On Jun 13, 2008, at 2:21 PM, Magnus Schwarz wrote: >>> Hi Rick, >>> although the files reside in the /files directory (i.e. /files/ myFile.jpg), the proper URL in Seaside is files/external/myFile.jpg. (This may IMHO be a bit confusing...) >>> Regards, >>> Magnus >>> seaside-request(a)lists.squeakfoundation.org schrieb: >>>> 1. Confused over the use of WAExternalFileLibrary... >>>> (Richard E. Flower) >>>> ---------------------------------------------------------------------- Message: 1 >>>> Date: Thu, 12 Jun 2008 23:02:12 -0700 >>>> From: "Richard E. Flower" <rickf(a)ca-flower.com> >>>> Subject: [Seaside] Confused over the use of WAExternalFileLibrary... To: Seaside - general discussion <seaside(a)lists.squeakfoundation.org> Message-ID: <416C80A3-37ED-4704-B5D6-815F2DC1EE1E(a)ca-flower.com> Content-Type: text/plain; charset=US-ASCII; format=flowed; delsp=yes Ok.. I've gotten past my initial hurdles with Boris' help but none of my css files or images are getting pulled in due >>>> to the deprecated API that I was using w/ Seaside 2.6 (besides the move from Webtoolkit to Opentalk).. >>>> Anyway, in perusing the old mail messages from the list, it >>>> appears that WAExternalFileLibrary may be the solution >>>> I'm looking for but I'm stuck with trying to get it to work. I've created a "Files" entry point as indicated and named it "include". Now, I've changed one of my image references to point to /seaside/ files/image.jpg but its never found.. The docs are very terse on the usage.. Am I missing something? Where does the directory lie in the filesystem for VW? I've tried the top-level VW directory along with the 'image' subdirectory... Also, if I want to have one directory w/ css and another with images how is that done? Thanks! >>>> -- Rick >>> -- >>> Magnus Schwarz * certified Scrum Master / Smalltalk architect * mailto:magnus.schwarz@heeg.de >>> phone:+49 231 97599-0 * fax:+49 231 97599-20 >>> Georg Heeg eK Dortmund >>> Handelsregister: Amtsgericht Dortmund A 12812 >>> --------------------------------------------------- >>> PGP PUBLIC KEY BLOCK via http://www.heeg.de/~magnus >>> _______________________________________________ >>> seaside mailing list >>> seaside(a)lists.squeakfoundation.org >>> http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside >> _______________________________________________ >> seaside mailing list >> seaside(a)lists.squeakfoundation.org >> http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside > > > _______________________________________________ > seaside mailing list > seaside(a)lists.squeakfoundation.org > http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside >

7 7

Timespan bug
by Steve Aldred 17 Jun '08

17 Jun '08

Sorry for posting this here but I don't use Squeak itself and hence aren't on the main squeak list. As a VW Seaside user I do use Squeak extensions. There is a bug in Timespan as shown below: (Year starting: (DateAndTime year: 2008 month: 1 day:1)) previous The result should be 2007 but it returns 2006. Year should implement previous the same as Month does. cheers Steve

3 3

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

2002

seaside June 2008