diff options
author | Erik Martin-Dorel <erik@martin-dorel.org> | 2018-08-23 01:37:33 +0200 |
---|---|---|
committer | GitHub <noreply@github.com> | 2018-08-23 01:37:33 +0200 |
commit | 733cd24a7368ee186884da488da0f59bbedb627e (patch) | |
tree | e2a6832c08a6f058f423879c40c02fd924082af3 /doc/docstring-magic.el | |
parent | 26b3bf9f070e9aee45c6e3d19bca475d4ae8ed37 (diff) | |
parent | 7986697e7999e1d24356d459d64e7be5ee4c8da0 (diff) |
Merge pull request #380 from ProofGeneral/prepare-melpa
Prepare PG for MELPA
Diffstat (limited to 'doc/docstring-magic.el')
-rw-r--r-- | doc/docstring-magic.el | 15 |
1 files changed, 9 insertions, 6 deletions
diff --git a/doc/docstring-magic.el b/doc/docstring-magic.el index 614b56e2..409fd22a 100644 --- a/doc/docstring-magic.el +++ b/doc/docstring-magic.el @@ -36,15 +36,15 @@ (let ((assistants (mapcar (function car) proof-assistant-table))) ; assume not customized (while assistants - (let* + (let* ((assistant (car assistants)) ; compiler bogus warning here - (nameregexp - (or - (cdr-safe + (nameregexp + (or + (cdr-safe (assoc assistant proof-assistant-table)) - (error "proof-site: symbol " (symbol-name assistant) - "is not in proof-assistant-table"))) + (error "Symbol %s is not in proof-assistant-table (in docstring-magic)" + (symbol-name assistant)))) (assistant-name (car nameregexp)) (sname (symbol-name assistant)) (elisp-file sname)) @@ -85,3 +85,6 @@ (setq func-menu 'markup-hack) (load "texi-docstring-magic.el") + +(provide 'docstring-magic) +;;; docstring-magic.el ends here |