Tools__NewSystemBrowser.st
branchjv
changeset 12161 c68944f50686
parent 12159 0519ea0c0eaa
child 12162 19b159bf0116
--- a/Tools__NewSystemBrowser.st	Tue Feb 14 11:26:33 2012 +0000
+++ b/Tools__NewSystemBrowser.st	Tue Feb 14 17:08:43 2012 +0000
@@ -51338,7 +51338,12 @@
             ].
         ].
     ].
-    ^ { matches first . matches }
+
+    ^ matches isEmpty ifTrue:[
+        #(nil #())
+    ] ifFalse:[
+        { matches first . matches }
+    ]
 
     "Modified: / 04-08-2011 / 19:05:28 / cg"
     "Created: / 04-12-2011 / 22:22:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
@@ -55771,7 +55776,7 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Id: Tools__NewSystemBrowser.st 7888 2012-02-13 20:56:01Z vranyj1 $'
+    ^ '$Id: Tools__NewSystemBrowser.st 7890 2012-02-14 17:08:43Z vranyj1 $'
 !
 
 version_CVS
@@ -55779,7 +55784,7 @@
 !
 
 version_SVN
-    ^ '$Id: Tools__NewSystemBrowser.st 7888 2012-02-13 20:56:01Z vranyj1 $'
+    ^ '$Id: Tools__NewSystemBrowser.st 7890 2012-02-14 17:08:43Z vranyj1 $'
 ! !
 
 NewSystemBrowser initialize!