--- a/HistoryManager.st Fri Jul 08 11:29:49 2011 +0200
+++ b/HistoryManager.st Fri Jul 08 11:29:59 2011 +0200
@@ -995,7 +995,7 @@
!
version
- ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.77 2011-07-06 15:09:41 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.78 2011-07-08 09:29:59 vrany Exp $'
! !
!HistoryManager::HistoryLine class methodsFor:'filtering'!
@@ -1264,6 +1264,11 @@
(nm := HistoryManager enforcedUserName) notNil ifTrue:[
^ nm
].
+
+ (nm := UserPreferences current historyManagerSignature) notNil ifTrue:[
+ ^ nm
+ ].
+
UseGECOS == true ifTrue:[
^ OperatingSystem getFullUserName.
].
@@ -1275,7 +1280,7 @@
"Modified: / 15-07-1996 / 12:43:14 / cg"
"Modified: / 20-06-2006 / 13:26:49 / User"
- "Modified (Comment): / 30-06-2011 / 18:54:30 / cg"
+ "Modified: / 08-07-2011 / 10:24:00 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
type:type what:what
@@ -1685,7 +1690,7 @@
!HistoryManager class methodsFor:'documentation'!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.77 2011-07-06 15:09:41 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.78 2011-07-08 09:29:59 vrany Exp $'
! !
HistoryManager initialize!