Commits

Stephen Weeks committed 4c9e998

reformatted prompts

Comments (0)

Files changed (1)

     (if (or (not (Omake.Model.has id))
             (Emacs.y-or-n-p
              (format
-              "Project %s is currently building.  Changes to variables will only take effect after restarting OMake.  Proceed? "
-              ids)))
+              "\
+Currently building:
+  %s
+Changes to variables will only take effect after restarting OMake.  Proceed? "
+              (Omake.model-compilation-dir (Omake.Model.get id)))))
         (let ((var (completing-read "Var: " Omake.Env.vars nil t))
               (value (completing-read "Value: " '("true" "false") nil t)))
           (Omake.Server.setenv id var value)))))
     (catch 'exit
       (when (Omake.Model.has id)
         (let ((kill (Emacs.y-or-n-p
-                     (format "OMake is already building %s in this project.  Do you want to kill OMake and restart it building %s? "
+                     (format "\
+OMake is already building:
+  %s
+This would kill OMake and restart it on:
+  %s
+Proceed? "
                              (Omake.model-compilation-dir (Omake.Model.get id))
                              path
                              ))))