265 |
265 |
266 self condenseChanges:changesToRemove |
266 self condenseChanges:changesToRemove |
267 |
267 |
268 "Created: / 05-11-2001 / 14:21:17 / cg" |
268 "Created: / 05-11-2001 / 14:21:17 / cg" |
269 "Modified: / 12-10-2006 / 16:51:27 / cg" |
269 "Modified: / 12-10-2006 / 16:51:27 / cg" |
|
270 ! ! |
|
271 |
|
272 !ChangeSet methodsFor:'private'! |
|
273 |
|
274 flattenOnto: aCollection |
|
275 |
|
276 self do:[:change|change flattenOnto: aCollection] |
|
277 ! ! |
|
278 |
|
279 !ChangeSet methodsFor:'private'! |
|
280 |
|
281 flattenedChanges |
|
282 | changes | |
|
283 changes := OrderedCollection new. |
|
284 self flattenOnto: changes. |
|
285 ^changes |
|
286 ! ! |
|
287 |
|
288 !ChangeSet methodsFor:'inspecting'! |
|
289 |
|
290 inspector2TabBrowser |
|
291 |
|
292 ^self newInspector2Tab |
|
293 label: 'Changes'; |
|
294 priority: 35; |
|
295 "JV@2011-08-06: Cannot do 'UserPreferences current changeSetBrowserClass' |
|
296 here since ChangeSetBrowser has no #on: and it is not an application model. |
|
297 Thus, enforce Tools::ChangeSetBrowser2 here..." |
|
298 application: ((Tools::ChangeSetBrowser2 on: self) beOneColumn; yourself) |
|
299 |
|
300 "Modified: / 25-07-2011 / 12:22:07 / sr" |
|
301 "Modified: / 06-08-2011 / 21:22:46 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
302 "Modified: / 13-09-2011 / 11:55:53 / cg" |
|
303 ! ! |
|
304 |
|
305 !ChangeSet methodsFor:'inspecting'! |
|
306 |
|
307 inspector2Tabs |
|
308 ^ #( inspector2TabCommon inspector2TabBrowser ) |
|
309 |
|
310 "Created: / 05-07-2011 / 13:40:19 / cg" |
270 ! ! |
311 ! ! |
271 |
312 |
272 !Character methodsFor:'inspecting'! |
313 !Character methodsFor:'inspecting'! |
273 |
314 |
274 inspectorExtraAttributes |
315 inspectorExtraAttributes |
822 @@@@@@@@@@@@') ; colorMapFromArray:#[0 1 0 0 2 0 1 4 0 3 6 2 30 1 0 6 9 5 34 2 2 10 12 8 43 4 2 13 15 12 15 17 13 77 0 0 16 18 15 35 14 12 17 19 16 67 6 1 19 20 18 75 7 10 21 23 20 86 9 4 25 27 24 111 4 7 103 7 10 96 10 12 32 29 28 29 30 28 31 33 30 153 2 0 33 35 33 35 36 34 110 16 16 173 0 1 36 38 35 41 37 36 165 4 0 155 7 7 128 15 14 39 41 39 157 12 16 51 42 42 207 0 4 43 45 42 58 41 39 141 19 15 199 4 0 210 3 0 221 1 4 48 49 47 231 0 12 211 7 8 172 19 10 172 19 18 52 54 51 53 55 53 234 5 23 59 54 53 176 24 21 56 57 55 57 59 56 204 19 22 195 22 24 103 47 48 227 16 9 60 61 59 198 25 19 216 20 21 61 63 60 119 48 45 228 20 20 63 65 62 211 30 27 68 69 67 69 71 68 212 32 34 242 25 29 72 74 71 74 76 74 191 45 50 245 31 38 76 78 75 77 79 76 79 80 78 138 66 66 248 36 40 240 41 43 83 85 82 216 50 52 241 43 50 195 58 61 86 88 85 244 46 46 87 89 86 89 91 88 214 58 58 193 65 67 92 93 91 248 51 49 109 90 87 185 68 87 194 67 80 87 95 125 250 54 57 173 74 96 202 67 84 159 78 103 253 56 52 188 72 90 87 99 135 129 89 121 99 101 98 73 104 148 255 59 60 159 83 106 175 81 94 94 102 132 187 78 98 215 71 85 255 61 67 169 84 104 251 66 66 104 106 103 90 106 147 151 92 119 200 81 93 107 108 106 140 99 131 162 94 119 255 72 76 144 100 128 96 112 153 228 80 83 159 97 120 111 113 110 191 90 111 206 87 104 113 115 112 87 118 163 115 117 114 83 122 166 179 100 117 118 120 117 199 99 101 231 91 88 138 113 147 120 122 119 196 101 119 123 125 122 115 123 167 213 100 113 119 123 162 180 109 128 127 129 126 208 108 109 115 131 173 185 115 140 158 122 154 173 119 144 131 133 130 130 130 163 178 122 124 181 119 147 106 139 178 136 138 135 120 139 175 126 138 175 204 121 132 132 139 172 113 146 186 136 143 176 144 146 143 121 149 184 153 142 173 135 150 181 148 150 147 125 153 188 130 153 182 179 140 167 150 152 149 205 136 148 181 145 146 136 159 189 155 157 154 140 163 193 159 161 158 161 163 160 143 166 196 162 164 161 148 167 192 164 166 163 165 165 187 197 159 173 167 169 166 152 171 196 191 163 180 157 172 191 169 171 168 216 159 166 171 173 170 208 163 179 187 169 190 217 162 175 174 176 173 159 178 203 186 173 174 207 167 175 163 178 198 213 166 176 179 181 178 198 176 192 169 185 204 183 185 182 216 175 184 209 177 189 212 180 192 204 183 198 208 183 193 188 190 187 180 192 206 194 196 193 215 191 201 187 199 213 204 198 197 211 196 210 199 201 198 190 202 216 191 203 217 201 202 212 202 204 201 208 203 201 219 201 210 205 207 203 217 203 217 206 208 205 213 207 206 223 205 214 203 211 220 211 213 210 211 212 222 214 216 213 221 215 227 217 219 216 219 221 218 228 218 224 217 222 225 221 223 220 231 221 227 216 225 233 220 226 228 224 226 223 221 229 238 231 233 230 228 234 236 233 235 232 235 238 234 249 251 248 255 255 255]; mask:((ImageMask new) width: 32; height: 32; photometric:(#blackIs0); bitsPerSample:(#[1]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:' |
863 @@@@@@@@@@@@') ; colorMapFromArray:#[0 1 0 0 2 0 1 4 0 3 6 2 30 1 0 6 9 5 34 2 2 10 12 8 43 4 2 13 15 12 15 17 13 77 0 0 16 18 15 35 14 12 17 19 16 67 6 1 19 20 18 75 7 10 21 23 20 86 9 4 25 27 24 111 4 7 103 7 10 96 10 12 32 29 28 29 30 28 31 33 30 153 2 0 33 35 33 35 36 34 110 16 16 173 0 1 36 38 35 41 37 36 165 4 0 155 7 7 128 15 14 39 41 39 157 12 16 51 42 42 207 0 4 43 45 42 58 41 39 141 19 15 199 4 0 210 3 0 221 1 4 48 49 47 231 0 12 211 7 8 172 19 10 172 19 18 52 54 51 53 55 53 234 5 23 59 54 53 176 24 21 56 57 55 57 59 56 204 19 22 195 22 24 103 47 48 227 16 9 60 61 59 198 25 19 216 20 21 61 63 60 119 48 45 228 20 20 63 65 62 211 30 27 68 69 67 69 71 68 212 32 34 242 25 29 72 74 71 74 76 74 191 45 50 245 31 38 76 78 75 77 79 76 79 80 78 138 66 66 248 36 40 240 41 43 83 85 82 216 50 52 241 43 50 195 58 61 86 88 85 244 46 46 87 89 86 89 91 88 214 58 58 193 65 67 92 93 91 248 51 49 109 90 87 185 68 87 194 67 80 87 95 125 250 54 57 173 74 96 202 67 84 159 78 103 253 56 52 188 72 90 87 99 135 129 89 121 99 101 98 73 104 148 255 59 60 159 83 106 175 81 94 94 102 132 187 78 98 215 71 85 255 61 67 169 84 104 251 66 66 104 106 103 90 106 147 151 92 119 200 81 93 107 108 106 140 99 131 162 94 119 255 72 76 144 100 128 96 112 153 228 80 83 159 97 120 111 113 110 191 90 111 206 87 104 113 115 112 87 118 163 115 117 114 83 122 166 179 100 117 118 120 117 199 99 101 231 91 88 138 113 147 120 122 119 196 101 119 123 125 122 115 123 167 213 100 113 119 123 162 180 109 128 127 129 126 208 108 109 115 131 173 185 115 140 158 122 154 173 119 144 131 133 130 130 130 163 178 122 124 181 119 147 106 139 178 136 138 135 120 139 175 126 138 175 204 121 132 132 139 172 113 146 186 136 143 176 144 146 143 121 149 184 153 142 173 135 150 181 148 150 147 125 153 188 130 153 182 179 140 167 150 152 149 205 136 148 181 145 146 136 159 189 155 157 154 140 163 193 159 161 158 161 163 160 143 166 196 162 164 161 148 167 192 164 166 163 165 165 187 197 159 173 167 169 166 152 171 196 191 163 180 157 172 191 169 171 168 216 159 166 171 173 170 208 163 179 187 169 190 217 162 175 174 176 173 159 178 203 186 173 174 207 167 175 163 178 198 213 166 176 179 181 178 198 176 192 169 185 204 183 185 182 216 175 184 209 177 189 212 180 192 204 183 198 208 183 193 188 190 187 180 192 206 194 196 193 215 191 201 187 199 213 204 198 197 211 196 210 199 201 198 190 202 216 191 203 217 201 202 212 202 204 201 208 203 201 219 201 210 205 207 203 217 203 217 206 208 205 213 207 206 223 205 214 203 211 220 211 213 210 211 212 222 214 216 213 221 215 227 217 219 216 219 221 218 228 218 224 217 222 225 221 223 220 231 221 227 216 225 233 220 226 228 224 226 223 221 229 238 231 233 230 228 234 236 233 235 232 235 238 234 249 251 248 255 255 255]; mask:((ImageMask new) width: 32; height: 32; photometric:(#blackIs0); bitsPerSample:(#[1]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:' |
823 @@@@@@@@D@@@NC @@A 8@@@\L@@@CC@@@@Y0@@@G8@@@C? @AA?<H@8??G@G???0@???8@G??8@@??>@C???>A???? O???0@O??0@C??<@O???8G???>@?? |
864 @@@@@@@@D@@@NC @@A 8@@@\L@@@CC@@@@Y0@@@G8@@@C? @AA?<H@8??G@G???0@???8@G??8@@??>@C???>A???? O???0@O??0@C??<@O???8G???>@?? |
824 ?? @???@@_??8@O???@GO?38@!!?8_@@O<C8@@>@^@@@@C@@@@@@b') ; yourself); yourself] |
865 ?? @???@@_??8@O???@GO?38@!!?8_@@O<C8@@>@^@@@@C@@@@@@b') ; yourself); yourself] |
825 ! ! |
866 ! ! |
826 |
867 |
|
868 !GenericToolbarIconLibrary class methodsFor:'image specs-16x16'! |
|
869 |
|
870 smalllintWarning16x16 |
|
871 "This resource specification was automatically generated |
|
872 by the ImageEditor of ST/X." |
|
873 |
|
874 "Do not manually edit this!! If it is corrupted, |
|
875 the ImageEditor may not be able to read the specification." |
|
876 |
|
877 " |
|
878 self smalllintWarning16x16 inspect |
|
879 ImageEditor openOnClass:self andSelector:#smalllintWarning16x16 |
|
880 Icon flushCachedIcons |
|
881 " |
|
882 |
|
883 <resource: #image> |
|
884 |
|
885 ^Icon |
|
886 constantNamed:'GenericToolbarIconLibrary smalllintWarning16x16' |
|
887 ifAbsentPut:[(Depth8Image new) width: 16; height: 16; photometric:(#palette); bitsPerSample:(#[8]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:' |
|
888 @@@@@@@@@@@@@@@@@@@@@@@@@@DA@PDA@@@@@@@@@@@@@@DB@0PC@ D@@@@@@@@@@@DBAPXFA TE@P@@@@@@@@@AA0XHA FA0D@@@@@@@@@@P$JB0,KA 0A |
|
889 @PD@@@@@@@DIB 4NCP(IC1@Q@P@@@@@@D!!LT@QPSD!!@UD@D@@@@@@@DVE0DXE <YF!!$O@P@@@@@@@Q,\GPDPFQ(YD@D@@@@@@@D^@Q< HQ$"FRD @P@@@@@A |
|
890 H2P%DA$&F"XYD@D@@@@@@R\(JR(+KB4,J2(A@@@@@@@A@PD.J"(*J"(.@@@@@@@@@@@@@PDA@PDA@P@@@@@@@@@@@@@@@@@@@@@@@@@a') ; colorMapFromArray:#[0 0 0 255 248 248 240 184 96 239 168 56 239 168 64 240 192 96 255 232 176 239 176 56 255 232 168 240 184 56 255 240 176 255 240 200 239 184 56 255 248 240 255 248 224 239 192 136 224 160 88 239 200 160 255 216 136 240 200 64 255 240 184 255 248 208 255 224 128 255 208 96 255 200 88 255 216 128 80 40 0 191 168 120 207 208 240 176 168 120 128 168 208 80 104 136 224 176 120 239 192 96 208 152 56 128 160 184 176 176 184 95 112 136 239 192 120 176 192 200 79 96 120 207 200 208 207 128 48 255 224 144 240 216 136 176 144 80 224 200 160]; mask:((Depth1Image new) width: 16; height: 16; photometric:(#blackIs0); bitsPerSample:(#[1]); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@_@C>@_<A?0G?0_? ?>C?<G?0_?!!?>G?8O?@G<@@@b') ; yourself); yourself] |
|
891 ! ! |
|
892 |
|
893 !GenericToolbarIconLibrary class methodsFor:'image specs-versions'! |
|
894 |
|
895 versionMerged24x24 |
|
896 "This resource specification was automatically generated |
|
897 by the ImageEditor of ST/X." |
|
898 |
|
899 "Do not manually edit this!! If it is corrupted, |
|
900 the ImageEditor may not be able to read the specification." |
|
901 |
|
902 " |
|
903 self versionMerged24x24 inspect |
|
904 ImageEditor openOnClass:self andSelector:#versionMerged24x24 |
|
905 Icon flushCachedIcons |
|
906 " |
|
907 |
|
908 <resource: #image> |
|
909 |
|
910 ^Icon |
|
911 constantNamed:'GenericToolbarIconLibrary class versionMerged24x24' |
|
912 ifAbsentPut:[(Depth8Image new) width: 24; height: 24; photometric:(#palette); bitsPerSample:(#(8)); samplesPerPixel:(1); bits:(ByteArray fromPackedString:' |
|
913 @!!LNDADQE!!XVF!!0_H2D$H2@ H18"H!!8AO=SZ6]''\7^C"8.[&9.#*;N?2;_W6>]HXU^''.;.;.<OS4=OS4=?_8>O#;?O;=?>\RTMOM3L3K2<3M3<?Q5=/^8^W) |
|
914 9.[1:=T]Q<N:.[&8.K?A/\GA1LSG1<+J5-#$7<8VR*:.,+N6-+&9.[2<0LC@0LC@0<#B4L$ON:J*****+:.+*;N1-[V5-;.;0LB=1+8VN*J\)JF!!)JR#*J"+ |
|
915 *:6-,[V5-+&9/;@MNIBQ$)JY$)JY''):^(:N#*J"/)+J/-I4LNXNK#H.N!!)JT$)JR%).[&Y.&)*J&*YLTM6&H"H"H"H.N#(:N#9BP$IZV&*JZ&8(UMU5,\8E9 |
|
916 V=2^XRH"8.K"8:O#9*V%''4UMT%HV6I1\WE1\W9/^XNC (NH"H.K#G@YM$EAP45_W&11[7E1^GM8\7M: (M3"VLULDMCRDMAP45[V6I"X&I"[F1,X''91_5 K |
|
917 LDMQUEEMRDMCPUQTW6!!+]&I,[HE5[D0KLU)ST5M(W5)TTT5MTUEQUE)SW6-SYC4JL65ST5MST5MST5MSS$9NS$9HQD9DRC8JLVI1[FI"X&I WE1ST5M[ZF!!_ |
|
918 UEQNS30GLFI,\V11\W!!,X&I"Y&I!!W%9^T5MSWS0HLH]:^&93[798[G9/\V1,X&I!!WFA\Y30EMIF,%9RK_G%9\&=/[6=1[&91[GV@]DHDJ9>6+)2P"8"A!!7=? |
|
919 _7=?_7=?\7Q.^4@CA"X-I2\''I2</JR$)JR (JB (K"4,J"T@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@a') ; colorMapFromArray:#[28 1 19 26 0 23 36 0 35 57 0 48 55 1 50 58 0 51 61 0 54 57 3 52 56 0 54 63 0 57 64 0 58 63 0 62 67 3 66 66 0 68 69 5 67 70 6 68 70 0 72 71 0 73 57 15 60 65 17 63 72 9 70 79 0 77 70 0 74 72 0 75 61 25 59 81 2 79 74 13 71 74 1 77 76 4 79 70 15 72 66 23 68 78 7 81 75 19 76 81 12 83 61 25 67 75 21 77 78 23 79 91 5 94 114 6 111 122 0 119 124 0 121 130 0 123 118 0 120 110 25 104 119 0 122 119 17 114 120 0 123 125 20 115 129 2 127 135 0 131 137 0 134 139 0 136 125 26 118 138 1 141 137 22 130 142 9 143 138 16 142 139 31 136 142 22 145 145 26 147 147 16 155 154 0 166 159 22 161 128 73 126 148 48 147 186 0 187 155 40 156 187 0 189 196 0 193 188 0 190 188 0 191 156 31 162 189 0 192 180 0 187 157 32 163 198 0 197 164 20 172 191 4 193 200 0 200 182 3 189 156 57 155 193 9 194 202 0 202 203 0 204 196 13 195 152 66 152 194 0 199 205 0 206 164 41 168 206 0 207 197 17 195 195 0 201 207 0 208 188 16 192 196 0 202 198 20 195 207 0 209 196 0 203 197 0 204 167 45 171 199 23 196 198 0 205 208 0 211 192 23 194 200 26 196 189 0 201 199 2 206 201 29 196 203 7 208 202 31 197 192 5 203 200 0 210 173 52 176 206 13 209 201 0 211 195 11 204 199 33 198 214 18 211 204 36 198 201 0 212 208 17 210 202 0 213 197 15 205 190 33 195 203 0 214 184 47 187 210 21 211 202 39 200 208 41 201 211 24 212 200 22 207 202 25 208 214 28 214 204 28 209 198 1 216 207 47 203 207 31 211 200 45 202 185 65 187 208 33 212 198 32 208 209 35 213 210 38 214 212 40 215 213 42 216 207 55 208 202 40 211 193 73 194 214 44 217 205 42 213 216 46 218 213 28 223 206 44 214 208 47 215 220 49 221 214 62 214 221 51 222 192 87 193 210 50 217 206 83 201 215 64 215 211 51 218 224 55 224 213 53 219 217 67 217 227 58 226 218 68 218 215 56 221 218 58 223 213 80 212 220 71 220 219 60 224 229 62 229 220 61 225 231 64 230 223 74 222 201 96 202 222 63 226 224 75 223 225 76 224 218 85 217 224 65 228 226 78 224 224 67 229 218 77 222 228 80 226 229 82 227 226 70 231 230 83 228 223 81 226 211 105 211 225 92 223 233 85 230 226 93 224 224 84 228 231 75 235 227 95 225 234 87 232 219 94 223 230 98 228 228 89 232 217 106 222 234 102 232 225 100 229 226 101 230 228 104 232 213 116 219 229 105 233 231 107 235 224 114 229 199 149 203 242 102 244 216 137 220 205 135 215 237 113 241 234 128 234 238 114 242 223 126 229 226 134 228 236 130 236 225 128 231 229 131 234 240 134 239 233 117 242 230 133 236 239 128 243 236 143 238 238 145 239 238 123 247 243 133 247 238 146 240 215 161 223 241 148 243 250 144 249 235 156 239 225 155 235 237 158 241 229 163 235 249 142 255 242 161 245 247 149 252 238 154 246 246 170 245 249 151 254 249 153 255 238 170 243 230 176 238 245 161 253 247 163 255 236 181 244 245 166 255 243 172 253 245 190 253 243 184 254 246 193 255 238 193 253]; yourself] |
|
920 ! ! |
|
921 |
827 !Image methodsFor:'inspecting'! |
922 !Image methodsFor:'inspecting'! |
828 |
923 |
829 inspector2TabImage |
924 inspector2TabImage |
830 |
925 |
831 ^self newInspector2Tab |
926 ^self newInspector2Tab |
1354 |
1449 |
1355 "Created: / 01-12-2007 / 22:50:28 / janfrog" |
1450 "Created: / 01-12-2007 / 22:50:28 / janfrog" |
1356 "Modified: / 07-11-2008 / 08:40:35 / Jan Vrany <vranyj1@fel.cvut.cz>" |
1451 "Modified: / 07-11-2008 / 08:40:35 / Jan Vrany <vranyj1@fel.cvut.cz>" |
1357 ! ! |
1452 ! ! |
1358 |
1453 |
|
1454 !ProgrammingLanguage methodsFor:'displaying'! |
|
1455 |
|
1456 displayString |
|
1457 ^ self name |
|
1458 |
|
1459 "Created: / 26-10-2013 / 00:52:58 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
1460 ! ! |
|
1461 |
1359 !ProgrammingLanguage methodsFor:'accessing'! |
1462 !ProgrammingLanguage methodsFor:'accessing'! |
1360 |
1463 |
1361 toolbox |
1464 toolbox |
1362 "Answer a toolbox for receiver. A toolbox is used by language-agnostic tools (such as |
1465 "Answer a toolbox for receiver. A toolbox is used by language-agnostic tools (such as |
1363 class browser) to perform language-specific tasks (search for implementors, |
1466 class browser) to perform language-specific tasks (search for implementors, |
1588 self at:#alwaysOpenNewTabWhenCtrlClick put: aBoolean |
1691 self at:#alwaysOpenNewTabWhenCtrlClick put: aBoolean |
1589 |
1692 |
1590 "Created: / 19-10-2008 / 08:01:45 / Jan Vrany <vranyj1@fel.cvut.cz>" |
1693 "Created: / 19-10-2008 / 08:01:45 / Jan Vrany <vranyj1@fel.cvut.cz>" |
1591 ! ! |
1694 ! ! |
1592 |
1695 |
|
1696 !UserPreferences methodsFor:'accessing-pref''d tools'! |
|
1697 |
|
1698 changesBrowserClassName |
|
1699 |
|
1700 ^ self |
|
1701 at: #changesBrowserClassName |
|
1702 ifAbsent:[self changesBrowserClass name]."/Backward comparibility |
|
1703 |
|
1704 "Created: / 03-04-2012 / 11:02:33 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
1705 ! ! |
|
1706 |
1593 !UserPreferences methodsFor:'obsolete'! |
1707 !UserPreferences methodsFor:'obsolete'! |
1594 |
1708 |
1595 codeView2AutoIndent |
1709 codeView2AutoIndent |
1596 <resource: #obsolete> |
1710 <resource: #obsolete> |
1597 |
1711 |
1646 UserPreferences current codeView2ShowAcceptCancel:true |
1760 UserPreferences current codeView2ShowAcceptCancel:true |
1647 UserPreferences current codeView2ShowAcceptCancel:false" |
1761 UserPreferences current codeView2ShowAcceptCancel:false" |
1648 |
1762 |
1649 "Modified: / 15-02-2010 / 09:26:16 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1763 "Modified: / 15-02-2010 / 09:26:16 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1650 "Created: / 10-10-2011 / 16:40:51 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1764 "Created: / 10-10-2011 / 16:40:51 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
1765 ! ! |
|
1766 |
|
1767 !UserPreferences methodsFor:'accessing-prefs-browser'! |
|
1768 |
|
1769 confirmRefactorings |
|
1770 "If set, each refactoring must be confirmed before accepted. |
|
1771 A programmer may select which changes to apply and which not |
|
1772 and/or alter the change. |
|
1773 |
|
1774 See RefactoryChange>>shouldBeConfirmed |
|
1775 " |
|
1776 |
|
1777 ^ self at:#confirmRefactorings ifAbsent:[false]. |
|
1778 |
|
1779 " |
|
1780 UserPreferences current confirmRefactorings |
|
1781 UserPreferences current confirmRefactorings:true |
|
1782 UserPreferences current confirmRefactorings:false |
|
1783 " |
|
1784 |
|
1785 "Created: / 04-04-2012 / 14:02:17 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
1786 ! ! |
|
1787 |
|
1788 !UserPreferences methodsFor:'accessing-prefs-browser'! |
|
1789 |
|
1790 confirmRefactorings:aBoolean |
|
1791 "If set, each refactoring must be confirmed before accepted. |
|
1792 A programmer may select which changes to apply and which not |
|
1793 and/or alter the change. |
|
1794 |
|
1795 See RefactoryChange>>shouldBeConfirmed |
|
1796 " |
|
1797 |
|
1798 ^ self at:#confirmRefactorings put:aBoolean |
|
1799 |
|
1800 " |
|
1801 UserPreferences current confirmRefactorings |
|
1802 UserPreferences current confirmRefactorings:true |
|
1803 UserPreferences current confirmRefactorings:false |
|
1804 " |
|
1805 |
|
1806 "Created: / 04-04-2012 / 14:02:01 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
1807 ! ! |
|
1808 |
|
1809 !UserPreferences methodsFor:'accessing-pref''d tools'! |
|
1810 |
|
1811 fileBrowserClass |
|
1812 | class className | |
|
1813 |
|
1814 className := self at: #fileBrowserClassName ifAbsent:[nil]. |
|
1815 className notNil ifTrue:[ |
|
1816 class := Smalltalk at: className asSymbol. |
|
1817 class notNil ifTrue:[ ^ class ]. |
|
1818 ]. |
|
1819 |
|
1820 "/ Old code |
|
1821 self useNewFileBrowser ifTrue:[ |
|
1822 ^ (FileBrowserV2 ? FileBrowser) |
|
1823 ]. |
|
1824 ^ FileBrowser |
|
1825 |
|
1826 "Modified: / 03-04-2012 / 10:59:06 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
1827 ! ! |
|
1828 |
|
1829 !UserPreferences methodsFor:'accessing-pref''d tools'! |
|
1830 |
|
1831 fileBrowserClass: aClass |
|
1832 |
|
1833 self at: #fileBrowserClassName put: aClass name. |
|
1834 |
|
1835 " |
|
1836 UserPreferences current fileBrowserClass |
|
1837 UserPreferences current fileBrowserClass: FileBrowser. |
|
1838 UserPreferences current fileBrowserClass: FileBrowserV2. |
|
1839 " |
|
1840 |
|
1841 "Created: / 03-04-2012 / 10:57:51 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
1842 ! ! |
|
1843 |
|
1844 !UserPreferences methodsFor:'accessing-pref''d tools'! |
|
1845 |
|
1846 fileBrowserClassName |
|
1847 |
|
1848 ^ self |
|
1849 at: #fileBrowserClassName |
|
1850 ifAbsent:[self fileBrowserClass name]."/Backward comparibility |
|
1851 |
|
1852 "Created: / 03-04-2012 / 11:01:59 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
1651 ! ! |
1853 ! ! |
1652 |
1854 |
1653 !UserPreferences methodsFor:'accessing-prefs-browser'! |
1855 !UserPreferences methodsFor:'accessing-prefs-browser'! |
1654 |
1856 |
1655 showBookmarkBar |
1857 showBookmarkBar |