diff --git a/gui-lib/framework/private/racket.rkt b/gui-lib/framework/private/racket.rkt
index b76eaad6..6d55ff5c 100644
--- a/gui-lib/framework/private/racket.rkt
+++ b/gui-lib/framework/private/racket.rkt
@@ -708,7 +708,8 @@
                     (- id-end contains)
                     0))
               (cond
-                [(first-sexp-is-keyword? contains)
+                [(or (first-sexp-is-keyword? contains)
+                     (sexp-is-all-hyphens? contains))
                  (visual-offset contains)]
                 [(second-sexp-is-ellipsis? contains)
                  (visual-offset contains)]
diff --git a/gui-test/framework/tests/racket.rkt b/gui-test/framework/tests/racket.rkt
index 1081a521..3969355a 100644
--- a/gui-test/framework/tests/racket.rkt
+++ b/gui-test/framework/tests/racket.rkt
@@ -177,6 +177,8 @@
                   "(#:x 0\n 1)")
 (test-indentation "(a b c d\n---)"
                   "(a b c d\n ---)")
+(test-indentation "[---- \"β\"\na"
+                  "[---- \"β\"\n a")
 
 
 (define (test-magic-square-bracket which before after)