*** ./GenDoc.st	2009-03-07 12:35:56.000000000 +0100
--- ./GenDoc_package_fix.st	2009-03-07 12:35:13.000000000 +0100
***************
*** 93,99 ****
              files := package fullPathsOf: package fileIns.
  	    files do: [ :each || file |
  		each printNl.
! 		file := FileStream open: each mode: FileStream read.
  		loader
  		    parseSmalltalkStream: file
  		    with: STInST.GSTFileInParser ].
--- 93,99 ----
              files := package fullPathsOf: package fileIns.
  	    files do: [ :each || file |
  		each printNl.
! 		file := FileStream open: each file name mode: FileStream read.
  		loader
  		    parseSmalltalkStream: file
  		    with: STInST.GSTFileInParser ].