hg/stx-libbasic3: extensions.st@9eb47024eba1 (annotated)

3018 9eb47024eba1 added #problems to ProjectChecker Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3014 diff changeset	1	"{ Package: 'stx:libbasic3' }"!
2375 22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	2
2729 bc1d5b174332 category of:20 methods Claus Gittinger <cg@exept.de> parents: 2727 diff changeset	3	!UserPreferences methodsFor:'accessing-history manager'!
2375 22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	4
2393 f1330a09ba45 history method added Claus Gittinger <cg@exept.de> parents: 2375 diff changeset	5	historyManagerAllowEditOfHistory
f1330a09ba45 history method added Claus Gittinger <cg@exept.de> parents: 2375 diff changeset	6	"useful if you have 'beginner students', to prevent them from changing the history"
f1330a09ba45 history method added Claus Gittinger <cg@exept.de> parents: 2375 diff changeset	7
f1330a09ba45 history method added Claus Gittinger <cg@exept.de> parents: 2375 diff changeset	8	^self
f1330a09ba45 history method added Claus Gittinger <cg@exept.de> parents: 2375 diff changeset	9	at: #'history-manager.allow-edit-of-history'
f1330a09ba45 history method added Claus Gittinger <cg@exept.de> parents: 2375 diff changeset	10	ifAbsentPut:false
f1330a09ba45 history method added Claus Gittinger <cg@exept.de> parents: 2375 diff changeset	11
f1330a09ba45 history method added Claus Gittinger <cg@exept.de> parents: 2375 diff changeset	12	"Modified (Format): / 30-06-2011 / 17:07:33 / cg"
f1330a09ba45 history method added Claus Gittinger <cg@exept.de> parents: 2375 diff changeset	13	"Modified (Comment): / 30-06-2011 / 17:09:24 / cg"
f1330a09ba45 history method added Claus Gittinger <cg@exept.de> parents: 2375 diff changeset	14	! !
3018 9eb47024eba1 added #problems to ProjectChecker Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3014 diff changeset	15
2729 bc1d5b174332 category of:20 methods Claus Gittinger <cg@exept.de> parents: 2727 diff changeset	16	!UserPreferences methodsFor:'accessing-history manager'!
2393 f1330a09ba45 history method added Claus Gittinger <cg@exept.de> parents: 2375 diff changeset	17
2375 22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	18	historyManagerModificationLimit
2393 f1330a09ba45 history method added Claus Gittinger <cg@exept.de> parents: 2375 diff changeset	19	"the time-delta within which the history manager does not treat a change as a new one"
2375 22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	20
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	21	^self
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	22	at: #'history-manager.modification-limit'
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	23	ifAbsentPut: 3600 "/one hour"
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	24
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	25	"Created: / 04-10-2008 / 11:55:56 / Jan Vrany <vranyj1@fel.cvut.cz>"
2393 f1330a09ba45 history method added Claus Gittinger <cg@exept.de> parents: 2375 diff changeset	26	"Modified (Comment): / 30-06-2011 / 17:25:09 / cg"
2375 22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	27	! !
3018 9eb47024eba1 added #problems to ProjectChecker Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3014 diff changeset	28
2729 bc1d5b174332 category of:20 methods Claus Gittinger <cg@exept.de> parents: 2727 diff changeset	29	!UserPreferences methodsFor:'accessing-history manager'!
2375 22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	30
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	31	historyManagerModificationLimit: sec
2393 f1330a09ba45 history method added Claus Gittinger <cg@exept.de> parents: 2375 diff changeset	32	"the time-delta within which the history manager does not treat a change as a new one"
2375 22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	33
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	34	^self
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	35	at: #'history-manager.modification-limit'
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	36	put: sec
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	37
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	38	"Created: / 04-10-2008 / 11:56:23 / Jan Vrany <vranyj1@fel.cvut.cz>"
2393 f1330a09ba45 history method added Claus Gittinger <cg@exept.de> parents: 2375 diff changeset	39	"Modified (Comment): / 30-06-2011 / 17:25:13 / cg"
2375 22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	40	! !
3018 9eb47024eba1 added #problems to ProjectChecker Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3014 diff changeset	41
2729 bc1d5b174332 category of:20 methods Claus Gittinger <cg@exept.de> parents: 2727 diff changeset	42	!UserPreferences methodsFor:'accessing-history manager'!
2375 22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	43
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	44	historyManagerSignature
2393 f1330a09ba45 history method added Claus Gittinger <cg@exept.de> parents: 2375 diff changeset	45	"the signature added by the history manager"
2375 22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	46
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	47	^self historyManagerSignatures
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	48	at: (Array with: OperatingSystem getHostName with: OperatingSystem getLoginName)
2472 032f30308ef1 changed: #historyManagerSignature Claus Gittinger <cg@exept.de> parents: 2460 diff changeset	49	ifAbsent: [OperatingSystem getLoginName]
2375 22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	50
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	51	"Created: / 04-10-2008 / 12:06:58 / Jan Vrany <vranyj1@fel.cvut.cz>"
2434 62bd7a13939b HistoryManager fixes (takes user signature from preferences) vrany parents: 2393 diff changeset	52	"Modified: / 08-07-2011 / 10:24:48 / Jan Vrany <jan.vrany@fit.cvut.cz>"
2472 032f30308ef1 changed: #historyManagerSignature Claus Gittinger <cg@exept.de> parents: 2460 diff changeset	53	"Modified: / 04-08-2011 / 17:24:21 / cg"
2375 22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	54	! !
3018 9eb47024eba1 added #problems to ProjectChecker Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3014 diff changeset	55
2729 bc1d5b174332 category of:20 methods Claus Gittinger <cg@exept.de> parents: 2727 diff changeset	56	!UserPreferences methodsFor:'accessing-history manager'!
2375 22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	57
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	58	historyManagerSignature: aString
2393 f1330a09ba45 history method added Claus Gittinger <cg@exept.de> parents: 2375 diff changeset	59	"the signature added by the history manager"
2375 22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	60
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	61	^self historyManagerSignatures
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	62	at: (Array with: OperatingSystem getHostName with: OperatingSystem getLoginName)
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	63	put: aString
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	64
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	65	"Created: / 04-10-2008 / 11:54:53 / Jan Vrany <vranyj1@fel.cvut.cz>"
2393 f1330a09ba45 history method added Claus Gittinger <cg@exept.de> parents: 2375 diff changeset	66	"Modified (Comment): / 30-06-2011 / 17:25:31 / cg"
2375 22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	67	! !
3018 9eb47024eba1 added #problems to ProjectChecker Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3014 diff changeset	68
2729 bc1d5b174332 category of:20 methods Claus Gittinger <cg@exept.de> parents: 2727 diff changeset	69	!UserPreferences methodsFor:'accessing-history manager'!
2375 22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	70
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	71	historyManagerSignatures
2393 f1330a09ba45 history method added Claus Gittinger <cg@exept.de> parents: 2375 diff changeset	72	"the signatures added by the history manager"
2375 22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	73
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	74	^self
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	75	at: #'history-manager.signatures'
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	76	ifAbsentPut: [Dictionary new]
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	77
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	78	"
2393 f1330a09ba45 history method added Claus Gittinger <cg@exept.de> parents: 2375 diff changeset	79	UserPreferences current historyManagerSignatures
2375 22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	80	"
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	81
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	82	"Created: / 04-10-2008 / 11:52:40 / Jan Vrany <vranyj1@fel.cvut.cz>"
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	83	"Modified: / 22-08-2009 / 11:00:12 / Jan Vrany <vranyj1@fel.cvut.cz>"
2393 f1330a09ba45 history method added Claus Gittinger <cg@exept.de> parents: 2375 diff changeset	84	"Modified (Comment): / 30-06-2011 / 17:27:14 / cg"
2375 22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	85	! !
3018 9eb47024eba1 added #problems to ProjectChecker Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3014 diff changeset	86
2729 bc1d5b174332 category of:20 methods Claus Gittinger <cg@exept.de> parents: 2727 diff changeset	87	!UserPreferences methodsFor:'accessing-history manager'!
2375 22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	88
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	89	historyManagerSignatures: aDictionary
2393 f1330a09ba45 history method added Claus Gittinger <cg@exept.de> parents: 2375 diff changeset	90	"the signatures added by the history manager"
2375 22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	91
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	92	^self
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	93	at: #'history-manager.signatures'
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	94	ifAbsentPut: aDictionary
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	95
22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	96	"Created: / 04-10-2008 / 11:52:58 / Jan Vrany <vranyj1@fel.cvut.cz>"
2393 f1330a09ba45 history method added Claus Gittinger <cg@exept.de> parents: 2375 diff changeset	97	"Modified (Comment): / 30-06-2011 / 17:26:48 / cg"
2375 22f8328ae5bb Jan's changes vrany parents: 2374 diff changeset	98	! !
3018 9eb47024eba1 added #problems to ProjectChecker Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3014 diff changeset	99
2727 312e04853879 comment/format Claus Gittinger <cg@exept.de> parents: 2558 diff changeset	100	!UserPreferences methodsFor:'accessing-scm'!
2444 e5686290211f per-package manager settings are now saved with preferences vrany parents: 2434 diff changeset	101
e5686290211f per-package manager settings are now saved with preferences vrany parents: 2434 diff changeset	102	managerPerMatchingModuleDefinitions
e5686290211f per-package manager settings are now saved with preferences vrany parents: 2434 diff changeset	103
2447 8a859d453267 fixes vrany parents: 2444 diff changeset	104	\| defs \|
8a859d453267 fixes vrany parents: 2444 diff changeset	105
2450 d1d723fa7d56 Fixes vrany parents: 2448 diff changeset	106	defs := (self at: #'managerPerMatchingModuleDefinitionsKey' ifAbsent:[#()]).
2448 1f8e749d18d8 xx vrany parents: 2447 diff changeset	107	^(defs collect:[:e\|e decodeAsLiteralArray]) asOrderedCollection
2447 8a859d453267 fixes vrany parents: 2444 diff changeset	108
8a859d453267 fixes vrany parents: 2444 diff changeset	109	"
8a859d453267 fixes vrany parents: 2444 diff changeset	110	UserPreferences current managerPerMatchingModuleDefinitions
8a859d453267 fixes vrany parents: 2444 diff changeset	111	UserPreferences current managerPerMatchingModuleDefinitions: #().
8a859d453267 fixes vrany parents: 2444 diff changeset	112	"
2444 e5686290211f per-package manager settings are now saved with preferences vrany parents: 2434 diff changeset	113
e5686290211f per-package manager settings are now saved with preferences vrany parents: 2434 diff changeset	114	"Created: / 09-07-2011 / 13:33:23 / Jan Vrany <jan.vrany@fit.cvut.cz>"
e5686290211f per-package manager settings are now saved with preferences vrany parents: 2434 diff changeset	115	! !
3018 9eb47024eba1 added #problems to ProjectChecker Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3014 diff changeset	116
2727 312e04853879 comment/format Claus Gittinger <cg@exept.de> parents: 2558 diff changeset	117	!UserPreferences methodsFor:'accessing-scm'!
2444 e5686290211f per-package manager settings are now saved with preferences vrany parents: 2434 diff changeset	118
e5686290211f per-package manager settings are now saved with preferences vrany parents: 2434 diff changeset	119	managerPerMatchingModuleDefinitions: defs
e5686290211f per-package manager settings are now saved with preferences vrany parents: 2434 diff changeset	120
2450 d1d723fa7d56 Fixes vrany parents: 2448 diff changeset	121	self at: #'managerPerMatchingModuleDefinitionsKey'
2448 1f8e749d18d8 xx vrany parents: 2447 diff changeset	122	put: (defs collect:[:e\| e literalArrayEncoding]) asArray.
2444 e5686290211f per-package manager settings are now saved with preferences vrany parents: 2434 diff changeset	123	AbstractSourceCodeManager managerPerMatchingModuleDefinitions == defs ifFalse:[
e5686290211f per-package manager settings are now saved with preferences vrany parents: 2434 diff changeset	124	AbstractSourceCodeManager managerPerMatchingModuleDefinitions: defs.
e5686290211f per-package manager settings are now saved with preferences vrany parents: 2434 diff changeset	125	]
e5686290211f per-package manager settings are now saved with preferences vrany parents: 2434 diff changeset	126
e5686290211f per-package manager settings are now saved with preferences vrany parents: 2434 diff changeset	127	"Created: / 09-07-2011 / 13:35:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
e5686290211f per-package manager settings are now saved with preferences vrany parents: 2434 diff changeset	128	! !
3013 f25a0bdfb808 - do not fileout extensionVersion for project definition classes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3012 diff changeset	129
f25a0bdfb808 - do not fileout extensionVersion for project definition classes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3012 diff changeset	130	!stx_libbasic3 class methodsFor:'documentation'!
f25a0bdfb808 - do not fileout extensionVersion for project definition classes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3012 diff changeset	131
f25a0bdfb808 - do not fileout extensionVersion for project definition classes. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3012 diff changeset	132	extensionsVersion_SVN
3018 9eb47024eba1 added #problems to ProjectChecker Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3014 diff changeset	133	^ '$Id: extensions.st 1880 2012-02-13 15:16:58Z vranyj1 $'
9eb47024eba1 added #problems to ProjectChecker Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3014 diff changeset	134	! !

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Mon, 13 Feb 2012 15:16:58 +0000
branch	jv
changeset 3018	9eb47024eba1
parent 3014	d9ad6aafc2ae
child 3040	59494b5de91f
permissions	-rw-r--r--