hg/stx-libtool: SmalltalkInspectorView.st@edb119820fcb (annotated)

6507 a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	1	"
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	2	COPYRIGHT (c) 2006 by eXept Software AG
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	3	All Rights Reserved
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	4
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	5	This software is furnished under a license and may be used
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	6	only in accordance with the terms of that license and with the
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	7	inclusion of the above copyright notice. This software may not
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	8	be provided or otherwise made available to, or used by, any
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	9	other person. No title to or ownership of the software is
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	10	hereby transferred.
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	11	"
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	12	"{ Package: 'stx:libtool' }"
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	13
15950 23be8cf85415 Bugfix in merge tool. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12431 diff changeset	14	"{ NameSpace: Smalltalk }"
23be8cf85415 Bugfix in merge tool. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12431 diff changeset	15
6507 a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	16	DictionaryInspectorView subclass:#SmalltalkInspectorView
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	17	instanceVariableNames:''
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	18	classVariableNames:''
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	19	poolDictionaries:''
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	20	category:'Interface-Inspector'
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	21	!
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	22
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	23	!SmalltalkInspectorView class methodsFor:'documentation'!
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	24
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	25	copyright
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	26	"
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	27	COPYRIGHT (c) 2006 by eXept Software AG
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	28	All Rights Reserved
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	29
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	30	This software is furnished under a license and may be used
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	31	only in accordance with the terms of that license and with the
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	32	inclusion of the above copyright notice. This software may not
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	33	be provided or otherwise made available to, or used by, any
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	34	other person. No title to or ownership of the software is
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	35	hereby transferred.
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	36	"
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	37	!
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	38
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	39	documentation
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	40	"
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	41	same as a dictionary inspector - separate subclass to allow for a different menu.
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	42
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	43	[author:]
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	44	Claus Gittinger
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	45	"
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	46	! !
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	47
8404 d44520bb049b * empty log message * Claus Gittinger <cg@exept.de> parents: 6509 diff changeset	48	!SmalltalkInspectorView methodsFor:'initialization & release'!
d44520bb049b * empty log message * Claus Gittinger <cg@exept.de> parents: 6509 diff changeset	49
d44520bb049b * empty log message * Claus Gittinger <cg@exept.de> parents: 6509 diff changeset	50	initialize
d44520bb049b * empty log message * Claus Gittinger <cg@exept.de> parents: 6509 diff changeset	51	super initialize.
d44520bb049b * empty log message * Claus Gittinger <cg@exept.de> parents: 6509 diff changeset	52
d44520bb049b * empty log message * Claus Gittinger <cg@exept.de> parents: 6509 diff changeset	53	hideNilValues := true.
d44520bb049b * empty log message * Claus Gittinger <cg@exept.de> parents: 6509 diff changeset	54	! !
d44520bb049b * empty log message * Claus Gittinger <cg@exept.de> parents: 6509 diff changeset	55
6509 bcaae26df254 * empty log message * Claus Gittinger <cg@exept.de> parents: 6507 diff changeset	56	!SmalltalkInspectorView methodsFor:'private'!
bcaae26df254 * empty log message * Claus Gittinger <cg@exept.de> parents: 6507 diff changeset	57
bcaae26df254 * empty log message * Claus Gittinger <cg@exept.de> parents: 6507 diff changeset	58	indexList
bcaae26df254 * empty log message * Claus Gittinger <cg@exept.de> parents: 6507 diff changeset	59	"redefined to not show class variables"
bcaae26df254 * empty log message * Claus Gittinger <cg@exept.de> parents: 6507 diff changeset	60
8404 d44520bb049b * empty log message * Claus Gittinger <cg@exept.de> parents: 6509 diff changeset	61	^ super indexList.
d44520bb049b * empty log message * Claus Gittinger <cg@exept.de> parents: 6509 diff changeset	62	"/ keys := OrderedCollection new.
d44520bb049b * empty log message * Claus Gittinger <cg@exept.de> parents: 6509 diff changeset	63	"/ inspectedObject keysDo:[:k \|
d44520bb049b * empty log message * Claus Gittinger <cg@exept.de> parents: 6509 diff changeset	64	"/ (Smalltalk keyIsClassVariableNameKey:k) ifFalse:[
d44520bb049b * empty log message * Claus Gittinger <cg@exept.de> parents: 6509 diff changeset	65	"/ keys add:k
d44520bb049b * empty log message * Claus Gittinger <cg@exept.de> parents: 6509 diff changeset	66	"/ ]
d44520bb049b * empty log message * Claus Gittinger <cg@exept.de> parents: 6509 diff changeset	67	"/ ].
d44520bb049b * empty log message * Claus Gittinger <cg@exept.de> parents: 6509 diff changeset	68	"/ keys := keys asSortedCollection:[:a :b \| a displayString < b displayString].
d44520bb049b * empty log message * Claus Gittinger <cg@exept.de> parents: 6509 diff changeset	69	"/ ^ keys
6509 bcaae26df254 * empty log message * Claus Gittinger <cg@exept.de> parents: 6507 diff changeset	70	! !
bcaae26df254 * empty log message * Claus Gittinger <cg@exept.de> parents: 6507 diff changeset	71
6507 a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	72	!SmalltalkInspectorView class methodsFor:'documentation'!
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	73
a3081301426e initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	74	version
12128 a7ff7d66ee85 Improvements in LintHighlighter, few fixes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12125 diff changeset	75	^ '$Id: SmalltalkInspectorView.st 7854 2012-01-30 17:49:41Z vranyj1 $'
9377 0f4ac22d542c * empty log message * Claus Gittinger <cg@exept.de> parents: 8404 diff changeset	76	!
0f4ac22d542c * empty log message * Claus Gittinger <cg@exept.de> parents: 8404 diff changeset	77
0f4ac22d542c * empty log message * Claus Gittinger <cg@exept.de> parents: 8404 diff changeset	78	version_CVS
12123 4bde08cebd48 trunk branched into /branches/jv Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9377 diff changeset	79	^ '�Header: /cvs/stx/stx/libtool/SmalltalkInspectorView.st,v 1.4 2010/03/03 11:16:38 cg Exp �'
12128 a7ff7d66ee85 Improvements in LintHighlighter, few fixes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12125 diff changeset	80	!
a7ff7d66ee85 Improvements in LintHighlighter, few fixes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12125 diff changeset	81
12431 9f0c59c742d5 Added LintRuleSettingsApplication and LintRuleEditDialog to define user-defined rule sets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12128 diff changeset	82	version_HG
9f0c59c742d5 Added LintRuleSettingsApplication and LintRuleEditDialog to define user-defined rule sets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12128 diff changeset	83
9f0c59c742d5 Added LintRuleSettingsApplication and LintRuleEditDialog to define user-defined rule sets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12128 diff changeset	84	^ '$Changeset: <not expanded> $'
9f0c59c742d5 Added LintRuleSettingsApplication and LintRuleEditDialog to define user-defined rule sets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12128 diff changeset	85	!
9f0c59c742d5 Added LintRuleSettingsApplication and LintRuleEditDialog to define user-defined rule sets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12128 diff changeset	86
12128 a7ff7d66ee85 Improvements in LintHighlighter, few fixes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12125 diff changeset	87	version_SVN
a7ff7d66ee85 Improvements in LintHighlighter, few fixes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12125 diff changeset	88	^ '$Id: SmalltalkInspectorView.st 7854 2012-01-30 17:49:41Z vranyj1 $'
12125 0c49a3b13e43 Merged with /trunk Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12123 diff changeset	89	! !
12431 9f0c59c742d5 Added LintRuleSettingsApplication and LintRuleEditDialog to define user-defined rule sets. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 12128 diff changeset	90

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Wed, 19 Jul 2017 09:42:32 +0200
branch	jv
changeset 17619	edb119820fcb
parent 15950	23be8cf85415
child 18532	cccb41254edf
permissions	-rw-r--r--