--- a/FileBrowser.st	Mon Jun 14 14:59:23 1999 +0200
+++ b/FileBrowser.st	Fri Jun 18 17:23:25 1999 +0200
@@ -5494,6 +5494,11 @@
     (currentFileName endsWith:'.rs') ifTrue:[
         ^ #(';' (nil nil)).
     ].
+    ((currentFileName endsWith:'.asn1')
+    or:[(currentFileName endsWith:'.x409')
+    or:[(currentFileName endsWith:'.gdmo')]]) ifTrue:[
+        ^ #('--' ('--' '--')).
+    ].
 
     "/ smalltalk comments
 
@@ -6637,5 +6642,5 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.324 1999-05-25 14:36:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.325 1999-06-18 15:23:25 cg Exp $'
 ! !