FileBrowser.st
changeset 2434 5cf8d286f680
parent 2430 bf865ca60cd9
child 2438 63738977d5f8
--- a/FileBrowser.st	Sat Oct 23 00:52:26 1999 +0200
+++ b/FileBrowser.st	Tue Oct 26 15:58:14 1999 +0200
@@ -4417,6 +4417,9 @@
     |cmd|
 
     (aFilename asFilename hasSuffix:'pdf') ifTrue:[
+        DefaultCommandPerMIME isNil ifTrue:[
+            self class initializeDefaultCommands
+        ].
         cmd := DefaultCommandPerMIME at:'application/pdf' ifAbsent:nil.
         cmd notNil ifTrue:[
             (OperatingSystem executeCommand:(cmd bindWith:aFilename) inDirectory:currentDirectory pathName)
@@ -6929,5 +6932,5 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.347 1999-10-16 11:12:35 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.348 1999-10-26 13:58:14 cg Exp $'
 ! !