From 7941f6e8e18b48ce5ff822bd8a5d2af3540ca733 Mon Sep 17 00:00:00 2001
From: Dmitry Gutov <dgutov@yandex.ru>
Date: Sun, 1 Mar 2015 17:13:35 +0200
Subject: [PATCH] company-diag: Include Emacs and Company versions

---
 company.el | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/company.el b/company.el
index a95f7f32e..0652fc3bf 100644
--- a/company.el
+++ b/company.el
@@ -2154,6 +2154,11 @@ If SHOW-VERSION is non-nil, show the version in the echo area."
     (pop-to-buffer (get-buffer-create "*company-diag*"))
     (setq buffer-read-only nil)
     (erase-buffer)
+    (insert (format "Emacs %s (%s) of %s on %s"
+                    emacs-version system-configuration
+                    (format-time-string "%Y-%m-%d" emacs-build-time)
+                    emacs-build-system))
+    (insert "\nCompany " (company-version) "\n\n")
     (insert "company-backends: " (pp-to-string bb))
     (insert "\n")
     (insert "Used backend: " (pp-to-string backend))
-- 
2.39.2