equal
deleted
inserted
replaced
196 ('-') |
196 ('-') |
197 ('Stop Monitor' doStopMonitor ) |
197 ('Stop Monitor' doStopMonitor ) |
198 ). |
198 ). |
199 ]. |
199 ]. |
200 |
200 |
|
201 items := items , (self sortOrderItems). |
201 items := items , #( |
202 items := items , #( |
202 ('-') |
203 ('-') |
203 ('Update' doUpdate ) |
204 ('Update' doUpdate ) |
204 ). |
205 ). |
205 |
206 |
230 m disableAll:#( doShowNilValues doHideNilValues ) |
231 m disableAll:#( doShowNilValues doHideNilValues ) |
231 ]. |
232 ]. |
232 |
233 |
233 ^ m. |
234 ^ m. |
234 |
235 |
235 "Modified: / 01-07-2010 / 10:53:08 / cg" |
236 "Modified: / 26-09-2012 / 13:20:59 / cg" |
236 ! ! |
237 ! ! |
237 |
238 |
238 !DictionaryInspectorView methodsFor:'menu actions'! |
239 !DictionaryInspectorView methodsFor:'menu actions'! |
239 |
240 |
240 browse |
241 browse |
526 k isSymbol |
527 k isSymbol |
527 ifTrue:[ k printString] |
528 ifTrue:[ k printString] |
528 ifFalse:[ k displayString] |
529 ifFalse:[ k displayString] |
529 ]. |
530 ]. |
530 |
531 |
|
532 sortOrder == #alphabetical ifTrue:[ |
|
533 keyList sort:[:a :b | a string < b string]. |
|
534 ]. |
531 ^ keyList |
535 ^ keyList |
532 keysAndValuesCollect:[:idx :nm | |
536 keysAndValuesCollect:[:idx :nm | |
533 self listEntryForName:nm value:(self indexedValueAtIndex:idx) |
537 self listEntryForName:nm value:(self indexedValueAtIndex:idx) |
534 ]. |
538 ]. |
535 ^ keyList |
539 "/ ^ keyList |
536 |
540 |
537 "Modified: / 16-05-2012 / 19:07:57 / cg" |
541 "Modified: / 26-09-2012 / 13:22:08 / cg" |
538 "Modified: / 06-07-2012 / 10:36:20 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
542 "Modified: / 06-07-2012 / 10:36:20 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
539 ! |
543 ! |
540 |
544 |
541 instVarIndexForLine:lineNr |
545 instVarIndexForLine:lineNr |
542 "helper - return the index for a named instVar; |
546 "helper - return the index for a named instVar; |
656 ! ! |
660 ! ! |
657 |
661 |
658 !DictionaryInspectorView class methodsFor:'documentation'! |
662 !DictionaryInspectorView class methodsFor:'documentation'! |
659 |
663 |
660 version |
664 version |
661 ^ '$Id: DictionaryInspectorView.st 8012 2012-07-06 11:44:18Z vranyj1 $' |
665 ^ '$Header: /cvs/stx/stx/libtool/DictionaryInspectorView.st,v 1.77 2012/09/26 12:19:04 cg Exp $' |
662 ! |
666 ! |
663 |
667 |
664 version_CVS |
668 version_CVS |
665 ^ '§Header: /cvs/stx/stx/libtool/DictionaryInspectorView.st,v 1.76 2012/05/16 17:08:54 cg Exp §' |
669 ^ '§Header: /cvs/stx/stx/libtool/DictionaryInspectorView.st,v 1.77 2012/09/26 12:19:04 cg Exp §' |
666 ! |
670 ! |
667 |
671 |
668 version_SVN |
672 version_SVN |
669 ^ '$Id: DictionaryInspectorView.st 8012 2012-07-06 11:44:18Z vranyj1 $' |
673 ^ '$Id: DictionaryInspectorView.st 8059 2012-09-27 20:08:20Z vranyj1 $' |
670 ! ! |
674 ! ! |