tools/JavaSettingsApplication.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Thu, 27 Sep 2018 23:09:30 +0100
changeset 3854 193b04caef42
parent 3567 d531449ff6b5
permissions -rw-r--r--
Specifiy both source ant target Java versions ...when compiling Java code. Since `stx:libjava` only supports Java 7, make sure all code is compiled targeting Java 7.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     1
"{ Package: 'stx:libjava/tools' }"
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     2
3566
6efb23011437 Fixed DNU in Java settings dialog when system release cannot be detected
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3412
diff changeset
     3
"{ NameSpace: Smalltalk }"
6efb23011437 Fixed DNU in Java settings dialog when system release cannot be detected
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3412
diff changeset
     4
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     5
AbstractSettingsApplication subclass:#JavaSettingsApplication
3297
8eb3481bfdcf Java settings cleanup (part 3): removed user bundle editor
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3296
diff changeset
     6
	instanceVariableNames:'javaHomeHolder infoPanel javaHomeInfoHolder'
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     7
	classVariableNames:''
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     8
	poolDictionaries:''
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     9
	category:'Languages-Java-Tools'
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    10
!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    11
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    12
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    13
!JavaSettingsApplication class methodsFor:'initialization'!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    14
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    15
initialize
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    16
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    17
    self installInSettings
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    18
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    19
    "Created: / 23-06-2005 / 09:27:10 / masca"
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    20
!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    21
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    22
installInSettings
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    23
    
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    24
    Smalltalk addStartBlock:[
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    25
        AbstractLauncherApplication 
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    26
            addSettingsApplicationByClass:self name withName:'Java' icon:self defaultIcon
2717
16564a7101b8 Initial support for displaying only selected method's source in browser.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    27
"/    AbstractLauncherApplication settingsList 
16564a7101b8 Initial support for displaying only selected method's source in browser.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    28
"/        addLast:(Array with:'Java' with:self name)
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    29
    ]
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    30
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    31
    "Created: / 23-06-2005 / 09:27:10 / masca"
2717
16564a7101b8 Initial support for displaying only selected method's source in browser.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
    32
    "Modified: / 09-09-2013 / 01:08:52 / Jan Vrany <jan.vrany@fit.cvut.cz>"
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    33
! !
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    34
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    35
!JavaSettingsApplication class methodsFor:'image specs'!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    36
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    37
defaultIcon
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    38
    ^ self libjavaCupIconInTree
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    39
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    40
    "Created: / 19-07-2012 / 11:26:44 / Jan Vrany <jan.vrany@fit.cvut.cz>"
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    41
!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    42
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    43
libjavaCupIcon
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    44
    "This resource specification was automatically generated
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    45
     by the ImageEditor of ST/X."
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    46
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    47
    "Do not manually edit this!! If it is corrupted,
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    48
     the ImageEditor may not be able to read the specification."
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    49
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    50
    "
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    51
     self libjavaCupIcon inspect
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    52
     ImageEditor openOnClass:self andSelector:#libjavaCupIcon
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    53
     Icon flushCachedIcons
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    54
    "
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    55
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    56
    <resource: #image>
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    57
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    58
    ^Icon
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    59
        constantNamed:'JavaSettingsApplication libjavaCupIcon'
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    60
        ifAbsentPut:[(Depth24Image new) width: 66; height: 66; photometric:(#rgb); bitsPerSample:(#(8 8 8)); samplesPerPixel:(3); bits:(ByteArray fromPackedString:'
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    61
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    62
?????????????????????????????????_O)?/_1????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    63
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    64
?????????????????????????????????????????????????????????/+7<+E4????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    65
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    66
????????????????????????????????????????????????????????????????????????????????????:8X(?/#2????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    67
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    68
????????????????????????????????????????????????????????????????????????????????????????????????????????????:(D >MZ6????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    69
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    70
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    71
??????????;>:G\N=\FQ????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    72
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    73
?????????????????????????????????N7_96<@<;*D????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    74
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    75
????????????????????????????????????????????????????????=\FQ96<@=,&_????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    76
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    77
??????????????????????????????????????????????????????????????????????????????;=:8 ,96<@>>#W????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    78
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    79
????????????????????????????????????????????????????????????????????????????????????????????????????=,"]96<@:8$.????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    80
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    81
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    82
?N/\:G\N96<@=,&_????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    83
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    84
?????????????????????_G'':(L$96<@:8X)??7;????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    85
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    86
?????????????????????????????????????????_G'':(P%96<@97DC>.GJ????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    87
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    88
?????????????????????????????????????????????????????????????OC$;H,196<@96<@<;"A????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    89
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    90
????????????????????????????????????????????????????????????????????????????????>.KL:W8Z96<@96<@;99T??;>????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    91
?????????????????_W.????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    92
????????????????????????????????????????????????????????????????????????????????????????????????????=<6'':GTJ96<@96<@;))M
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    93
?//8????????????????????????>>[S<;Y>=\JS?_W.????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    94
?????????????????????????????????????????????????????????????????????????????????????????????????????????????????????/39
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    95
<Z5.96<@96<@96<@;95R?/39?????????????????/''5=\VY;H,2;Y@;>>WQ????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    96
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    97
?????????????????_K(;I@:96<@96<@96<@<*90??7<?????????????/39=\NT:''8[:GPH=\FR??7<????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    98
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    99
?????????????????????????????????????N+Z:(L#96<@96<@97DC=\NT????????????????>]&;:(H!!96<@:8 ->>''X????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   100
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   101
????????????????????????????????????????????????????????>.GJ:W,U96<@96<@:GXL>MV4??????????????7;<;U<97@B96<@;:AW?/#2????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   102
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   103
????????????????????????????????????????????????????????????????????????????>>SP:W$Q96<@96<@:GXL>-?F?????????????//8;)%J
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   104
96<@96<@<Z-+??;>????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   105
?????????????????????????????????????????????????????????????????????????????????????????????????/_0:(H"96<@96<@97DD>]":
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   106
??????????????;>;)1O96<@96<@<Z))??;>????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   107
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   108
<Z-*96<@96<@96<@=K.F????????????????=\FQ96<@96<@;H04??7<????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   109
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   110
?????????????????????_W.:GLG96<@96<@:(L$??7;?????????????/''5:W$Q96<@96<@==F-????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   111
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   112
????????????????????????????????????????????>M^896<@96<@96<@=\BP????????????????=,2$96<@96<@96<@?_K(????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   113
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   114
????????????????????????????????????????????????????????????????????>MR296<@96<@96<@>>#V????????????????<;Q;96<@96<@96<@
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   115
>>_T????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   116
?????????????????????????????????????????????????????????????????????????????????????????????OC$96<@96<@96<@?/#2????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   117
????????<Z-+96<@96<@96<@<;"B????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   118
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   119
:8 -96<@96<@?OC$????????????????=\NT96<@96<@96<@:W$Q?_O*????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   120
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   121
????????????????????????=<6&96<@96<@==F.????????????????>>[R96<@96<@96<@96<@<J]$????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   122
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   123
??????????????????????????????????????????????????7<;H8796<@;))M????????????????????;)]F96<@96<@96<@96<@=<:)????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   124
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   125
?????????????????????????????????????????????????????????????????????????????N3^:G\N96<@>.KL????????????????>].?97@B96<@
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   126
96<@96<@:W0W?/_0????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   127
????????????????????????????????????????????????????????????????????????????????????????????????????????=<6''97@A;)]G??;>
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   128
????????????????<;Q;96<@96<@96<@96<@=K6K????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   129
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   130
????????????=\VX96<@=\VY??????????????????7;;I@:96<@96<@96<@;91P????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   131
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   132
????????????????????????????????????????<;]?:W P?N?#????????????????>>#W:GLG96<@96<@;9=U????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   133
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   134
????????????????????????????????????????????????????????????????????=\RW;YH>??7<????????????????;))M96<@96<@=<:(????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   135
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   136
????????????????????????????????????????????????????????????????????????????????????????????????=\NT=,&_????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   137
<*9096<@:(L$?/+7????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   138
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   139
????>]*=?/''5????????????;99S:GPH>.KK????????????????????????????????????????9.713M+#2-#"9>72????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   140
????????????????????????????????????????????????????????????????????????????????????????????????????>O+;6NO*-\''V*LCO2-#"
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   141
:^?3??????????????????????????????;=?????????_G'':W0W>].?????????????????????????????????????9.71);?O+LOR$J?CV8"%T8J!!_*F9
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   142
7>#.????????????????????????????????????????????????????????????????????????????????????????????????????????????:?G4+<WT
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   143
]Y.4W(*''$;GD3M+#>/3<??????????????????????????????????????????????;><;"A>>#W????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   144
????????????=/#:"**?T8J!!V(^%6^O*????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   145
????????5>K)"Z&>UXN"T8J!!''[_I=O_9?????????????????????????????????????????????????????????/_1??7<????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   146
????????>O+;9^31?/??????????????????????>/3<ZYJ-T8J!![)Z0?/??????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   147
????????????????????????????.<7ZUHJ!!T8J!!T8J!!T8J!!,L[T;/O6????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   148
=?'';8.+/3]/$.,7Y)[;N$Z?C_JB7Z)N.'';''J<?[8????????????????????????????);?OT8J!!T8J!!7._-????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   149
????????????????????????????????????????????????????8^''. JN:UXN"T8J!!T8J!!T8J!!T8J!!ZYJ-^Y:6!!ZZ<$J?C&KSG&KSG&KSG&KSG%;SF#J3@
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   150
!!ZZ<_:J9]Y.3Z)N.XH.(U(R"T8J!!T8J!!T8J!!U8V#\9*3%KGD-L''V9^31????????????????????????????????????-\+WT8J!!T8J!!4=?''????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   151
????????????????????????????????????????????????????????????????????????????????????<_W72=''#*<KQ&+WH"Z&>^):6Z)N.W(*''W(*''
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   152
VHZ$T8J!!T8J!!T8J!!UHJ!!W(*''XH2(Z)N.[YV/_ZF8$+CC)K7M-\+W2-#"7>_-?O7=????????????????????????????????????????????????????%+OF
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   153
T8J!!UHJ!!<OS7????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   154
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   155
????????????????<_W7WH"&T8J!!"Z&>????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   156
????????????????????????????????????=O_9????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   157
?????????????????????????????????????/??":/@T8J!!XX2):^?3????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   158
????????????????????????????????????????????????????:N;2"**?.,7Y????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   159
????????????????????????????????????????????????????????????([/LT8J!!XH2(6>W+????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   160
????????????????????????????????????????????????????????????????????????8>/0WH"&T8J!!);?O>/3<????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   161
????????????????????????????>O+;7N[,/-C\(+/L4-?''????????????????????????????>/3<$+CDT8J!!^I65:N;2????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   162
????????????????????????????????????????????????????????????????????????????????????????????????5NC''UHJ!!T8J!!T8J!!VHZ$]925
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   163
!!*^=$Z?C''[_I*LCO+<WS+<WS+<WS+<WS*LCO&;[H#*7A JJ9ZYJ-UHJ!!T8J!!T8J!!T8J!!UXN"''K_I;/O6????????????????8^''/\)&2Z9R.0MG\?/??????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   164
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   165
????3=3%_ZF8UHN"T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!U(R#\)&2&[WG1MS_;?S7????????=/#:*\CP
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   166
#J/@3M+#?/;>????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   167
????????????????????????????????????<OS72M_!!*\GP%+OF!!JZ<\I^1Z)N.Z)N.Z)N.Z)N.Z)N.Z)N.\9*3 JJ9$+CC*,GQ0-O^7._->?3=????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   168
????????????????6^O*>O+;????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   169
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   170
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   171
?????????????????????????????????????????????????????????????????????????????????????????????O7=????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   172
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   173
????????????????????????????????????????????????????????????????????????????????????????????????????????????5>K)!!JZ<;_K5
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   174
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   175
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   176
????????4M7%UHJ!!T8J!!"**?0-K]8.+/<OS7?_;>?????????????????????/;>;/O66.S+/,?[(;3M"J&>,,_U>/3<????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   177
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   178
????????????????????????????????4-?''UHN"T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!W(*''Z)N.Z)N.Z)N.Y)B+U(R#T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!X86)*\GP
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   179
;?S7????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   180
????????????????????????????????????????????????????????????4-?'']).4T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   181
T8J!!T8J!!T8J!!UHN"_ZB8/=C\>O+;????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   182
????????????????????????????????????????????????????????;/O64-;&1=[ 1-W =O_9????????????????8^''.+\OR!!JZ<XH.(T8J!!T8J!!T8J!!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   183
T8J!!T8J!!T8J!!T8J!!T8J!!XH2(_ZF8&+WH1]W_</W8????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   184
????????????????????????????????????????????????????????????????????9^31'';''K[)Z0]).4+,SS6.S+=/'':????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   185
????????????=_#98N#.7^[,7^[,7^[,7>#.;_K5>/3<????????????????????????????????????????????????????????????????????5^C(=?'';
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   186
????????????????????????????????????????????????????????????????????????????????????9^31!!*^=UHJ!!]Y.36>W+????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   187
????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   188
????????????????''[#J1-W ????????????????????????????????????????????????????????????????????????????????0MG\U8V#T8J!!T8J!!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   189
+,SS????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   190
????????????????????????????>_/<2=''# :V;#J3@>//<????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   191
????????^Y66T8J!!T8J!!T8J!!T8J!![)Z0(;3M2=''#;OG5?/??????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   192
????????????????????????????????</W86>W+1MS_(K+K^Y66WH"&#J/@5^G(?????????????_;>=O_9????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   193
????????????????????????????????9>;2%[KEYH:*T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!VHZ$[9^0"J">''+#J*\GP-L''V0MG\2-''"4];&4];&4];&4];&4];&
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   194
4];&4];&4];&4];&1-W 1-W 1MS_-</X*,GQ''[#J$J?C!!JV<\9&2WH&&T8J!!UHJ!![9Z0&[WG1-[ =O_9????????????????:/C4#J/@=_#9????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   195
????????????????????????????????????????????????????????????????????;_K55NC''/L;[)[7N#J3@]925YX>+U(R"T8J!!T8J!!T8J!!T8J!!T8J!!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   196
T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!T8J!!U8V#Y9B,_ZB8%+OF,L[T3-3$=O_9?????????????????????/;>3=3%#J/@
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   197
XX2)5NC''????????????????????????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   198
?/??;?O67>_-4];&1-[ /L;[,,_U*LCO(;3M(;3M(;3M(;3M(;3M)+;N+<WS,\_U/,?[2-#"5.G)8.+/</W8?????????????????????????????????/??
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   199
9^310]K]$+CCXX2)U8V#%[KE:?C4????????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   200
?????????????????/??7>#.;_K5?/;>????????????????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   201
</W85>K).,7Y''K_I_*F9WX&''T8J!!UHN"]925+\OR;?O6????????????????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   202
????????????????????????????????????????????=O_9.,7Y&KSG"**? JN:$Z?C([/L(;3M);?O+<WS+<WS.L3X.,7Y.,7Y.,7Y.,7Y.,7Y-</X*<KQ
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   203
(K+K%KKE"**?^):6ZIF,VHV$T8J!!T8J!!WX&''\9&2$+CC,<#U4=?''=O_9????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   204
????????????????????????????????????????????????????????????????????????????????????????<OS78^''.3-3$/=C\+<WT*,GQ(;3M&+WH
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   205
&KSG&KSG&KSG&KSG&KSG&KSG&KSG(;3M+\OR-\''V/,?[3=3%8>+0=?'';????????????????????????????????????????????????????????????????
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   206
????????????????????????') ; yourself]
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   207
!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   208
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   209
libjavaCupIconInTree
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   210
    "This resource specification was automatically generated
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   211
     by the ImageEditor of ST/X."
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   212
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   213
    "Do not manually edit this!! If it is corrupted,
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   214
     the ImageEditor may not be able to read the specification."
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   215
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   216
    "
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   217
     self libjavaCupIconInTree inspect
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   218
     ImageEditor openOnClass:self andSelector:#libjavaCupIconInTree
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   219
     Icon flushCachedIcons
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   220
    "
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   221
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   222
    <resource: #image>
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   223
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   224
    ^Icon
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   225
        constantNamed:'JavaSettingsApplication libjavaCupIconInTree'
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   226
        ifAbsentPut:[(Depth8Image new) width: 22; height: 22; photometric:(#palette); bitsPerSample:(#(8)); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   227
G1<_G1<_G1<_G1<_G1<_G1<_G1<_G1<_G1<_G1<_G1<_G1<_G1<_G1<_G1<_G1<_G1<_G1<_G1<_G1<_G1<_G1<_G1<_G1<_G1<_G1<_C1<_G1<_G1<_G1<_
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   228
G1<_G1<_G1<_DA<_G1<_G1<_G1<_G1<_G1<_G1<_DA<_DQ<_G1<_G1<_G1<_G1<_G1<_DA<_D!!<_G1<_G1<_G1<_G1<_G1<_DA<_DA<_G1<_G1<_G1<_G1<_
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   229
G1<_G1@_G1@_G1<_G1<_G1<_G1<_G1<_G1<NG1<PC1<_G1<_G1<_G1<_G1<_G1<_G08_G1@_G1<_G1<_G1<_G1<_G1<_G1<_G1<PG1<_G1<_G1<_G1<_G1<_
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   230
G1<_G1<_G1<_G1<HG1<_G1<_G1<_BP0B@ HCB H_G1<_G0 _G1<_G1<_G1<_G1<_G1<_G1<_G04_G1<_G1<_G1<_B ,B@ HMA $_G1<_G1<_G1<_G1<_G1<_
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   231
G1<_G1<_G1<_G1<_G1<_G1<_G1<_BQ<_G1<HG1<_G1<_G1<_G1<_G1<_G1<DCP4GG1<_G1<_G1<_G1<_G0$_G1<_G1<_G1<_G1<_G1<_G1<_G1<_G0(AB (J
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   232
B TA@A<_G1<_G1<_G1<_G1<_G1<_G1<_G1<_G1<_G1<_G0@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@a') ; colorMapFromArray:#[82 129 161 83 129 160 83 129 161 83 129 162 84 129 160 84 129 161 82 130 161 82 130 162 83 130 160 83 130 161 83 130 162 84 130 161 82 131 161 83 131 161 231 110 0 230 111 0 231 111 0 231 112 0 232 112 0 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255 255]; mask:((ImageMask new) width: 22; height: 22; photometric:(#blackIs0); bitsPerSample:(#[1]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@@@@@@@@@@@@ @@A@@@BP@@D @@I@@@I@@@I @@D @@@ @@@A@A?  @@A@@?0@@@@@@P @@O@@D@@@A?0@@@@@') ; yourself); yourself]
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   233
! !
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   234
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   235
!JavaSettingsApplication class methodsFor:'interface opening'!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   236
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   237
open    
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   238
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   239
    | settingsApp |
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   240
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   241
    settingsApp := SettingsDialog new.
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   242
    settingsApp addApplClass:self fullName
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   243
                withName:'Java'.
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   244
    settingsApp showRoot: false.
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   245
    settingsApp selectedItem value:
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   246
        (settingsApp applicationList root children anyOne).
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   247
    settingsApp open.
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   248
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   249
    "Created: / 19-07-2012 / 11:25:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   250
! !
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   251
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   252
!JavaSettingsApplication class methodsFor:'interface specs'!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   253
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   254
packageBundleTabSpec
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   255
    "This resource specification was automatically generated
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   256
     by the UIPainter of ST/X."
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   257
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   258
    "Do not manually edit this!! If it is corrupted,
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   259
     the UIPainter may not be able to read the specification."
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   260
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   261
    "
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   262
     UIPainter new openOnClass:JavaSettingsApplication andSelector:#userBundleTabSpec
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   263
     JavaSettingsApplication new openInterface:#userBundleTabSpec
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   264
    "
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   265
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   266
    <resource: #canvas>
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   267
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   268
    ^ 
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   269
     #(FullSpec
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   270
        name: packageBundleTabSpec
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   271
        window: 
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   272
       (WindowSpec
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   273
          label: 'Package Libraries'
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   274
          name: 'Package Libraries'
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   275
          min: (Point 10 10)
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   276
          bounds: (Rectangle 0 0 300 300)
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   277
        )
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   278
        component: 
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   279
       (SpecCollection
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   280
          collection: (
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   281
           (SubCanvasSpec
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   282
              name: 'SubCanvas1'
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   283
              layout: (LayoutFrame 0 0 0 0 0 1 0 1)
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   284
              hasHorizontalScrollBar: false
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   285
              hasVerticalScrollBar: false
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   286
              majorKey: JavaCodeBundleEditor
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   287
              subAspectHolders: 
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   288
             (Array
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   289
                
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   290
               (SubChannelInfoSpec
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   291
                  subAspect: bundleHolder
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   292
                  aspect: packageBundleHolder
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   293
                ) 
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   294
               (SubChannelInfoSpec
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   295
                  subAspect: readonlyHolder
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   296
                  aspect: trueHolder
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   297
                )
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   298
              )
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   299
              createNewApplication: true
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   300
              createNewBuilder: true
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   301
            )
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   302
           )
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   303
         
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   304
        )
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   305
      )
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   306
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   307
    "Created: / 28-01-2013 / 20:33:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   308
!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   309
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   310
userBundleTabSpec
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   311
    "This resource specification was automatically generated
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   312
     by the UIPainter of ST/X."
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   313
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   314
    "Do not manually edit this!! If it is corrupted,
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   315
     the UIPainter may not be able to read the specification."
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   316
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   317
    "
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   318
     UIPainter new openOnClass:JavaSettingsApplication andSelector:#userBundleTabSpec
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   319
     JavaSettingsApplication new openInterface:#userBundleTabSpec
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   320
    "
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   321
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   322
    <resource: #canvas>
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   323
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   324
    ^ 
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   325
     #(FullSpec
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   326
        name: userBundleTabSpec
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   327
        window: 
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   328
       (WindowSpec
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   329
          label: 'User Libraries'
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   330
          name: 'User Libraries'
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   331
          min: (Point 10 10)
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   332
          bounds: (Rectangle 0 0 300 300)
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   333
        )
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   334
        component: 
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   335
       (SpecCollection
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   336
          collection: (
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   337
           (SubCanvasSpec
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   338
              name: 'SubCanvas1'
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   339
              layout: (LayoutFrame 0 0 0 0 0 1 0 1)
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   340
              hasHorizontalScrollBar: false
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   341
              hasVerticalScrollBar: false
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   342
              majorKey: JavaCodeBundleEditor
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   343
              subAspectHolders: 
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   344
             (Array
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   345
                
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   346
               (SubChannelInfoSpec
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   347
                  subAspect: bundleHolder
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   348
                  aspect: userBundleHolder
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   349
                ) 
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   350
               (SubChannelInfoSpec
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   351
                  subAspect: readonlyHolder
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   352
                  aspect: #falseHolder
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   353
                )
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   354
              )
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   355
              createNewApplication: true
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   356
              createNewBuilder: true
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   357
            )
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   358
           )
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   359
         
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   360
        )
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   361
      )
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   362
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   363
    "Modified: / 28-01-2013 / 20:34:15 / Jan Vrany <jan.vrany@fit.cvut.cz>"
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   364
!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   365
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   366
windowSpec
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   367
    "This resource specification was automatically generated
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   368
     by the UIPainter of ST/X."
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   369
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   370
    "Do not manually edit this!! If it is corrupted,
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   371
     the UIPainter may not be able to read the specification."
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   372
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   373
    "
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   374
     UIPainter new openOnClass:JavaSettingsApplication andSelector:#windowSpec
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   375
     JavaSettingsApplication new openInterface:#windowSpec
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   376
     JavaSettingsApplication open
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   377
    "
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   378
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   379
    <resource: #canvas>
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   380
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   381
    ^ 
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   382
    #(FullSpec
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   383
       name: windowSpec
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   384
       window: 
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   385
      (WindowSpec
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   386
         label: 'Java Settings'
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   387
         name: 'Java Settings'
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   388
         min: (Point 10 10)
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   389
         bounds: (Rectangle 0 0 695 627)
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   390
       )
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   391
       component: 
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   392
      (SpecCollection
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   393
         collection: (
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   394
          (LabelSpec
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   395
             label: ' Java Settings'
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   396
             name: 'SubVersiSettingsTitle'
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   397
             layout: (LayoutFrame 0 0 0 0 0 1 66 0)
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   398
             style: (FontDescription helvetica medium roman 18 #'iso10646-1')
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   399
             backgroundColor: (Color 100.0 100.0 100.0)
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   400
             translateLabel: true
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   401
             adjust: left
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   402
           )
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   403
          (LabelSpec
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   404
             label: 'Icon'
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   405
             name: 'JavaIcon'
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   406
             layout: (LayoutFrame -75 1 0 0 0 1 66 0)
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   407
             hasCharacterOrientedLabel: false
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   408
             backgroundColor: (Color 100.0 100.0 100.0)
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   409
             translateLabel: true
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   410
             labelChannel: libjavaCupIcon
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   411
           )
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   412
          (SubCanvasSpec
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   413
             name: 'InfoPanel'
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   414
             layout: (LayoutFrame 0 0 67 0 0 1 107 0)
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   415
             level: 0
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   416
             initiallyInvisible: true
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   417
             hasHorizontalScrollBar: false
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   418
             hasVerticalScrollBar: false
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   419
             clientKey: infoPanel
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   420
             createNewBuilder: false
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   421
           )
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   422
          (VerticalPanelViewSpec
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   423
             name: 'Controls'
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   424
             layout: (LayoutFrame 0 0 70 0 0 1 0 1)
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   425
             horizontalLayout: fit
3297
8eb3481bfdcf Java settings cleanup (part 3): removed user bundle editor
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3296
diff changeset
   426
             verticalLayout: top
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   427
             horizontalSpace: 3
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   428
             verticalSpace: 3
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   429
             component: 
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   430
            (SpecCollection
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   431
               collection: (
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   432
                (FramedBoxSpec
3297
8eb3481bfdcf Java settings cleanup (part 3): removed user bundle editor
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3296
diff changeset
   433
                   label: 'Java'
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   434
                   name: 'JavaReleasePanel'
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   435
                   labelPosition: topLeft
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   436
                   translateLabel: true
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   437
                   component: 
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   438
                  (SpecCollection
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   439
                     collection: (
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   440
                      (LabelSpec
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   441
                         label: 'Java Home:'
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   442
                         name: 'JavaHomeLabel'
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   443
                         layout: (LayoutFrame 0 0 0 0 100 0 25 0)
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   444
                         translateLabel: true
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   445
                         adjust: left
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   446
                       )
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   447
                      (ComboBoxSpec
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   448
                         name: 'JavaHomeField'
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   449
                         layout: (LayoutFrame 100 0.0 0 0 -61 1.0 25 0)
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   450
                         model: javaHomeHolder
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   451
                         acceptOnPointerLeave: false
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   452
                         comboList: javaHomeList
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   453
                         postBuildCallback: postBuildJavaHomeFIeld:
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   454
                       )
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   455
                      (ActionButtonSpec
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   456
                         label: 'Browse'
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   457
                         name: 'Button1'
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   458
                         layout: (LayoutFrame -60 1 0 0 0 1 25 0)
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   459
                         translateLabel: true
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   460
                         model: doBrowseJavaHome
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   461
                       )
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   462
                      (LabelSpec
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   463
                         label: 'Label'
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   464
                         name: 'Label1'
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   465
                         layout: (LayoutFrame 100 0 30 0 0 1 55 0)
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   466
                         translateLabel: true
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   467
                         labelChannel: javaHomeInfoHolder
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   468
                         adjust: left
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   469
                       )
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   470
                      )
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   471
                    
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   472
                   )
3297
8eb3481bfdcf Java settings cleanup (part 3): removed user bundle editor
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3296
diff changeset
   473
                   extent: (Point 695 85)
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   474
                 )
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   475
                )
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   476
              
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   477
             )
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   478
           )
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   479
          )
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   480
        
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   481
       )
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   482
     )
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   483
! !
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   484
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   485
!JavaSettingsApplication methodsFor:'actions'!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   486
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   487
doBrowseJavaHome
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   488
    <resource: #uiCallback>
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   489
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   490
    | java_home |
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   491
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   492
    java_home := Dialog requestDirectoryName:(resources string:'Java Installation Directory').
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   493
    java_home notEmptyOrNil ifTrue:[
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   494
        self javaHomeHolder value: java_home
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   495
    ]
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   496
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   497
    "Modified: / 09-12-2014 / 11:11:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   498
!
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   499
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   500
updateJavaHomeInfo
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   501
    | home release info |
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   502
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   503
    home := self javaHomeHolder value.
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   504
    info := ''.
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   505
    home isEmptyOrNil ifTrue:[ 
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   506
        release := JavaRelease default.
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   507
    ] ifFalse:[ 
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   508
        home asFilename isDirectory ifTrue:[  
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   509
            release := JavaRelease inDirectory: home.
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   510
        ]
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   511
    ].
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   512
    release notNil ifTrue:[
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   513
        info :='%1 (%2%3) ' bindWith: release name
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   514
                                         with: (release jdkHome notNil ifTrue:[ 'JDK' ] ifFalse:[ 'JRE' ])
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   515
                                         with: (release isSystem ifTrue:[ ', system' ] ifFalse:[ '' ]).
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   516
        release isSystem ifTrue:[ 
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   517
            info := info asText allUnderlined.
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   518
        ].    
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   519
    ].
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   520
    self javaHomeInfoHolder value: info
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   521
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   522
    "Created: / 09-12-2014 / 12:56:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   523
    "Modified: / 09-12-2014 / 14:08:07 / Jan Vrany <jan.vrany@fit.cvut.cz>"
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   524
! !
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   525
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   526
!JavaSettingsApplication methodsFor:'aspects'!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   527
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   528
infoPanel
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   529
    infoPanel isNil ifTrue:[
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   530
        infoPanel := Tools::InlineMessageDialog new.
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   531
    ].
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   532
    ^ infoPanel
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   533
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   534
    "Created: / 09-02-2012 / 19:23:51 / Jan Vrany <jan.vrany@fit.cvut.cz>"
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   535
!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   536
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   537
javaHomeHolder
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   538
    <resource: #uiAspect>
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   539
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   540
    javaHomeHolder isNil ifTrue:[
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   541
        javaHomeHolder := ValueHolder with: Java release javaHome.
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   542
        javaHomeHolder onChangeSend: #updateModifiedChannel to: self.
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   543
        javaHomeHolder onChangeSend: #updateJavaHomeInfo to: self.  
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   544
    ].
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   545
    ^ javaHomeHolder.
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   546
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   547
    "Created: / 27-07-2012 / 00:06:22 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   548
    "Modified: / 09-12-2014 / 12:57:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   549
!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   550
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   551
javaHomeInfoHolder
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   552
    <resource: #uiAspect>
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   553
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   554
    "automatically generated by UIPainter ..."
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   555
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   556
    "*** the code below creates a default model when invoked."
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   557
    "*** (which may not be the one you wanted)"
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   558
    "*** Please change as required and accept it in the browser."
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   559
    "*** (and replace this comment by something more useful ;-)"
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   560
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   561
    javaHomeInfoHolder isNil ifTrue:[
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   562
        javaHomeInfoHolder := ValueHolder new.
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   563
"/ if your app needs to be notified of changes, uncomment one of the lines below:
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   564
"/       javaHomeInfoHolder addDependent:self.
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   565
"/       javaHomeInfoHolder onChangeSend:#javaHomeInfoHolderChanged to:self.
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   566
    ].
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   567
    ^ javaHomeInfoHolder.
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   568
!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   569
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   570
javaHomeList
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   571
    <resource: #uiAspect>
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   572
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   573
    ^ [
3566
6efb23011437 Fixed DNU in Java settings dialog when system release cannot be detected
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3412
diff changeset
   574
        | homesAndReleases systemRelease |    
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   575
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   576
        homesAndReleases := OrderedCollection withAll: JavaRelease available .
3566
6efb23011437 Fixed DNU in Java settings dialog when system release cannot be detected
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3412
diff changeset
   577
        systemRelease := JavaRelease system.
6efb23011437 Fixed DNU in Java settings dialog when system release cannot be detected
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3412
diff changeset
   578
        systemRelease notNil ifTrue:[
6efb23011437 Fixed DNU in Java settings dialog when system release cannot be detected
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3412
diff changeset
   579
            (homesAndReleases includesIdentical: systemRelease) ifFalse:[ 
6efb23011437 Fixed DNU in Java settings dialog when system release cannot be detected
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3412
diff changeset
   580
                homesAndReleases add: JavaRelease system.
6efb23011437 Fixed DNU in Java settings dialog when system release cannot be detected
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3412
diff changeset
   581
            ].
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   582
        ].
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   583
        (homesAndReleases anySatisfy: [:release | release javaHome = self javaHomeHolder value ]) ifFalse:[ 
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   584
            homesAndReleases addFirst: self javaHomeHolder value.
3295
87ec39ef23b8 Java settings cleanup (part 1): minor tweaks and fixes
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2909
diff changeset
   585
        ].
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   586
        homesAndReleases addLast: ((resources string:'Autodetect') asText colorizeAllWith: Color gray).
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   587
        homesAndReleases.
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   588
    ]
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   589
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   590
    "Created: / 09-12-2014 / 11:22:24 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3566
6efb23011437 Fixed DNU in Java settings dialog when system release cannot be detected
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3412
diff changeset
   591
    "Modified: / 13-04-2016 / 20:12:18 / Jan Vrany <jan.vrany@fit.cvut.cz>"
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   592
!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   593
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   594
trueHolder
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   595
    ^true
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   596
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   597
    "Created: / 28-01-2013 / 20:34:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   598
! !
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   599
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   600
!JavaSettingsApplication methodsFor:'hooks'!
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   601
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   602
postBuildJavaHomeFIeld: aComboBox
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   603
    aComboBox menuSelectAction: [ :value |
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   604
        value = (resources string:'Autodetect') ifTrue:[
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   605
            aComboBox field contents: ''
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   606
        ] ifFalse:[ 
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   607
            aComboBox field contents: (value isString ifTrue:[ value ] ifFalse:[ value javaHome ])
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   608
        ]
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   609
    ].
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   610
    aComboBox field emptyFieldReplacementText: (resources string:'Autodetect')
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   611
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   612
    "Modified: / 09-12-2014 / 14:04:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   613
! !
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   614
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   615
!JavaSettingsApplication methodsFor:'protocol'!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   616
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   617
basicReadSettings
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   618
    self javaHomeHolder value: currentUserPrefs javaHome.
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   619
    self updateJavaHomeInfo.
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   620
3297
8eb3481bfdcf Java settings cleanup (part 3): removed user bundle editor
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3296
diff changeset
   621
    "Modified (format): / 09-12-2014 / 14:53:44 / Jan Vrany <jan.vrany@fit.cvut.cz>"
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   622
!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   623
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   624
basicSaveSettings
3567
d531449ff6b5 Honour user settings when initializing default Java release.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3566
diff changeset
   625
    currentUserPrefs javaHome:self javaHomeHolder value asNilIfEmpty
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   626
3567
d531449ff6b5 Honour user settings when initializing default Java release.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3566
diff changeset
   627
    "Modified: / 13-04-2016 / 20:47:44 / Jan Vrany <jan.vrany@fit.cvut.cz>"
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   628
!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   629
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   630
helpFilename
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   631
    "subclasses must return the relative name of a helpFile
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   632
     in the doc/online/<language>/help directory.
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   633
     Or nil, if no help is available."
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   634
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   635
    ^ '../programming/java-installation.html#config'
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   636
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   637
    "Modified: / 14-08-2012 / 18:57:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   638
! !
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   639
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   640
!JavaSettingsApplication methodsFor:'queries'!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   641
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   642
hasUnsavedChanges
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   643
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   644
    self validate ifFalse:[ 
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   645
        ^ false "/ Effectively disables the 'Apply' button.
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   646
    ].
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   647
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   648
    self javaHomeHolder value ~= currentUserPrefs javaHome ifTrue:[ ^ true ].
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   649
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   650
    ^ false
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   651
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   652
    "Modified: / 09-12-2014 / 12:42:28 / Jan Vrany <jan.vrany@fit.cvut.cz>"
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   653
! !
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   654
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   655
!JavaSettingsApplication methodsFor:'validation'!
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   656
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   657
validate
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   658
    self validateJavaHome ifFalse:[ ^ false ].
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   659
    self validationOK.
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   660
    ^ true
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   661
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   662
    "Created: / 09-12-2014 / 12:27:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   663
!
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   664
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   665
validateJavaHome    
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   666
    | javaHome javaRelease |
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   667
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   668
    javaHome := self javaHomeHolder value.
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   669
    javaHome isEmptyOrNil ifTrue:[ 
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   670
        ^ true.
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   671
    ].
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   672
    javaHome asFilename exists ifFalse:[  
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   673
        self validationError: (resources string: 'Java home does not exist').
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   674
        ^ false.
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   675
    ].
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   676
    javaHome asFilename isDirectory ifFalse:[  
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   677
        self validationError: (resources string: 'Java home is not a directory').
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   678
        ^ false.
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   679
    ].
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   680
    javaRelease := JavaRelease inDirectory: javaHome.
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   681
    javaRelease isNil ifTrue:[ 
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   682
        self validationError: (resources string: 'Cannot find JDK or JRE in specified java home').
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   683
        ^ false
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   684
    ].
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   685
    ^ true
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   686
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   687
    "Created: / 09-12-2014 / 12:19:42 / Jan Vrany <jan.vrany@fit.cvut.cz>"
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   688
    "Modified: / 09-12-2014 / 14:06:51 / Jan Vrany <jan.vrany@fit.cvut.cz>"
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   689
!
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   690
3296
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   691
validationError:message
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   692
    self infoPanel
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   693
        reset;
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   694
        beWarning;
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   695
        message: message;
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   696
        show.
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   697
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   698
    "Created: / 09-12-2014 / 12:23:16 / Jan Vrany <jan.vrany@fit.cvut.cz>"
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   699
!
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   700
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   701
validationOK
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   702
    self infoPanel
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   703
        reset;
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   704
        hide.
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   705
761c7bb5853c Java settings cleanup (part 2): release settings refactored.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3295
diff changeset
   706
    "Created: / 09-12-2014 / 12:26:12 / Jan Vrany <jan.vrany@fit.cvut.cz>"
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   707
! !
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   708
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   709
!JavaSettingsApplication class methodsFor:'documentation'!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   710
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   711
version_CVS
3412
df11bb428463 Merged with mercurial revision 4f3cc813be4 (8 changesets total)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3360
diff changeset
   712
    ^ '$Header: /cvs/stx/stx/libjava/tools/JavaSettingsApplication.st,v 1.5 2015-03-20 13:29:52 vrany Exp $'
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   713
!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   714
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   715
version_HG
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   716
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   717
    ^ '$Changeset: <not expanded> $'
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   718
!
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   719
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   720
version_SVN
2731
13f5be2bf83b Merged d87e89dd5276 and fe83a843a7bf (branch default - CVS HEAD)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2711 2678
diff changeset
   721
    ^ 'Id::                                                                                                                        '
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   722
! !
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   723
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   724
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   725
JavaSettingsApplication initialize!