X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/b20726c7b64dafdd10bd3ba44750e9acaad12b6f..9f67f1ee4e2ee2a384a5effffbbb661e8cd9c261:/company.el

diff --git a/company.el b/company.el
index 750850b0f..b40918c96 100644
--- a/company.el
+++ b/company.el
@@ -2148,8 +2148,8 @@ If SHOW-VERSION is non-nil, show the version in the echo area."
       (lm-version))))
 
 (defun company-diag ()
-  (interactive)
   "Pop a buffer with information about completions at point."
+  (interactive)
   (let* ((bb company-backends)
          backend
          (prefix (cl-loop for b in bb