--- a/AbstractFileBrowser.st Tue May 13 21:24:02 2014 +0200
+++ b/AbstractFileBrowser.st Wed May 14 00:05:36 2014 +0200
@@ -8080,6 +8080,10 @@
] ifFalse:[
"/ ask programming languages...
lang := ProgrammingLanguage allDetect:[:l | l canReadSourceFile:fileName] ifNone:nil.
+ (lang isNil and:[(fileName hasSuffix:'js')]) ifTrue:[
+ Smalltalk loadPackage:'stx_libjavascript'.
+ lang := ProgrammingLanguage allDetect:[:l | l canReadSourceFile:fileName] ifNone:nil.
+ ].
(lang notNil and:[lang ~= SmalltalkLanguage]) ifTrue:[
lang fileIn:fileName.
] ifFalse:[
@@ -9447,10 +9451,10 @@
!AbstractFileBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.553 2014-05-06 19:39:35 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.554 2014-05-13 22:05:36 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.553 2014-05-06 19:39:35 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.554 2014-05-13 22:05:36 cg Exp $'
! !