#REFACTORING by exept
authorClaus Gittinger <cg@exept.de>
Mon, 26 Aug 2019 19:35:06 +0200
changeset 24645 296d85814087
parent 24644 55f4e9a8de61
child 24646 7e6d23d0f41f
#REFACTORING by exept class: AbstractOperatingSystem class changed: #openApplicationForDocument:operation:mimeType:
AbstractOperatingSystem.st
--- a/AbstractOperatingSystem.st	Mon Aug 26 18:56:57 2019 +0200
+++ b/AbstractOperatingSystem.st	Mon Aug 26 19:35:06 2019 +0200
@@ -658,13 +658,14 @@
         mimeType:mimeTypeStringArgOrNil
         inDirectory:nil
         ifNone:[
-            |fn|
+            |fn url|
             
             "/ last resort: use a fileBrowser,
             "/ but only if it is a valid file (not a URL)
             (fn := aFilenameOrStringOrURLString) asFilename exists ifFalse:[
-                (aFilenameOrStringOrURLString asURL method = 'file') ifFalse:[^ false].
-                fn := aFilenameOrStringOrURLString asURL path asFilename.
+                url := aFilenameOrStringOrURLString asURL. 
+                (url method = 'file') ifFalse:[^ false].
+                fn := url path asFilename.
                 fn exists ifFalse:[^ false].
             ].
             FileBrowser default openOn:fn