Index: nregex.lisp
===================================================================
RCS file: /project/slime/cvsroot/slime/nregex.lisp,v
retrieving revision 1.1
diff -c -r1.1 nregex.lisp
*** nregex.lisp	21 Apr 2004 18:55:24 -0000	1.1
--- nregex.lisp	26 Apr 2004 12:15:06 -0000
***************
*** 256,262 ****
  	   ;;
  	   ;; If this is the last character of the expression then
  	   ;; anchor the end of the expression, otherwise let it slide
! u	   ;; as a standard character (even though it should be quoted).
  	   ;;
  	   (if (= eindex (1- (length source)))
  	       (add-exp '((if (not (= index length))
--- 256,262 ----
  	   ;;
  	   ;; If this is the last character of the expression then
  	   ;; anchor the end of the expression, otherwise let it slide
!  	   ;; as a standard character (even though it should be quoted).
  	   ;;
  	   (if (= eindex (1- (length source)))
  	       (add-exp '((if (not (= index length))
