Mercurial Mercurial > hg > stx-libview2 / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
new suffix-table
authorClaus Gittinger <cg@exept.de>
Sat, 01 Feb 1997 15:07:04 +0100
changeset 398 aef700d15416
parent 397 7ad4e53d8f49
child 399 f87821ab7b30
new suffix-table
BlitImageReader.st file | annotate | diff | comparison | revisions
BlitImgRdr.st file | annotate | diff | comparison | revisions
FaceReader.st file | annotate | diff | comparison | revisions
GIFReader.st file | annotate | diff | comparison | revisions
JPEGReader.st file | annotate | diff | comparison | revisions
PBMReader.st file | annotate | diff | comparison | revisions
PCXReader.st file | annotate | diff | comparison | revisions
PNGReader.st file | annotate | diff | comparison | revisions
SunRasterReader.st file | annotate | diff | comparison | revisions
SunReader.st file | annotate | diff | comparison | revisions
TIFFRdr.st file | annotate | diff | comparison | revisions
TIFFReader.st file | annotate | diff | comparison | revisions
TargaReader.st file | annotate | diff | comparison | revisions
WinIconRdr.st file | annotate | diff | comparison | revisions
WindowsIconReader.st file | annotate | diff | comparison | revisions
XBMReader.st file | annotate | diff | comparison | revisions
XPMReader.st file | annotate | diff | comparison | revisions
XWDReader.st file | annotate | diff | comparison | revisions 
--- a/BlitImageReader.st	Fri Jan 31 18:59:54 1997 +0100
+++ b/BlitImageReader.st	Sat Feb 01 15:07:04 1997 +0100
@@ -61,13 +61,13 @@
     "install myself in the Image classes fileFormat table
      for files named `48x48x1' (funny)."
 
-    Image fileFormats at:'48x48x1'  put:self.
+    Image addReader:self suffix:'48x48x1'
 
     "
      BlitImageReader initialize
     "
 
-    "Modified: 23.4.1996 / 12:47:48 / cg"
+    "Modified: 1.2.1997 / 15:01:08 / cg"
 ! !
 
 !BlitImageReader class methodsFor:'special formats'!
@@ -219,6 +219,6 @@
 !BlitImageReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/BlitImageReader.st,v 1.11 1996-05-10 16:45:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/BlitImageReader.st,v 1.12 1997-02-01 14:05:39 cg Exp $'
 ! !
 BlitImageReader initialize!
--- a/BlitImgRdr.st	Fri Jan 31 18:59:54 1997 +0100
+++ b/BlitImgRdr.st	Sat Feb 01 15:07:04 1997 +0100
@@ -61,13 +61,13 @@
     "install myself in the Image classes fileFormat table
      for files named `48x48x1' (funny)."
 
-    Image fileFormats at:'48x48x1'  put:self.
+    Image addReader:self suffix:'48x48x1'
 
     "
      BlitImageReader initialize
     "
 
-    "Modified: 23.4.1996 / 12:47:48 / cg"
+    "Modified: 1.2.1997 / 15:01:08 / cg"
 ! !
 
 !BlitImageReader class methodsFor:'special formats'!
@@ -219,6 +219,6 @@
 !BlitImageReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Attic/BlitImgRdr.st,v 1.11 1996-05-10 16:45:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/BlitImgRdr.st,v 1.12 1997-02-01 14:05:39 cg Exp $'
 ! !
 BlitImageReader initialize!
--- a/FaceReader.st	Fri Jan 31 18:59:54 1997 +0100
+++ b/FaceReader.st	Sat Feb 01 15:07:04 1997 +0100
@@ -76,9 +76,9 @@
     "install myself in the Image classes fileFormat table
      for the `.face' extension."
 
-    Image fileFormats at:'.face'  put:self.
+    Image addReader:self suffix:'face'
 
-    "Modified: 23.4.1996 / 12:27:35 / cg"
+    "Modified: 1.2.1997 / 15:01:25 / cg"
 ! !
 
 !FaceReader methodsFor:'reading from file'!
@@ -155,6 +155,6 @@
 !FaceReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/FaceReader.st,v 1.22 1996-05-10 16:46:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/FaceReader.st,v 1.23 1997-02-01 14:05:43 cg Exp $'
 ! !
 FaceReader initialize!
--- a/GIFReader.st	Fri Jan 31 18:59:54 1997 +0100
+++ b/GIFReader.st	Sat Feb 01 15:07:04 1997 +0100
@@ -69,12 +69,11 @@
 
 initialize
     "install myself in the Image classes fileFormat table
-     for the `.gif', and '.GIF' extensions."
+     for the `.gif' extensions."
 
-    Image fileFormats at:'.gif'  put:self.
-    Image fileFormats at:'.GIF'  put:self.
+    Image addReader:self suffix:'gif'.
 
-    "Modified: 23.4.1996 / 12:28:16 / cg"
+    "Modified: 1.2.1997 / 14:59:37 / cg"
 ! !
 
 !GIFReader class methodsFor:'testing'!
@@ -468,6 +467,6 @@
 !GIFReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.45 1997-01-10 14:48:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.46 1997-02-01 14:06:08 cg Exp $'
 ! !
 GIFReader initialize!
--- a/JPEGReader.st	Fri Jan 31 18:59:54 1997 +0100
+++ b/JPEGReader.st	Sat Feb 01 15:07:04 1997 +0100
@@ -61,13 +61,12 @@
 
 initialize
     "install myself in the Image classes fileFormat table
-     for the `.jpg', '.jpeg' and '.JPG' extensions."
+     for the `.jpg' and '.jpeg' extensions."
 
-    Image fileFormats at:'.jpg'  put:self.
-    Image fileFormats at:'.jpeg'  put:self.
-    Image fileFormats at:'.JPG'  put:self.
+    Image addReader:self suffix:'jpg'.
+    Image addReader:self suffix:'jpeg'.
 
-    "Modified: 23.4.1996 / 12:28:03 / cg"
+    "Modified: 1.2.1997 / 15:01:55 / cg"
 ! !
 
 !JPEGReader class methodsFor:'reading from file'!
@@ -101,6 +100,6 @@
 !JPEGReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/JPEGReader.st,v 1.17 1996-06-18 21:53:37 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/JPEGReader.st,v 1.18 1997-02-01 14:06:13 cg Exp $'
 ! !
 JPEGReader initialize!
--- a/PBMReader.st	Fri Jan 31 18:59:54 1997 +0100
+++ b/PBMReader.st	Sat Feb 01 15:07:04 1997 +0100
@@ -58,9 +58,11 @@
     "install myself in the Image classes fileFormat table
      for the `.pbm', '.pgm' and '.pnm' extensions."
 
-    Image fileFormats at:'.pbm'  put:self.
-    Image fileFormats at:'.pgm'  put:self.
-    Image fileFormats at:'.pnm'  put:self.
+    Image addReader:self suffix:'pbm'.
+    Image addReader:self suffix:'pgm'.
+    Image addReader:self suffix:'pnm'.
+
+    "Modified: 1.2.1997 / 15:02:14 / cg"
 ! !
 
 !PBMReader class methodsFor:'testing'!
@@ -437,6 +439,6 @@
 !PBMReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/PBMReader.st,v 1.20 1996-06-18 15:13:38 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/PBMReader.st,v 1.21 1997-02-01 14:05:30 cg Exp $'
 ! !
 PBMReader initialize!
--- a/PCXReader.st	Fri Jan 31 18:59:54 1997 +0100
+++ b/PCXReader.st	Sat Feb 01 15:07:04 1997 +0100
@@ -56,11 +56,11 @@
 
 initialize
     "tell Image-class, that a new fileReader is present
-     for the '.pcx' and '.PCX' extensions."
+     for the '.pcx' extension."
 
-    Image fileFormats at:'.pcx' put:self.
-    Image fileFormats at:'.PCX' put:self.
+    Image addReader:self suffix:'pcx'.
 
+    "Modified: 1.2.1997 / 15:02:32 / cg"
 ! !
 
 !PCXReader class methodsFor:'testing'!
@@ -334,6 +334,6 @@
 !PCXReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/PCXReader.st,v 1.16 1996-05-10 16:45:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/PCXReader.st,v 1.17 1997-02-01 14:05:24 cg Exp $'
 ! !
 PCXReader initialize!
--- a/PNGReader.st	Fri Jan 31 18:59:54 1997 +0100
+++ b/PNGReader.st	Sat Feb 01 15:07:04 1997 +0100
@@ -20,7 +20,7 @@
 	category:'Graphics-Images-Support'
 !
 
-!PNGReader  class methodsFor:'documentation'!
+!PNGReader class methodsFor:'documentation'!
 
 copyright
 "
@@ -55,20 +55,18 @@
 
 ! !
 
-!PNGReader  class methodsFor:'initialization'!
+!PNGReader class methodsFor:'initialization'!
 
 initialize
     "install myself in the Image classes fileFormat table
-     for the `.png', and '.PNG' extensions."
+     for the `.png' extension."
 
-    Image fileFormats at:'.png'  put:self.
-    Image fileFormats at:'.PNG'  put:self.
+    Image addReader:self suffix:'png'.
 
-    "Modified: 23.4.1996 / 12:28:16 / cg"
-    "Created: 21.6.1996 / 20:39:14 / cg"
+    "Modified: 1.2.1997 / 15:02:47 / cg"
 ! !
 
-!PNGReader  class methodsFor:'testing'!
+!PNGReader class methodsFor:'testing'!
 
 isValidImageFile:aFileName
     "return true, if aFileName contains a PNG image"
@@ -342,9 +340,9 @@
     "Modified: 21.6.1996 / 21:44:34 / cg"
 ! !
 
-!PNGReader  class methodsFor:'documentation'!
+!PNGReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/PNGReader.st,v 1.1 1996-06-21 20:34:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/PNGReader.st,v 1.2 1997-02-01 14:05:19 cg Exp $'
 ! !
 PNGReader initialize!
--- a/SunRasterReader.st	Fri Jan 31 18:59:54 1997 +0100
+++ b/SunRasterReader.st	Sat Feb 01 15:07:04 1997 +0100
@@ -54,7 +54,9 @@
     "install myself in the Image classes fileFormat table
      for the `.icon' extension."
 
-    Image fileFormats at:'.icon'  put:self.
+    Image addReader:self suffix:'icon'.
+
+    "Modified: 1.2.1997 / 15:03:18 / cg"
 ! !
 
 !SunRasterReader class methodsFor:'testing'!
@@ -279,6 +281,6 @@
 !SunRasterReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/SunRasterReader.st,v 1.22 1997-01-28 11:03:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/SunRasterReader.st,v 1.23 1997-02-01 14:06:18 cg Exp $'
 ! !
 SunRasterReader initialize!
--- a/SunReader.st	Fri Jan 31 18:59:54 1997 +0100
+++ b/SunReader.st	Sat Feb 01 15:07:04 1997 +0100
@@ -54,7 +54,9 @@
     "install myself in the Image classes fileFormat table
      for the `.icon' extension."
 
-    Image fileFormats at:'.icon'  put:self.
+    Image addReader:self suffix:'icon'.
+
+    "Modified: 1.2.1997 / 15:03:18 / cg"
 ! !
 
 !SunRasterReader class methodsFor:'testing'!
@@ -279,6 +281,6 @@
 !SunRasterReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Attic/SunReader.st,v 1.22 1997-01-28 11:03:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/SunReader.st,v 1.23 1997-02-01 14:06:18 cg Exp $'
 ! !
 SunRasterReader initialize!
--- a/TIFFRdr.st	Fri Jan 31 18:59:54 1997 +0100
+++ b/TIFFRdr.st	Sat Feb 01 15:07:04 1997 +0100
@@ -71,17 +71,16 @@
 
 initialize
     "install myself in the Image classes fileFormat table
-     for the `.tiff', `.tif' and '.TIF' extensions."
+     for the `.tiff' and `.tif' extensions."
 
-    Image fileFormats at:'.tiff' put:self.
-    Image fileFormats at:'.tif'  put:self.
-    Image fileFormats at:'.TIF'  put:self.
+    Image addReader:self suffix:'tiff'.
+    Image addReader:self suffix:'tif'.
 
     "
      self initialize
     "
 
-    "Modified: 31.1.1997 / 10:18:16 / cg"
+    "Modified: 1.2.1997 / 15:00:01 / cg"
 ! !
 
 !TIFFReader class methodsFor:'testing'!
@@ -1717,6 +1716,6 @@
 !TIFFReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Attic/TIFFRdr.st,v 1.47 1997-01-31 09:51:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/TIFFRdr.st,v 1.48 1997-02-01 14:05:57 cg Exp $'
 ! !
 TIFFReader initialize!
--- a/TIFFReader.st	Fri Jan 31 18:59:54 1997 +0100
+++ b/TIFFReader.st	Sat Feb 01 15:07:04 1997 +0100
@@ -71,17 +71,16 @@
 
 initialize
     "install myself in the Image classes fileFormat table
-     for the `.tiff', `.tif' and '.TIF' extensions."
+     for the `.tiff' and `.tif' extensions."
 
-    Image fileFormats at:'.tiff' put:self.
-    Image fileFormats at:'.tif'  put:self.
-    Image fileFormats at:'.TIF'  put:self.
+    Image addReader:self suffix:'tiff'.
+    Image addReader:self suffix:'tif'.
 
     "
      self initialize
     "
 
-    "Modified: 31.1.1997 / 10:18:16 / cg"
+    "Modified: 1.2.1997 / 15:00:01 / cg"
 ! !
 
 !TIFFReader class methodsFor:'testing'!
@@ -1717,6 +1716,6 @@
 !TIFFReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/TIFFReader.st,v 1.47 1997-01-31 09:51:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/TIFFReader.st,v 1.48 1997-02-01 14:05:57 cg Exp $'
 ! !
 TIFFReader initialize!
--- a/TargaReader.st	Fri Jan 31 18:59:54 1997 +0100
+++ b/TargaReader.st	Sat Feb 01 15:07:04 1997 +0100
@@ -59,11 +59,11 @@
 
 initialize
     "tell Image-class, that a new fileReader is present
-     for the '.tga' and '.TGA' extensions."
+     for the '.tga' extension."
 
-    Image fileFormats at:'.tga'  put:self.
-    Image fileFormats at:'.TGA'  put:self.
+    Image addReader:self suffix:'tga'.
 
+    "Modified: 1.2.1997 / 15:03:37 / cg"
 ! !
 
 !TargaReader class methodsFor:'testing'!
@@ -192,6 +192,6 @@
 !TargaReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/TargaReader.st,v 1.9 1996-06-08 10:43:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/TargaReader.st,v 1.10 1997-02-01 14:05:35 cg Exp $'
 ! !
 TargaReader initialize!
--- a/WinIconRdr.st	Fri Jan 31 18:59:54 1997 +0100
+++ b/WinIconRdr.st	Sat Feb 01 15:07:04 1997 +0100
@@ -53,14 +53,12 @@
 
 initialize
     "tell Image-class, that a new fileReader is present
-     for the '.bmp', '.BMP', '.ico' and '.ICO' extensions."
+     for the '.bmp' and '.ico' extensions."
 
-    Image fileFormats at:'.bmp'  put:self.
-    Image fileFormats at:'.BMP'  put:self.
-    Image fileFormats at:'.ico'  put:self.
-    Image fileFormats at:'.ICO'  put:self.
+    Image addReader:self suffix:'bmp'.
+    Image addReader:self suffix:'ico'.
 
-    "Modified: 23.4.1996 / 13:08:46 / cg"
+    "Modified: 1.2.1997 / 15:03:59 / cg"
 ! !
 
 !WindowsIconReader class methodsFor:'testing'!
@@ -647,6 +645,6 @@
 !WindowsIconReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Attic/WinIconRdr.st,v 1.27 1997-01-28 00:48:47 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/WinIconRdr.st,v 1.28 1997-02-01 14:07:04 cg Exp $'
 ! !
 WindowsIconReader initialize!
--- a/WindowsIconReader.st	Fri Jan 31 18:59:54 1997 +0100
+++ b/WindowsIconReader.st	Sat Feb 01 15:07:04 1997 +0100
@@ -53,14 +53,12 @@
 
 initialize
     "tell Image-class, that a new fileReader is present
-     for the '.bmp', '.BMP', '.ico' and '.ICO' extensions."
+     for the '.bmp' and '.ico' extensions."
 
-    Image fileFormats at:'.bmp'  put:self.
-    Image fileFormats at:'.BMP'  put:self.
-    Image fileFormats at:'.ico'  put:self.
-    Image fileFormats at:'.ICO'  put:self.
+    Image addReader:self suffix:'bmp'.
+    Image addReader:self suffix:'ico'.
 
-    "Modified: 23.4.1996 / 13:08:46 / cg"
+    "Modified: 1.2.1997 / 15:03:59 / cg"
 ! !
 
 !WindowsIconReader class methodsFor:'testing'!
@@ -647,6 +645,6 @@
 !WindowsIconReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/WindowsIconReader.st,v 1.27 1997-01-28 00:48:47 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/WindowsIconReader.st,v 1.28 1997-02-01 14:07:04 cg Exp $'
 ! !
 WindowsIconReader initialize!
--- a/XBMReader.st	Fri Jan 31 18:59:54 1997 +0100
+++ b/XBMReader.st	Sat Feb 01 15:07:04 1997 +0100
@@ -58,9 +58,9 @@
     "tell Image-class, that a new fileReader is present
      for the '.xbm' extension."
 
-    Image fileFormats at:'.xbm'  put:self.
+    Image addReader:self suffix:'xbm'.
 
-    "Modified: 23.4.1996 / 12:37:30 / cg"
+    "Modified: 1.2.1997 / 15:04:09 / cg"
 ! !
 
 !XBMReader class methodsFor:'testing'!
@@ -293,6 +293,6 @@
 !XBMReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/XBMReader.st,v 1.28 1997-01-10 17:31:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/XBMReader.st,v 1.29 1997-02-01 14:05:48 cg Exp $'
 ! !
 XBMReader initialize!
--- a/XPMReader.st	Fri Jan 31 18:59:54 1997 +0100
+++ b/XPMReader.st	Sat Feb 01 15:07:04 1997 +0100
@@ -70,7 +70,9 @@
     "tell Image-class, that a new fileReader is present
      for the '.xpm' extension."
 
-    Image fileFormats at:'.xpm'  put:self.
+    Image addReader:self suffix:'xpm'.
+
+    "Modified: 1.2.1997 / 15:04:20 / cg"
 ! !
 
 !XPMReader class methodsFor:'testing'!
@@ -339,6 +341,6 @@
 !XPMReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/XPMReader.st,v 1.19 1997-01-24 14:46:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/XPMReader.st,v 1.20 1997-02-01 14:06:54 cg Exp $'
 ! !
 XPMReader initialize!
--- a/XWDReader.st	Fri Jan 31 18:59:54 1997 +0100
+++ b/XWDReader.st	Sat Feb 01 15:07:04 1997 +0100
@@ -58,6 +58,17 @@
 "
 ! !
 
+!XWDReader class methodsFor:'initialization'!
+
+initialize
+    "tell Image-class, that a new fileReader is present
+     for the '.xwd' extension."
+
+    Image addReader:self suffix:'xwd'.
+
+    "Created: 1.2.1997 / 15:04:46 / cg"
+! !
+
 !XWDReader class methodsFor:'queries'!
 
 canRepresent:anImage
@@ -270,5 +281,6 @@
 !XWDReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/XWDReader.st,v 1.17 1997-01-29 22:11:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/XWDReader.st,v 1.18 1997-02-01 14:05:10 cg Exp $'
 ! !
+XWDReader initialize!
hg/stx-libview2