Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Include zero-width-space in string-normalize.

Closes PR 12683.
  • Loading branch information...
commit 9ed78f275240694e4c1c9b876be70993e0b7c84e 1 parent f1b4c86
@dyoo authored
View
3  collects/framework/private/text.rkt
@@ -922,7 +922,8 @@
normalize?))]
[else
(preferences:get 'framework:do-paste-normalization)]))
- (define/public (string-normalize s) (string-normalize-nfkc s))
+ (define/public (string-normalize s)
+ (regexp-replace* #rx"\u200b" (string-normalize-nfkc s) ""))
(define/override (do-paste start time)
(dynamic-wind
View
5 collects/scribblings/framework/text.scrbl
@@ -383,7 +383,10 @@
}
@defmethod[(string-normalize [s string?]) string?]{
- Normalizes @racket[s]. Defaults to @racket[string-normalize-nfkc].
+ Normalizes @racket[s]. Defaults to:
+ @racketblock[(regexp-replace* #rx"\u200b"
+ (string-normalize-nfkc s)
+ "")]
}
}
Please sign in to comment.
Something went wrong with that request. Please try again.