hg/stx-goodies-xmlsuite: xquery/XQuery__DisConnectCommand.st@ea3dbc023c80 (annotated)

286 5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	1	"{ Package: 'stx:goodies/xmlsuite/xquery' }"
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	2
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	3	"{ NameSpace: XQuery }"
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	4
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	5	TriggerCommand subclass:#DisConnectCommand
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	6	instanceVariableNames:''
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	7	classVariableNames:''
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	8	poolDictionaries:''
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	9	category:'XQuery-Trigger Creating'
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	10	!
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	11
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	12
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	13	!DisConnectCommand class methodsFor:'priorities'!
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	14
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	15	priority
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	16	"Superclass says that I am responsible to implement this method"
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	17
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	18	^5
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	19
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	20	"Created: / 10-04-2012 / 19:51:06 / Adam Senk <senkadam@gmail.com>"
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	21	! !
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	22
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	23	!DisConnectCommand methodsFor:'disconnecting'!
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	24
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	25	disconnect: node
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	26	self halt.
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	27	node documentAdaptor
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	28	disconnectTriggerDef: node nodeId
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	29
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	30	"Created: / 16-04-2012 / 20:10:01 / Adam Senk <senkadam@gmail.com>"
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	31	! !
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	32
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	33	!DisConnectCommand methodsFor:'executing'!
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	34
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	35	execute
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	36
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	37	self targetSequence
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	38	do:[:node\|self disconnect: node]
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	39
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	40	"Created: / 10-04-2012 / 19:36:23 / Adam Senk <senkadam@gmail.com>"
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	41	! !
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	42
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	43	!DisConnectCommand class methodsFor:'documentation'!
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	44
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	45	version_SVN
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	46	^ '$Id$'
5e04e1cdc6af Trigger creating commands senkadam parents: diff changeset	47	! !

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Tue, 12 May 2015 12:20:53 +0100
changeset 296	ea3dbc023c80
parent 286	xquery/trunk/XQuery__DisConnectCommand.st@5e04e1cdc6af
permissions	-rw-r--r--