hg/stx-libscm: mercurial/HGTestCase.st@54a73fa50d40 (annotated)

210 54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	1	"
54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	2	COPYRIGHT (c) 2012-2013 by Jan Vrany
54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	3	All Rights Reserved
54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	4
54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	5	This software is furnished under a license and may be used
54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	6	only in accordance with the terms of that license and with the
54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	7	inclusion of the above copyright notice. This software may not
54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	8	be provided or otherwise made available to, or used by, any
54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	9	other person. No title to or ownership of the software is
54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	10	hereby transferred.
54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	11	"
69 17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	12	"{ Package: 'stx:libscm/mercurial' }"
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	13
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	14	TestCase subclass:#HGTestCase
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	15	instanceVariableNames:'repositories'
100 7e2196730455 Test fixes. Added library description & copyright. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 93 diff changeset	16	classVariableNames:'Verbose'
69 17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	17	poolDictionaries:''
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	18	category:'SCM-Mercurial-Tests'
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	19	!
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	20
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	21	!HGTestCase class methodsFor:'documentation'!
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	22
210 54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	23	copyright
54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	24	"
54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	25	COPYRIGHT (c) 2012-2013 by Jan Vrany
54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	26	All Rights Reserved
54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	27
54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	28	This software is furnished under a license and may be used
54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	29	only in accordance with the terms of that license and with the
54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	30	inclusion of the above copyright notice. This software may not
54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	31	be provided or otherwise made available to, or used by, any
54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	32	other person. No title to or ownership of the software is
54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	33	hereby transferred.
54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	34	"
54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	35	!
54a73fa50d40 Added copyright notice. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 183 diff changeset	36
69 17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	37	documentation
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	38	"
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	39	An anbstract base class for Mercurial tests
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	40
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	41	[author:]
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	42	Jan Vrany <jan.vrany@fit.cvut.cz>
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	43
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	44	[instance variables:]
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	45
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	46	[class variables:]
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	47
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	48	[see also:]
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	49
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	50	"
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	51	! !
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	52
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	53	!HGTestCase class methodsFor:'accessing'!
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	54
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	55	resources
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	56	^Array with: HGRepositoriesResource
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	57
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	58	"Created: / 19-09-2012 / 18:55:52 / Jan Vrany <jan.vrany@fit.cvut.cz>"
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	59	"Modified: / 17-10-2012 / 13:01:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	60	! !
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	61
76 f047cf2fc688 HGTests: tests for not yet supported features commented. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: 69 diff changeset	62	!HGTestCase class methodsFor:'testing'!
f047cf2fc688 HGTests: tests for not yet supported features commented. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: 69 diff changeset	63
f047cf2fc688 HGTests: tests for not yet supported features commented. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: 69 diff changeset	64	isAbstract
f047cf2fc688 HGTests: tests for not yet supported features commented. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: 69 diff changeset	65	^self == HGTestCase
f047cf2fc688 HGTests: tests for not yet supported features commented. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: 69 diff changeset	66
f047cf2fc688 HGTests: tests for not yet supported features commented. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: 69 diff changeset	67	"Created: / 17-11-2012 / 11:00:16 / Jan Vrany <jan.vrany@fit.cvut.cz>"
f047cf2fc688 HGTests: tests for not yet supported features commented. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: 69 diff changeset	68	! !
f047cf2fc688 HGTests: tests for not yet supported features commented. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: 69 diff changeset	69
93 2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	70	!HGTestCase methodsFor:'debugging'!
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	71
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	72	dumpRepositoryLog: repo
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	73	^self dumpRepositoryLog: repo on: Transcript sender: thisContext sender
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	74
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	75	"Created: / 22-11-2012 / 11:08:52 / Jan Vrany <jan.vrany@fit.cvut.cz>"
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	76	!
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	77
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	78	dumpRepositoryLog: repo on: stream
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	79	self dumpRepositoryLog: repo on: stream sender: thisContext sender.
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	80
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	81	"Created: / 22-11-2012 / 11:10:33 / Jan Vrany <jan.vrany@fit.cvut.cz>"
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	82	!
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	83
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	84	dumpRepositoryLog: repo on: stream sender: sender
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	85
100 7e2196730455 Test fixes. Added library description & copyright. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 93 diff changeset	86	Verbose == true ifFalse:[ ^ self ].
93 2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	87	stream cr.
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	88	stream nextPutAll: '+-- hg log '; nextPutAll: repo pathName; nextPutAll:' -- '; cr.
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	89	stream nextPutAll: '+-- sender: '; nextPutAll: sender printString ; nextPutAll:' -- '; cr.
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	90	(OperatingSystem getFullCommandOutputFrom:'hg log ', repo pathName) do:[:line\|
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	91	stream nextPutAll:'\| '; nextPutAll: line; cr.
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	92	].
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	93	stream nextPutAll: '+------------- '; cr.
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	94
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	95	"Created: / 22-11-2012 / 11:10:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	96	! !
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	97
69 17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	98	!HGTestCase methodsFor:'private'!
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	99
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	100	performTest
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	101
93 2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	102	HGAuthorQuery answer: (testSelector , ' <', testSelector , '@', self class name, '>') do:[
69 17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	103	super performTest
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	104	].
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	105
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	106	"Created: / 30-09-2012 / 10:02:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
93 2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	107	"Modified: / 22-11-2012 / 11:25:23 / Jan Vrany <jan.vrany@fit.cvut.cz>"
69 17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	108	! !
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	109
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	110	!HGTestCase methodsFor:'running'!
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	111
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	112	setUp
167 73ede479a28f Bugfix - do not cache repositories by default. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 115 diff changeset	113	repositories:= OrderedCollection new.
69 17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	114
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	115	"Created: / 19-09-2012 / 19:01:57 / Jan Vrany <jan.vrany@fit.cvut.cz>"
167 73ede479a28f Bugfix - do not cache repositories by default. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 115 diff changeset	116	"Modified: / 16-12-2012 / 12:58:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
69 17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	117	!
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	118
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	119	tearDown
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	120
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	121	HGPackageModelRegistry current flush:'mocks*'.
93 2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	122
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	123	HGRepositoriesResource current directoryForRepositories directoryContentsAsFilenames do:[:e\|
69 17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	124	[
100 7e2196730455 Test fixes. Added library description & copyright. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 93 diff changeset	125	Verbose == true ifTrue:[
7e2196730455 Test fixes. Added library description & copyright. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 93 diff changeset	126	Transcript cr; show: '+-- removing '; showCR: e pathName.
7e2196730455 Test fixes. Added library description & copyright. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 93 diff changeset	127	].
93 2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	128	e asFilename recursiveRemove.
2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	129	] on: Error do:[:ex\|
69 17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	130	"Stupid windows"
93 2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	131	ex halt
69 17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	132	]
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	133	].
93 2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	134
69 17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	135	repositories := nil.
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	136
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	137	"Created: / 19-09-2012 / 19:03:15 / Jan Vrany <jan.vrany@fit.cvut.cz>"
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	138	"Modified: / 30-09-2012 / 05:26:48 / jv"
93 2579830f6b61 Tests fixed. Not-yet-supported tests marked as skipped. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 76 diff changeset	139	"Modified: / 22-11-2012 / 11:35:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
69 17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	140	! !
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	141
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	142	!HGTestCase methodsFor:'utilities'!
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	143
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	144	repositoryNamed: nm
174 0d293012a897 Fixed commit to freshly created repository. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 167 diff changeset	145	^self repositoryNamed: nm unpack: true
0d293012a897 Fixed commit to freshly created repository. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 167 diff changeset	146
0d293012a897 Fixed commit to freshly created repository. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 167 diff changeset	147	"Created: / 19-09-2012 / 19:04:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
0d293012a897 Fixed commit to freshly created repository. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 167 diff changeset	148	"Modified: / 14-01-2013 / 13:20:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
0d293012a897 Fixed commit to freshly created repository. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 167 diff changeset	149	!
0d293012a897 Fixed commit to freshly created repository. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 167 diff changeset	150
0d293012a897 Fixed commit to freshly created repository. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 167 diff changeset	151	repositoryNamed: nm unpack: unpack
69 17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	152	\| dir \|
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	153
174 0d293012a897 Fixed commit to freshly created repository. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 167 diff changeset	154	dir := HGRepositoriesResource current directoryForRepositoryNamed: nm unpack: unpack.
69 17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	155	repositories add: dir.
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	156	^HGRepository on: dir.
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	157
174 0d293012a897 Fixed commit to freshly created repository. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 167 diff changeset	158	"Created: / 14-01-2013 / 13:20:31 / Jan Vrany <jan.vrany@fit.cvut.cz>"
69 17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	159	! !
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	160
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	161	!HGTestCase class methodsFor:'documentation'!
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	162
17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	163	version_HG
115 b1ed2d29054b version_HG changed to return string. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 100 diff changeset	164
b1ed2d29054b version_HG changed to return string. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 100 diff changeset	165	^ '$Changeset: <not expanded> $'
69 17045d49309f Refactoring: preparation for accessing changeset contents. vranyj1@bd9d3459-6c23-4dd9-91de-98eeebb81177 parents: diff changeset	166	! !
183 8f8315881c72 Bugfix in Settings (checking for Mercurial version). Jan Vrany <jan.vrany@fit.cvut.cz> parents: 174 diff changeset	167

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Fri, 01 Feb 2013 12:02:22 +0000
changeset 210	54a73fa50d40
parent 183	8f8315881c72
child 214	175e450bb8dd
permissions	-rw-r--r--