The Trunk: Graphics-ul.153.mcz

Levente Uzonyi uploaded a new version of Graphics to project The Trunk:
http://source.squeak.org/trunk/Graphics-ul.153.mcz

==================== Summary ====================

Name: Graphics-ul.153
Author: ul
Time: 3 November 2010, 6:50:09.075 am
UUID: 030e6dfc-71b7-5144-9edd-76f529655456
Ancestors: Graphics-ul.152

- removed the last direct users of CrLfFileStream
- replaced the download url of the bdf fonts, because the original doesn't work anymore
- removed BDFFontReader class >> #new, because it ignores #initialize which breaks the font conversion process. This stuff is still broken btw.

=============== Diff against Graphics-ul.152 ===============

Item was changed:
  ----- Method: BDFFontReader class>>downloadFonts (in category 'resource download') -----
  downloadFonts  "BDFFontReader downloadFonts"
  "Download a standard set of BDF sources from x.org.  
  The combined size of these source files is around 1.2M; after conversion
  to .sf2 format they may be deleted."
 
  | heads tails filenames baseUrl basePath |
  heads := #( 'charR' 'courR' 'helvR' 'lubR' 'luRS' 'lutRS' 'ncenR' 'timR' ).
  tails := #( '08' '10' '12' '14' '18' '24').
 
  filenames := OrderedCollection new.
  heads do: [:head |
  filenames addAll: (tails collect: [:tail | head , tail , '.bdf'])
  ].
+ baseUrl := 'http://cvsweb.xfree86.org/cvsweb/*checkout*/xc/fonts/bdf/75dpi/' asUrl.
-
- baseUrl := 'http://ftp.x.org/pub/R6.4/xc/fonts/bdf/75dpi/' asUrl.
  basePath := baseUrl path.
 
+ filenames do: [:filename |
+ | document newPath newUrl |
- filenames do: [:filename | | document f newPath newUrl |
  newUrl := baseUrl clone.
  newPath := OrderedCollection newFrom: basePath.
 
  newPath addLast: filename.
  newUrl path: newPath.
 
  Utilities informUser: 'Fetching ' , filename during:
  [document := newUrl retrieveContents].
 
+ MultiByteFileStream newFileNamed: filename do: [ :f |
+ f
+ wantsLineEndConversion: true;
+ nextPutAll: document content ]
- f := CrLfFileStream newFileNamed: filename.
- f nextPutAll: document content.
- f close.
  ].
  !

Item was removed:
- ----- Method: BDFFontReader class>>new (in category 'file creation') -----
- new
-
- ^ self basicNew.
- !

Item was changed:
  ----- Method: BDFFontReader>>openFileNamed: (in category 'initialize') -----
  openFileNamed: fileName
+ file := MultiByteFileStream readOnlyFileNamed: fileName.
+ file wantsLineEndConversion: true!
- file := CrLfFileStream readOnlyFileNamed: fileName.!