[plt-translators] english-string-constants.rkt update

From: Philippe Meunier (meunier at ccs.neu.edu)
Date: Sun Dec 29 10:28:38 EST 2013

commit 5059db47d3cd2b42820c12b6cd493da3913b7536
Author: Robby Findler <robby at racket-lang.org>
Date:   Sat Dec 28 20:48:52 2013 -0600

    adjust the installation package GUI so it doesn't install during
    and installation (ditto update)
    
    closes PR 14263
    
    this may be a release branch candidate. I'm not sure myself, but the PR
    sounds worrying.
    
    If it should be considered, then this is the relevant diff (since more than
    half of the diff is whitespace changes) to the file pkg/gui/main:
    
    @@ -57,6 +57,8 @@
    
       (define terminal #f)
       (define (in-terminal-panel abort-label thunk)
    +    (cond
    +      [(or (not terminal) (send terminal can-close?))
         (send dlg begin-container-sequence)
         (when terminal (send terminal close))
         (define t (in-terminal
    @@ -71,7 +73,10 @@
         (disallow-close)
         (send dlg end-container-sequence)
         (yield (send t can-close-evt))
    -    (allow-close))
    +       (allow-close)]
    +      [else
    +       (message-box (string-constant install-pkg-dialog-title)
    +                    (string-constant install-pkg-not-rentrant))]))
============================================================
diff --git a/pkgs/string-constants-pkgs/string-constants-lib/string-constants/private/english-string-constants.rkt b/pkgs/string-constants-pkgs/string-constants-lib/string-constants/private/english-string-constants.rkt
index 1bb7db9..58ad57a 100644
--- a/pkgs/string-constants-pkgs/string-constants-lib/string-constants/private/english-string-constants.rkt
+++ b/pkgs/string-constants-pkgs/string-constants-lib/string-constants/private/english-string-constants.rkt
@@ -1889,6 +1889,9 @@ please adhere to these guidelines:
   (install-pkg-package-catalogs "Package Catalogs") ; label for a list box
   (install-pkg-add-package-catalog "Add Package Catalog")
 
+  (install-pkg-not-rentrant "Installation and updating cannot happen simultaneously;"
+                            " either abort the current one or wait for it to finish.")
+  
   ;; open a file via a collection path (new "Open" menu item in DrRacket)
   (open-collection-path "Open Collection Path...")
   (enter-subcollection "Enter subcollection") ; button in new dialog


Posted on the translators mailing list.