SVNSourceCodeManager.st
changeset 921 6c3ba44ed3a5
parent 851 32edde5d1f19
child 924 a9f83be0daee
--- a/SVNSourceCodeManager.st	Sat Oct 01 16:50:16 2011 +0200
+++ b/SVNSourceCodeManager.st	Mon Oct 03 18:23:01 2011 +0200
@@ -26,10 +26,10 @@
 "{ Package: 'stx:libsvn' }"
 
 AbstractSourceCodeManager subclass:#SVNSourceCodeManager
-	instanceVariableNames:''
-	classVariableNames:'LoadInProgressQuery'
-	poolDictionaries:''
-	category:'System-SourceCodeManagement'
+        instanceVariableNames:''
+        classVariableNames:'LoadInProgressQuery'
+        poolDictionaries:''
+        category:'System-SourceCodeManagement'
 !
 
 !SVNSourceCodeManager class methodsFor:'documentation'!
@@ -75,13 +75,6 @@
 
 !SVNSourceCodeManager class methodsFor:'* As yet uncategorized *'!
 
-revisionInfoFromString:aString inClass:aClass
-
-    ^ CVSSourceCodeManager revisionInfoFromString:aString inClass:aClass
-
-    "Created: / 05-07-2011 / 18:48:42 / jv"
-!
-
 savePreferencesOn:aFileStream
 
     "Nothing to do, since my preferences are stored in 
@@ -202,12 +195,6 @@
     ^ self shouldImplement
 ! !
 
-!SVNSourceCodeManager class methodsFor:'others'!
-
-version_CVS
-    ^ '$Header$'
-! !
-
 !SVNSourceCodeManager class methodsFor:'queries'!
 
 isExperimental
@@ -234,6 +221,17 @@
     "Modified: / 07-07-2011 / 23:11:41 / jv"
 !
 
+managerTypeNameShort
+
+    "Answers short version manager name suitable for UI,
+     i,e., CVS, SVN, P4. Used in cases where sorter strings
+     are preferred. Defaults to #managerTypeName"
+
+    ^'SVN'
+
+    "Created: / 03-10-2011 / 13:28:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 nameOfVersionMethodForExtensions
     ^ #'extensionsVersion_SVN'
 !
@@ -341,14 +339,21 @@
     "return a dictionary filled with revision info.
      This extracts the relevant info from aString."
 
+
     ^ SVNVersionInfo fromSVNString:aString
 
+
     "
      self revisionInfoFromString:(Array version_SVN)   
-     self revisionInfoFromString:(stx_libbasic2 extensionsVersion_SVN)   
+
+     self revisionInfoFromString:(stx_libbasic2 extensionsVersion_CVS)   
     "
 
+
+    "Modified: / 29-01-1997 / 19:00:35 / cg"
+    "Modified: / 03-10-2011 / 13:02:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified (comment): / 29-09-2011 / 21:54:26 / cg"
+
 ! !
 
 !SVNSourceCodeManager class methodsFor:'subclass responsibility'!
@@ -368,6 +373,11 @@
 !SVNSourceCodeManager class methodsFor:'documentation'!
 
 version
+
+    ^ '$Header$'
+!
+
+version_CVS
     ^ '$Header$'
 !