diff options
| author | Erik Martin-Dorel | 2021-02-25 18:30:40 +0100 |
|---|---|---|
| committer | GitHub | 2021-02-25 18:30:40 +0100 |
| commit | 65da2c3a15df0a5b6f1fb81aa7a0dce8bcdaab1d (patch) | |
| tree | ac5879e94b68e1b926783c93ff60b27039ccb464 /coq | |
| parent | bdb67820696b2bfec06fda72f2a39548c73dcaf7 (diff) | |
| parent | 76fe29c9b121a0010a0f24b5cca5ac706683e3c3 (diff) | |
Merge pull request #552 from hendriktews/issue-551
protect uses of coq-callcoq
Diffstat (limited to 'coq')
| -rw-r--r-- | coq/coq-system.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/coq/coq-system.el b/coq/coq-system.el index c090cecb..01b9b1d5 100644 --- a/coq/coq-system.el +++ b/coq/coq-system.el @@ -140,7 +140,10 @@ Interactively (with INTERACTIVE-P), show that number." (defun coq-autodetect-help (&optional interactive-p) "Record the output of coqotp -help in `coq-autodetected-help'." (interactive '(t)) - (setq coq-autodetected-help (coq-callcoq "-help"))) + (let ((coq-output (coq-callcoq "-help"))) + (if coq-output + (setq coq-autodetected-help coq-output) + (setq coq-autodetected-help "")))) (defun coq--version< (v1 v2) |