diff --git a/pkgs/gui-pkgs/gui-doc/scribblings/framework/text.scrbl b/pkgs/gui-pkgs/gui-doc/scribblings/framework/text.scrbl
index 9fdf2a9c..6406a935 100644
--- a/pkgs/gui-pkgs/gui-doc/scribblings/framework/text.scrbl
+++ b/pkgs/gui-pkgs/gui-doc/scribblings/framework/text.scrbl
@@ -427,11 +427,14 @@
 
   @defmethod[(string-normalize [s string?]) string?]{
     Normalizes @racket[s]. Defaults to:
-    @racketblock[(regexp-replace* #rx"\u200b"
-                                  (string-normalize-nfkc s)
-                                  "")]
+    @racketblock[(regexp-replace* 
+                  #rx"\u200b" 
+                  (regexp-replace*
+                   #rx"\u2212" 
+                   (string-normalize-nfkc s)
+                   "-")
+                  "")]
   }
-
 }
 
 @defmixin[text:normalize-paste-mixin (text:basic<%>) (text:normalize-paste<%>)]{
diff --git a/pkgs/gui-pkgs/gui-lib/framework/private/text.rkt b/pkgs/gui-pkgs/gui-lib/framework/private/text.rkt
index b99c9cff..2d10afba 100644
--- a/pkgs/gui-pkgs/gui-lib/framework/private/text.rkt
+++ b/pkgs/gui-pkgs/gui-lib/framework/private/text.rkt
@@ -1029,7 +1029,13 @@
         [else
          (preferences:get 'framework:do-paste-normalization)]))
     (define/public (string-normalize s) 
-      (regexp-replace* #rx"\u200b" (string-normalize-nfkc s) ""))
+      (regexp-replace* 
+       #rx"\u200b" 
+       (regexp-replace*
+        #rx"\u2212" 
+        (string-normalize-nfkc s)
+        "-")
+       ""))
     
     (define/override (do-paste start time)
       (dynamic-wind