PerforceSourceCodeManager.st
changeset 3447 ec6f4f0851b4
parent 3304 450629f3fecf
child 3601 77d8a9358d66
--- a/PerforceSourceCodeManager.st	Wed Feb 05 18:51:59 2014 +0100
+++ b/PerforceSourceCodeManager.st	Wed Feb 05 18:52:00 2014 +0100
@@ -1,3 +1,14 @@
+"
+ COPYRIGHT (c) 2006 by eXept Software AG
+              All Rights Reserved
+
+ This software is furnished under a license and may be used
+ only in accordance with the terms of that license and with the
+ inclusion of the above copyright notice.   This software may not
+ be provided or otherwise made available to, or used by, any
+ other person.  No title to or ownership of the software is
+ hereby transferred.
+"
 "{ Package: 'stx:libbasic3' }"
 
 AbstractSourceCodeManager subclass:#PerforceSourceCodeManager
@@ -35,6 +46,21 @@
 	privateIn:PerforceSourceCodeManager
 !
 
+!PerforceSourceCodeManager class methodsFor:'documentation'!
+
+copyright
+"
+ COPYRIGHT (c) 2006 by eXept Software AG
+              All Rights Reserved
+
+ This software is furnished under a license and may be used
+ only in accordance with the terms of that license and with the
+ inclusion of the above copyright notice.   This software may not
+ be provided or otherwise made available to, or used by, any
+ other person.  No title to or ownership of the software is
+ hereby transferred.
+"
+! !
 
 !PerforceSourceCodeManager class methodsFor:'accessing'!
 
@@ -1803,9 +1829,9 @@
     "/ $-Id:       fileName rev date time user state $
     "/
     (firstWord = ('$','Header:')        "/ WARNING: need to split the strings to prevent CVS from expanding them
-    or:[firstWord = ('§','Header:') 
+    or:[firstWord = ('','Header:') 
     or:[firstWord = ('$','Id:') 
-    or:[firstWord = ('§','Id:')]]]) ifTrue:[
+    or:[firstWord = ('','Id:')]]]) ifTrue:[
         s skipSeparators.
         rest := s upToEnd.
         hashIndex := rest indexOf:$#.
@@ -1837,7 +1863,7 @@
      Timestamp now printOn:s format:'%h-%m-%s.%i'.
      versionInfo time:s contents.
      PerforceVersionInfo fromRCSString:versionInfo getVersionString.
-     PerforceVersionInfo fromRCSString:'$Header: /cvs/stx/stx/libbasic3/PerforceSourceCodeManager.st,v 1.34 2013-06-13 15:25:01 cg Exp $'
+     PerforceVersionInfo fromRCSString:'$Header: /cvs/stx/stx/libbasic3/PerforceSourceCodeManager.st,v 1.35 2014-02-05 17:52:00 cg Exp $'
     "
 
     "Modified: / 01-06-2012 / 13:32:40 / cg"
@@ -1938,10 +1964,10 @@
 !PerforceSourceCodeManager class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/PerforceSourceCodeManager.st,v 1.34 2013-06-13 15:25:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/PerforceSourceCodeManager.st,v 1.35 2014-02-05 17:52:00 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/PerforceSourceCodeManager.st,v 1.34 2013-06-13 15:25:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/PerforceSourceCodeManager.st,v 1.35 2014-02-05 17:52:00 cg Exp $'
 ! !