hg/stx-goodies-xmlsuite: core/XMLv2__XMLSyntaxHighlightingWriter.st@b6d834208d33 (annotated)

3 7909b6680107 Loaded into & commited from 5.3.6 Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2 diff changeset	1	"{ Package: 'stx:goodies/xmlsuite/core' }"
0 5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	2
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	3	"{ NameSpace: XMLv2 }"
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	4
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	5	OldXMLWriter subclass:#XMLSyntaxHighlightingWriter
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	6	instanceVariableNames:''
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	7	classVariableNames:''
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	8	poolDictionaries:''
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	9	category:'XML Suite-XML Writer'
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	10	!
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	11
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	12
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	13	!XMLSyntaxHighlightingWriter class methodsFor:'accessing - colors'!
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	14
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	15	attributeValueColor
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	16
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	17	^Color red:0 green:0 blue:100
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	18
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	19	"Created: / 23-04-2005 / 17:08:21 / janfrog"
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	20	!
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	21
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	22	commentColor
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	23
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	24	^Color red:0 green:51 blue:0
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	25
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	26	"Created: / 23-04-2005 / 17:08:21 / janfrog"
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	27	!
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	28
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	29	elementNameColor
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	30
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	31	^Color red:58 green:15 blue:58
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	32
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	33	"Created: / 23-04-2005 / 17:08:21 / janfrog"
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	34	!
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	35
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	36	normalColor
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	37
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	38	^Color black
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	39
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	40	"Created: / 23-04-2005 / 17:08:21 / janfrog"
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	41	!
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	42
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	43	piColor
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	44
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	45	^Color gray
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	46
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	47	"Created: / 23-04-2005 / 17:08:21 / janfrog"
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	48	! !
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	49
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	50	!XMLSyntaxHighlightingWriter methodsFor:'accessing - colors'!
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	51
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	52	attributeValueColor
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	53	^ self class attributeValueColor
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	54
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	55	"Created: / 23-04-2005 / 17:08:21 / janfrog"
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	56	!
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	57
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	58	commentColor
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	59	^ self class commentColor
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	60
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	61	"Created: / 23-04-2005 / 17:08:21 / janfrog"
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	62	!
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	63
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	64	elementNameColor
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	65	^ self class elementNameColor
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	66
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	67	"Created: / 23-04-2005 / 17:08:21 / janfrog"
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	68	!
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	69
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	70	normalColor
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	71	^ self class normalColor
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	72
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	73	"Created: / 23-04-2005 / 17:08:21 / janfrog"
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	74	!
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	75
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	76	piColor
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	77	^ self class piColor
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	78
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	79	"Created: / 23-04-2005 / 17:08:21 / janfrog"
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	80	! !
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	81
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	82	!XMLSyntaxHighlightingWriter methodsFor:'writing'!
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	83
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	84	nextPutAttributeName:qName
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	85
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	86	stream emphasis:#bold.
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	87	super nextPutAttributeName:qName.
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	88	stream emphasis:nil.
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	89
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	90	"Created: / 17-04-2005 / 13:44:29 / janfrog"
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	91	"Modified: / 22-04-2005 / 22:47:14 / janfrog"
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	92	!
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	93
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	94	nextPutAttributeValue:aString
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	95
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	96	stream
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	97	emphasis:#color->self attributeValueColor.
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	98	super nextPutAttributeValue:aString.
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	99	stream
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	100	emphasis:nil
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	101
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	102	"Created: / 17-04-2005 / 13:44:29 / janfrog"
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	103	"Modified: / 22-04-2005 / 22:45:26 / janfrog"
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	104	!
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	105
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	106	nextPutComment:aString
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	107
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	108	stream
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	109	emphasis:(Array with:(#color->self commentColor) with:#italic).
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	110	super nextPutComment:aString.
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	111	stream
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	112	emphasis:nil
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	113
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	114	"Created: / 17-04-2005 / 13:44:29 / janfrog"
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	115	"Modified: / 23-04-2005 / 09:22:08 / janfrog"
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	116	!
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	117
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	118	nextPutElementPrefix:qName localName:anObject
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	119	stream
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	120	emphasis:#color -> self elementNameColor;
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	121	nextPutAll:qName;
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	122	emphasis:nil
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	123
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	124	"Created: / 18-10-2005 / 10:50:19 / janfrog"
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	125	!
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	126
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	127	nextPutPI:target data:data
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	128
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	129	stream
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	130	emphasis:(Array with: #color->self piColor with:#italic).
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	131
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	132	super nextPutPI:target data:data.
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	133
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	134	stream emphasis:nil
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	135
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	136	"Created: / 23-04-2005 / 09:20:48 / janfrog"
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	137	! !
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	138
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	139	!XMLSyntaxHighlightingWriter class methodsFor:'documentation'!
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	140
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	141	version
5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	142	^ '$Header: /opt/data/cvs/stx/goodies/xmlsuite/XMLv2__XMLSyntaxHighlightingWriter.st,v 1.1.1.1 2005-11-01 22:07:10 vranyj1 Exp $'
174 76f50ac2e6a0 removed dependency on libutilui ans sunit, testcases are autoloaded Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3 diff changeset	143	!
76f50ac2e6a0 removed dependency on libutilui ans sunit, testcases are autoloaded Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3 diff changeset	144
76f50ac2e6a0 removed dependency on libutilui ans sunit, testcases are autoloaded Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3 diff changeset	145	version_SVN
76f50ac2e6a0 removed dependency on libutilui ans sunit, testcases are autoloaded Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3 diff changeset	146	^ '$Id$'
0 5057afe1ec87 Initial import from CVS Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	147	! !
300 b6d834208d33 ExpatXMLReader and DOM3XMLReader moved to xmlsuite/core package Jan Vrany <jan.vrany@fit.cvut.cz> parents: 296 diff changeset	148

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Tue, 02 Feb 2016 21:49:24 +0000
changeset 300	b6d834208d33
parent 296	ea3dbc023c80
permissions	-rw-r--r--