only include --force when the checkbox isn't disabled

related to PR 13777
2013-05-25 19:02:39 -05:00 · 2013-05-25 19:02:39 -05:00 · 56cb3d7b66
commit 56cb3d7b66
parent b929b73590
1 changed files with 1 additions and 1 deletions
--- a/collects/pkg/gui/by-source.rkt
+++ b/collects/pkg/gui/by-source.rkt
@ -381,7 +381,7 @@
      (and (not (equal? the-pkg ""))
           (cons (get-current-action)
                 (append
-                  (if (send cb get-value)
+                  (if (and (send cb is-enabled?) (send cb get-value))
                      '(#:force #t)
                      '())
                  (if (selected-type)