Added files to avoid for completion.
authorHenry M. Wu <edu/mit/csail/zurich/mhwu>
Thu, 4 Jun 1992 03:08:17 +0000 (03:08 +0000)
committerHenry M. Wu <edu/mit/csail/zurich/mhwu>
Thu, 4 Jun 1992 03:08:17 +0000 (03:08 +0000)
v7/src/edwin/dos.scm

index 190007f940b04631c430c8284e854a6061a81095..320d6f16944460e0c2986fe1b263a7b6323e9347 100644 (file)
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;;    $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/dos.scm,v 1.1 1992/05/12 15:29:45 mhwu Exp $
+;;;    $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/dos.scm,v 1.2 1992/06/04 03:08:17 mhwu Exp $
 ;;;
 ;;;    Copyright (c) 1992 Massachusetts Institute of Technology
 ;;;
@@ -323,11 +323,12 @@ Includes the new backup.  Must be > 0."
               (string-suffix? extension filename))))))
 
 (define (os/completion-ignored-extensions)
-  (append '(".bin" ".com" ".ext" ".inf"
-                  ".psb" ".moc" ".fni"
-                  ".bco" ".bld" ".bad" ".glo" ".fre"
-                  ".obj" ".exe" ".pif"
-                  ".dvi" ".toc" ".log" ".aux")
+  (append '(".bin" ".com" ".ext"
+           ".inf" ".bif" ".bsm" ".bci" ".bcs"
+           ".psb" ".moc" ".fni"
+           ".bco" ".bld" ".bad" ".glo" ".fre"
+           ".obj" ".exe" ".pif" ".grp"
+           ".dvi" ".toc" ".log" ".aux")
          (list-copy dos/backup-suffixes)))
 
 (define-variable completion-ignored-extensions