extensions.st
changeset 18241 4e8bcd17ec55
parent 18195 963edd8d8cab
child 18305 0a918ffa75f3
equal deleted inserted replaced
18240:8465a9e40100 18241:4e8bcd17ec55
  2352 
  2352 
  2353     tabs := super inspector2Tabs.
  2353     tabs := super inspector2Tabs.
  2354     self isExternalBytes ifFalse:[
  2354     self isExternalBytes ifFalse:[
  2355         self isString ifFalse:[
  2355         self isString ifFalse:[
  2356             self notEmpty ifTrue:[
  2356             self notEmpty ifTrue:[
  2357                 ((self conform:#isNumber) 
  2357                 ((self noneSatisfy:#isProtoObject) 
       
  2358                 and:[(self conform:#isNumber)
  2358                 or:[(self conform:#isTimeDuration)
  2359                 or:[(self conform:#isTimeDuration)
  2359                 or:[(self conform:#isTimestamp)]]) ifTrue:[
  2360                 or:[(self conform:#isTimestamp)]]]) ifTrue:[
  2360                     tabs := tabs copyWith:#inspector2TabGraph
  2361                     tabs := tabs copyWith:#inspector2TabGraph
  2361                 ]
  2362                 ]
  2362             ]
  2363             ]
  2363         ]
  2364         ]
  2364     ].
  2365     ].
  2367     "
  2368     "
  2368      #(10 20 30 40 10 20 30 40) inspect
  2369      #(10 20 30 40 10 20 30 40) inspect
  2369     "
  2370     "
  2370 
  2371 
  2371     "Modified (comment): / 31-05-2018 / 11:26:33 / Claus Gittinger"
  2372     "Modified (comment): / 31-05-2018 / 11:26:33 / Claus Gittinger"
       
  2373     "Modified: / 25-06-2018 / 18:07:29 / Maren"
  2372 ! !
  2374 ! !
  2373 
  2375 
  2374 !SequenceableCollection methodsFor:'inspecting'!
  2376 !SequenceableCollection methodsFor:'inspecting'!
  2375 
  2377 
  2376 inspectorExtraAttributes
  2378 inspectorExtraAttributes