--- a/MIMETypes.st Fri Jun 21 09:14:47 2013 +0200
+++ b/MIMETypes.st Fri Jun 21 14:25:19 2013 +0200
@@ -219,17 +219,24 @@
DefaultCommandPerMIMEPerOS at:#unix put:(unixCommands := Dictionary new).
DefaultCommandPerMIMEPerOS at:#win32 put:(win32Commands := Dictionary new).
- unixCommands at:'application/x-tar-compressed' put:'gunzip < "%1" | tar tvf -'.
- unixCommands at:'application/pdf' put:'acroread "%1"'.
+ unixCommands at:'application/x-tar-compressed' put:'tar tvf -'.
OperatingSystem isMSWINDOWSlike ifFalse:[ |cmd|
- cmd := #( firefox konqueror mozilla netscape opera )
+ cmd := #('firefox' 'chrome' 'chromium' 'konqueror' 'opera')
detect:[:aCmd| (OperatingSystem pathOfCommand:aCmd) notEmptyOrNil ]
ifNone:nil.
cmd notNil ifTrue:[
unixCommands at:'text/html' put:(cmd, ' "%1"')
].
+
+ cmd := #('acroread' 'okular' 'evince' 'kpdf' 'xpdf')
+ detect:[:aCmd| (OperatingSystem pathOfCommand:aCmd) notEmptyOrNil ]
+ ifNone:nil.
+
+ cmd notNil ifTrue:[
+ unixCommands at:'application/pdf' put:(cmd, ' "%1"')
+ ].
].
@@ -1342,11 +1349,11 @@
!MIMETypes class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/MIMETypes.st,v 1.127 2013-04-02 18:10:32 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/MIMETypes.st,v 1.128 2013-06-21 12:25:19 stefan Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libview2/MIMETypes.st,v 1.127 2013-04-02 18:10:32 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/MIMETypes.st,v 1.128 2013-06-21 12:25:19 stefan Exp $'
! !