           "focus" focus)
         (if (and plid-loaded? (not load-corresponding?))
           (do
-            (status-msg "display-plan" plid)
+            ;; (status-msg "display-plan" plid)
             (st/app-set :app/title (name plid))
             (st/tooltips tooltips?)
             (st/show-plan plid)

            (chain dtimeout #(load-plan plan-id opts)))
          :else
          (do
            (status-msg "loading" plan-id)
            (st/loading true)
            (st/app-set :app/loading d)
            (request-plan-part plan-id have-parts)
            dtimeout

                (on-realized (new-plan (normalize-plan plan-id plan))
                  #(do
                     (success! d %)
                     ;; (status-msg "loaded" plan-id)
                     (st/app-set :app/loading nil)
                     (apply-network-updates true))
                  #(do
