(report-emacs-bug): Don't hard code the "X" name.
This commit is contained in:
parent
520e9259c7
commit
951c155f39
2 changed files with 8 additions and 2 deletions
|
|
@ -1,3 +1,7 @@
|
|||
2007-03-11 Stefan Monnier <monnier@iro.umontreal.ca>
|
||||
|
||||
* mail/emacsbug.el (report-emacs-bug): Don't hard code the "X" name.
|
||||
|
||||
2007-03-10 Chong Yidong <cyd@stupidchicken.com>
|
||||
|
||||
* faces.el (face-set-after-frame-default): Recalculate face
|
||||
|
|
|
|||
|
|
@ -139,7 +139,9 @@ usually do not have translators to read other languages for them.\n\n")
|
|||
(insert "\n\nIn " (emacs-version) "\n")
|
||||
(if (fboundp 'x-server-vendor)
|
||||
(condition-case nil
|
||||
(insert "X server distributor `" (x-server-vendor) "', version "
|
||||
;; This is used not only for X11 but also W32 and others.
|
||||
(insert "Windowing system distributor `" (x-server-vendor)
|
||||
"', version "
|
||||
(mapconcat 'number-to-string (x-server-version) ".") "\n")
|
||||
(error t)))
|
||||
(if (and system-configuration-options
|
||||
|
|
@ -281,5 +283,5 @@ and send the mail again using \\[mail-send-and-exit].")))
|
|||
|
||||
(provide 'emacsbug)
|
||||
|
||||
;;; arch-tag: 248b6523-c3b5-4fec-9a3f-0411fafa7d49
|
||||
;; arch-tag: 248b6523-c3b5-4fec-9a3f-0411fafa7d49
|
||||
;;; emacsbug.el ends here
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue