equal
deleted
inserted
replaced
1146 #translateLabel: true |
1146 #translateLabel: true |
1147 #value: #openImageEditor |
1147 #value: #openImageEditor |
1148 #enabled: #hasSelection |
1148 #enabled: #hasSelection |
1149 ) |
1149 ) |
1150 #(#MenuItem |
1150 #(#MenuItem |
|
1151 #label: 'MP3 Player' |
|
1152 #translateLabel: true |
|
1153 #isVisible: #hasMP3Player |
|
1154 #value: #openMP3Player |
|
1155 #enabled: #hasMP3PlayerAndSelection |
|
1156 ) |
|
1157 #(#MenuItem |
1151 #label: 'ZipFile Tool' |
1158 #label: 'ZipFile Tool' |
1152 #translateLabel: true |
1159 #translateLabel: true |
1153 #value: #openZipTool |
1160 #value: #openZipTool |
1154 #enabled: #hasZipFileSelected |
1161 #enabled: #hasZipFileSelected |
1155 ) |
1162 ) |
1406 and:[JavaClassReader notNil |
1413 and:[JavaClassReader notNil |
1407 and:[JavaClassReader isLoaded]]] |
1414 and:[JavaClassReader isLoaded]]] |
1408 |
1415 |
1409 "Modified: / 17.10.1998 / 16:57:14 / cg" |
1416 "Modified: / 17.10.1998 / 16:57:14 / cg" |
1410 "Created: / 17.10.1998 / 22:58:03 / cg" |
1417 "Created: / 17.10.1998 / 22:58:03 / cg" |
|
1418 ! |
|
1419 |
|
1420 hasMP3Player |
|
1421 ^ [ MP3PlayerApplication notNil |
|
1422 or:[SaugFix::MP3PlayerApplication notNil ]] |
|
1423 ! |
|
1424 |
|
1425 hasMP3PlayerAndSelection |
|
1426 ^ [ fileListView selection size > 0 |
|
1427 and:[ self hasMP3Player value]] |
1411 ! |
1428 ! |
1412 |
1429 |
1413 hasSelection |
1430 hasSelection |
1414 ^ [fileListView selection size > 0] |
1431 ^ [fileListView selection size > 0] |
1415 |
1432 |
3106 viewer image:i. |
3123 viewer image:i. |
3107 ]. |
3124 ]. |
3108 ] fork |
3125 ] fork |
3109 |
3126 |
3110 "Modified: / 4.12.1998 / 15:49:03 / cg" |
3127 "Modified: / 4.12.1998 / 15:49:03 / cg" |
|
3128 ! |
|
3129 |
|
3130 openMP3Player |
|
3131 |file| |
|
3132 |
|
3133 file := self getSelectedFileName. |
|
3134 (file isNil) ifTrue:[ |
|
3135 ^ self. |
|
3136 ]. |
|
3137 file := currentDirectory filenameFor:file. |
|
3138 (MP3PlayerApplication ? SaugFix::MP3PlayerApplication) playSong:file. |
3111 ! |
3139 ! |
3112 |
3140 |
3113 openSelectedFilename |
3141 openSelectedFilename |
3114 |sel| |
3142 |sel| |
3115 |
3143 |
7234 ! ! |
7262 ! ! |
7235 |
7263 |
7236 !FileBrowser class methodsFor:'documentation'! |
7264 !FileBrowser class methodsFor:'documentation'! |
7237 |
7265 |
7238 version |
7266 version |
7239 ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.398 2001-04-02 13:06:12 cg Exp $' |
7267 ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.399 2001-04-22 15:26:36 cg Exp $' |
7240 ! ! |
7268 ! ! |