diff options
author | Clément Pit--Claudel <clement.pitclaudel@live.com> | 2017-02-26 00:28:18 -0500 |
---|---|---|
committer | Clément Pit--Claudel <clement.pitclaudel@live.com> | 2017-03-08 15:06:17 -0500 |
commit | 70dfbc54d9a6b559dbfcfd6105a7e8c80d78d888 (patch) | |
tree | e68885d95d7281f758d41f5f8a8249a4ddb76509 /isar/isabelle-system.el | |
parent | 6c703907b192bc903ca9897e17424e58e2003692 (diff) |
Fix incorrect assumption that noninteractive == byte-compiling
The PG Makefile does ensure (using --batch) that noninteractive is non-nil while
compiling, but package.el doesn't.
Diffstat (limited to 'isar/isabelle-system.el')
-rw-r--r-- | isar/isabelle-system.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/isar/isabelle-system.el b/isar/isabelle-system.el index 5352043d..64cd768f 100644 --- a/isar/isabelle-system.el +++ b/isar/isabelle-system.el @@ -73,6 +73,7 @@ unverified. Otherwise, returns non-nil if isa-isabelle-command is surely an executable with full path." (interactive "p") (when (and (not noninteractive) + (not (bound-and-true-p byte-compile-current-file)) (not proof-rsh-command) (or force isabelle-not-found @@ -139,7 +140,7 @@ generated with the Lisp form `(isa-tool-list-logics)'." :type (list 'string) :group 'isabelle) -(unless noninteractive +(unless (or noninteractive (bound-and-true-p byte-compile-current-file)) (setq isabelle-logics-available (isa-tool-list-logics))) (defcustom isabelle-chosen-logic nil @@ -287,7 +288,7 @@ for you, you should disable this behaviour." :help (format "Switch to %s logic" l))) isabelle-logics-available))))) -(unless noninteractive +(unless (or noninteractive (bound-and-true-p byte-compile-current-file)) (isabelle-logics-menu-calculate)) (defvar isabelle-time-to-refresh-logics t |