[BUG][BFAV] BFAV can't parse changesets with non-ASCIIcharacters ( is this the culprit? what should it look like? )

tomkoenig at mindspring.com tomkoenig at mindspring.com
Wed Jan 26 02:09:07 CET 2005


attachmentFileNames: attachments forId: aNumberOrString
      | attachmentFileNames  attachmentsDirectory|
	attachmentsDirectory _ self attachmentsDirectoryForId: aNumberOrString.
	self emailsDir createDirectory: attachmentsDirectory localName.
	attachmentFileNames _ OrderedCollection new.
  	attachments
           do: [ :each | |  stream file | 
			(each isKindOf: MailMessage)
				ifTrue: [ stream := MultiByteBinaryOrTextStream with: each body
content.
               				 stream converter: Latin1TextConverter new. 
						 stream reset. 
						 file _ attachmentsDirectory fileNamed: (attachmentsDirectory
localNameFor: each name).
						file converter: Latin1TextConverter new.
						file nextPutAll: stream contents. 
						file close.


More information about the Squeak-harvest mailing list