[Scsh-checkins] CVS: scsh/scsh glob.scm,1.6,1.7

[Olin Shivers <olin-shivers@users.sourceforge.net>]

Update of /cvsroot/scsh/scsh/scsh
In directory usw-pr-cvs1:/tmp/cvs-serv23862

Modified Files:
        glob.scm 
Log Message:
Fixed a bug in the construction of the regexp for [...] backet globs.
Reported by Harvey Stein.
    -Olin

Index: glob.scm
===================================================================
RCS file: /cvsroot/scsh/scsh/scsh/glob.scm,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -r1.6 -r1.7
*** glob.scm    2001/03/11 18:52:58     1.6
--- glob.scm    2001/05/23 22:32:51     1.7
***************
*** 123,130 ****
                             i))
                                
!                 ((#\[) (receive (cset i) (parse-glob-bracket pat i)
                           (lp '()
!                              (cons (re-char-set cset)
!                                    (str-cons chars res))
                               i)))
  
--- 123,129 ----
                             i))
                                
!                 ((#\[) (receive (re i) (parse-glob-bracket pat i)
                           (lp '()
!                              (cons re (str-cons chars res))
                               i)))