procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* mail/emacsbug.el (report-emacs-bug): Catch error that x-server-vendor

Browse source 
and x-server-version may throw.
This commit is contained in:
Jan Djärv 2004-11-23 19:22:43 +00:00
parent 5f11b513c8
commit 6f8a274229
2 changed files with 9 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2004-11-23 Jan Dj,Ad(Brv <jan.h.d@swipnet.se>
* mail/emacsbug.el (report-emacs-bug): Catch error that x-server-vendor
and x-server-version may throw.
2004-11-23 Kim F. Storm <storm@cua.dk>
* subr.el (substitute-key-definition-key): Optimize. Don't

6
lisp/mail/emacsbug.el
View file

@ -129,8 +129,10 @@ usually do not have translators to read other languages for them.\n\n")
(insert "In " (emacs-version) "\n")
(if (fboundp 'x-server-vendor)
(insert "Distributor `" (x-server-vendor) "', version "
(mapconcat 'number-to-string (x-server-version) ".") "\n"))
(condition-case nil
(insert "Distributor `" (x-server-vendor) "', version "
(mapconcat 'number-to-string (x-server-version) ".") "\n")
(error t)))
(if (and system-configuration-options
(not (equal system-configuration-options "")))
(insert "configured using `configure "