--- 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!