missed some changes related to addition of dont-care values

in the lexers

collects/scribble/private/manual-code.rkt

@@ -1,6 +1,7 @@
 #lang racket/base
 (require syntax/strip-context
          syntax-color/module-lexer
+         syntax-color/lexer-contract
          "../racket.rkt"
          "../base.rkt"
          "manual-scheme.rkt"
@@ -71,7 +72,9 @@
                 (if (eof-object? lexeme)
                     null
                     (cons (list type (sub1 start) (sub1 end) 0)
-                          (loop mode)))))]
+                          (loop (if (dont-stop? mode)
+                                    (dont-stop-val mode)
+                                    mode))))))]
            [e (parameterize ([read-accept-reader #t])
                 ((or expand 
                      (lambda (stx) 

collects/tests/unstable/2d/lexer-test.rkt

@@ -2,6 +2,7 @@
 (require rackunit
          syntax-color/racket-lexer
          syntax-color/scribble-lexer
+         syntax-color/lexer-contract
          unstable/options
          unstable/2d/private/lexer)
 
@@ -28,7 +29,9 @@
     (cons (list val tok paren start end backup)
           (cond
             [(equal? tok 'eof) '()]
-            [else (loop new-mode)]))))
+            [else (loop (if (dont-stop? new-mode)
+                            (dont-stop-val new-mode)
+                            new-mode))]))))
 
 (check-equal?
  (run-lexer "1234\n#2d\n")

doc/release-notes/racket/HISTORY.txt

@@ -6,6 +6,9 @@ slideshow/balloon: added balloon-enable-3d
 slideshow: added interactive
 scribble/manual: added #:id option to defthing
 scribble/srcdoc: added begin-for-doc
+syntax-color: added special support for dont-stop values;
+ this change is backwards incompatible for code that calls
+ lexers and may call unknown lexers
 
 Version 5.3.3.6
 Added "phase-collapse" module inference and instantiation