FileBrowser.st
changeset 3705 b4c309a36141
parent 3697 e2f7d8dec6e2
child 3720 156602dcf15c
--- a/FileBrowser.st	Wed Jul 10 15:10:31 2002 +0200
+++ b/FileBrowser.st	Wed Jul 10 15:48:40 2002 +0200
@@ -181,16 +181,18 @@
 
     #(
         "/ internal-type to icon mappings.
-        (#directory       'ICON_DIRECTORY'        'tiny_yellow_dir.xpm'       )
-        (#directoryOpen   'ICON_DIRECTORY_OPEN'   'tiny_yellow_dir_open.xpm'  )
-        (#directoryLocked 'ICON_DIRECTORY_LOCKED' 'tiny_yellow_dir_locked.xpm')
-        (#directoryLink   'ICON_DIRECTORY_LINK'   'tiny_yellow_dir_link.xpm'  )
-        (#file            'ICON_FILE'             'tiny_file_plain.xpm'       )
-        (#fileLink        'ICON_FILE_LINK'        'tiny_file_link.xpm'        )
-        (#fileLocked      'ICON_FILE_LOCKED'      'tiny_file_lock.xpm'        )
-        (#imageFile       'ICON_IMAGE_FILE'       'tiny_file_pix.xpm'         )
-        (#textFile        'ICON_TEXT_FILE'        'tiny_file_text.xpm'        )
-        (#executableFile  'ICON_EXECUTABLEFILE'   'tiny_file_exec.xpm'        )
+        (#directory             'ICON_DIRECTORY'           'tiny_yellow_dir.xpm'            )
+        (#directoryLocked       'ICON_DIRECTORY_LOCKED'    'tiny_yellow_dir_locked.xpm'     )
+        (#directoryLink         'ICON_DIRECTORY_LINK'      'tiny_yellow_dir_link.xpm'       )
+        (#file                  'ICON_FILE'                'tiny_file_plain.xpm'            )
+        (#fileLink              'ICON_FILE_LINK'           'tiny_file_link.xpm'             )
+        (#fileLocked            'ICON_FILE_LOCKED'         'tiny_file_lock.xpm'             )
+        (#imageFile             'ICON_IMAGE_FILE'          'tiny_file_pix.xpm'              )
+        (#textFile              'ICON_TEXT_FILE'           'tiny_file_text.xpm'             )
+        (#executableFile        'ICON_EXECUTABLEFILE'      'tiny_file_exec.xpm'             )
+        (#compressedFile        'ICON_COMPRESSED_FILE'     'tiny_file_compressed.xpm'       )
+        (#compressedArchive     'ICON_COMPRESSED_ARCHIVE'  'tiny_file_tar_compressed.xpm'   )
+        (#archive               'ICON_ARCHIVE'             'tiny_file_tar.xpm'              )
 
         "/ mime-type to icon mappings.
         ('text/plain'                     nil     'tiny_file_text.xpm'        )
@@ -7837,5 +7839,5 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.471 2002-07-08 13:06:40 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.472 2002-07-10 13:48:40 penk Exp $'
 ! !