--- a/AbstractFileBrowser.st	Wed Mar 17 17:18:17 2004 +0100
+++ b/AbstractFileBrowser.st	Fri Mar 19 09:14:54 2004 +0100
@@ -5614,6 +5614,9 @@
                 SmalltalkInterchangeFileManager newForFileIn
                     fileName: fileName pathName;
                     fileIn.
+            ] ifFalse:[ (fileName hasSuffix:'js') ifTrue:[
+                "/ loading a javaScript file
+                JavaScriptSourceReader new fileIn:fileName.
             ] ifFalse:[ (fileName hasSuffix:'pcl') ifTrue:[
                 Parcel isNil ifTrue:[
                     Dialog warn:'Parcel support not loaded.'
@@ -5637,7 +5640,7 @@
                         aStream close
                     ]
                 ]
-            ]]]
+            ]]]]
         ]]
     ].
 !
@@ -6708,5 +6711,5 @@
 !AbstractFileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.222 2004-03-17 16:18:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.223 2004-03-19 08:13:57 ca Exp $'
 ! !