diff options
| author | Po Lu <luangruo@yahoo.com> | 2023-08-09 12:21:03 +0800 |
|---|---|---|
| committer | Po Lu <luangruo@yahoo.com> | 2023-08-09 12:22:12 +0800 |
| commit | 82a67d227e52c70f438ced4b5ee260bb7d8be02d (patch) | |
| tree | 88a88b19efe6ecf8dd6c2be1f2edf2feb68aa5d9 /lisp/mail/emacsbug.el | |
| parent | dbca2e797abeaedb54a85c22ca004cc041ffec4d (diff) | |
| download | emacs-82a67d227e52c70f438ced4b5ee260bb7d8be02d.tar.gz emacs-82a67d227e52c70f438ced4b5ee260bb7d8be02d.tar.bz2 emacs-82a67d227e52c70f438ced4b5ee260bb7d8be02d.zip | |
Improve Emacsbug output
* lisp/mail/emacsbug.el (report-emacs-bug--os-description):
Handle `android'.
(emacs-build-description): Don't print the Android build
fingerprint here.
Diffstat (limited to 'lisp/mail/emacsbug.el')
| -rw-r--r-- | lisp/mail/emacsbug.el | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/lisp/mail/emacsbug.el b/lisp/mail/emacsbug.el index 3893e93238f..bebaad720db 100644 --- a/lisp/mail/emacsbug.el +++ b/lisp/mail/emacsbug.el @@ -144,6 +144,10 @@ This requires either the macOS \"open\" command, or the freedesktop (goto-char (point-min)) (buffer-substring (line-beginning-position) (line-end-position)))))) + ((eq system-type 'android) + ;; This is a short string containing the Android version, + ;; build number, and window system distributor. + (symbol-value 'android-build-fingerprint)) ;; TODO Cygwin, Solaris (usg-unix-v). (t (or (let ((file "/etc/os-release")) @@ -408,12 +412,6 @@ copy text to your preferred mail program.\n" "', version " (mapconcat #'number-to-string (x-server-version) ".") "\n") (error t))) - (when (and (boundp 'android-build-fingerprint) - (symbol-value 'android-build-fingerprint)) - ;; This is used on Android. - (insert "Android version and manufacturer: " - (symbol-value 'android-build-fingerprint) - "\n")) (let ((os (ignore-errors (report-emacs-bug--os-description)))) (if (stringp os) (insert "System Description: " os "\n\n"))) |