From a2dfe1ba46e818d132e6f94b2e443d475edb13fb Mon Sep 17 00:00:00 2001 From: John Clements Date: Tue, 23 Apr 2013 10:23:43 -0700 Subject: [PATCH] added stepper-complete string constant --- collects/stepper/private/mred-extensions.rkt | 3 ++- collects/string-constants/private/english-string-constants.rkt | 1 + 2 files changed, 3 insertions(+), 1 deletion(-) diff --git a/collects/stepper/private/mred-extensions.rkt b/collects/stepper/private/mred-extensions.rkt index c3e7598de8..7a4889aec5 100644 --- a/collects/stepper/private/mred-extensions.rkt +++ b/collects/stepper/private/mred-extensions.rkt @@ -5,6 +5,7 @@ racket/pretty "syntax-property.rkt" images/compile-time + string-constants (for-syntax images/icons/control images/icons/style)) (provide @@ -419,7 +420,7 @@ (super-instantiate ()) (inherit insert lock) - (insert "All of the definitions have been successfully evaluated.") + (insert (string-constant stepper-complete)) (lock #t)) ())) diff --git a/collects/string-constants/private/english-string-constants.rkt b/collects/string-constants/private/english-string-constants.rkt index 50af0d3130..fdf6d8b8f7 100644 --- a/collects/string-constants/private/english-string-constants.rkt +++ b/collects/string-constants/private/english-string-constants.rkt @@ -1463,6 +1463,7 @@ please adhere to these guidelines: (stepper-no-earlier-application-step "No earlier application steps.") (stepper-no-later-application-step "No more application steps.") + (stepper-complete "All of the definitions have been successfully evaluated.") (stepper-no-earlier-step "No earlier steps.") (stepper-no-later-step "No more steps.")