class: Tools::NewSystemBrowser
authorStefan Vogel <sv@exept.de>
Fri, 17 Apr 2015 16:11:05 +0200
changeset 15578 047e7507b51e
parent 15576 f02d9ea8d577
child 15579 0475c1fef56e
child 15580 deefdf789ee7
class: Tools::NewSystemBrowser changed: #classMenuSetTag
Tools__NewSystemBrowser.st
--- a/Tools__NewSystemBrowser.st	Fri Apr 17 03:43:16 2015 +0000
+++ b/Tools__NewSystemBrowser.st	Fri Apr 17 16:11:05 2015 +0200
@@ -35778,6 +35778,9 @@
     tag isEmptyOrNil ifTrue:[^ self ].
 
     revision := tagAndRevision value.
+    (revision notNil and:[revision withoutSeparators isEmpty]) ifTrue:[
+        revision := nil.
+    ].
 
     CVSSourceCodeManager recentTag:tag.
     self withWaitCursorDo:[
@@ -57939,6 +57942,7 @@
     "Created: / 04-12-2011 / 22:22:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+
 !NewSystemBrowser methodsFor:'private-semantic checks'!
 
 checkAcceptedMethod:aMethod inClass:aClass
@@ -62414,11 +62418,11 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2215 2015-04-16 09:36:29 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2216 2015-04-17 14:11:05 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2215 2015-04-16 09:36:29 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2216 2015-04-17 14:11:05 stefan Exp $'
 !
 
 version_HG
@@ -62427,7 +62431,7 @@
 !
 
 version_SVN
-    ^ '$Id: Tools__NewSystemBrowser.st,v 1.2215 2015-04-16 09:36:29 stefan Exp $'
+    ^ '$Id: Tools__NewSystemBrowser.st,v 1.2216 2015-04-17 14:11:05 stefan Exp $'
 ! !