>>>> "APA" == Adrian Aichner
<adrian(a)xemacs.org> writes:
APA> What's wrong with r-e-b to include runtime version as follows:
(if (eq system-type 'windows-nt)
(shell-command-to-string "ver")
(if
(file-exists-p "/etc/osversion") ; SONY NEWS-OS
(shell-command-to-string "cat /etc/osversion")
(shell-command-to-string "uname -a")))
That looks good to me. Maybe we should wrap it in a condition-case,
say
(condition-case nil
(if (eq system-type 'windows-nt)
(shell-command-to-string "ver")
(if (file-exists-p "/etc/osversion") ; SONY NEWS-OS
(shell-command-to-string "cat /etc/osversion")
(shell-command-to-string "uname -a")))
(error
"Couldn't get runtime system information!
Please include hardware, OS, and version information in your report.
Also, information about how to generate such information would be
greatly appreciated."))
--
Institute of Policy and Planning Sciences
http://turnbull.sk.tsukuba.ac.jp
University of Tsukuba Tennodai 1-1-1 Tsukuba 305-8573 JAPAN
My nostalgia for Icon makes me forget about any of the bad things. I don't
have much nostalgia for Perl, so its faults I remember. Scott Gilbert c.l.py