From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/49969 Path: main.gmane.org!not-for-mail From: deskpot@myrealbox.com (Vasily Korytov) Newsgroups: gmane.emacs.gnus.general Subject: Re: Changes committed gnus/lisp (ChangeLog gnus-msg.el gnus-sum.el) Date: Sun, 09 Feb 2003 06:07:17 +0300 Sender: owner-ding@hpc.uh.edu Message-ID: <87d6m2ywwq.fsf@unix.home> References: NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: multipart/signed; boundary="==-=-="; micalg=pgp-sha1; protocol="application/pgp-signature" X-Trace: main.gmane.org 1044759884 6364 80.91.224.249 (9 Feb 2003 03:04:44 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Sun, 9 Feb 2003 03:04:44 +0000 (UTC) Return-path: Original-Received: from malifon.math.uh.edu ([129.7.128.13]) by main.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 18hhlq-0001eO-00 for ; Sun, 09 Feb 2003 04:04:42 +0100 Original-Received: from sina.hpc.uh.edu ([129.7.128.10] ident=lists) by malifon.math.uh.edu with esmtp (Exim 3.20 #1) id 18hhms-0007Ha-00; Sat, 08 Feb 2003 21:05:46 -0600 Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Sat, 08 Feb 2003 21:06:43 -0600 (CST) Original-Received: from sclp3.sclp.com (sclp3.sclp.com [66.230.238.2]) by sina.hpc.uh.edu (8.9.3/8.9.3) with SMTP id VAA26178 for ; Sat, 8 Feb 2003 21:06:30 -0600 (CST) Original-Received: (qmail 52179 invoked by alias); 9 Feb 2003 03:05:29 -0000 Original-Received: (qmail 52173 invoked from network); 9 Feb 2003 03:05:28 -0000 Original-Received: from ns1.telekom.ru (root@194.190.195.83) by 66.230.238.6 with SMTP; 9 Feb 2003 03:05:28 -0000 Original-Received: from unix.home (h105.217.elnet.msk.ru [194.190.217.105]) by ns1.telekom.ru (8.12.6/8.12.6) with SMTP id h1935WRn017525 for ; Sun, 9 Feb 2003 06:05:32 +0300 Original-Received: (qmail 1134 invoked from network); 9 Feb 2003 03:08:08 -0000 Original-Received: from localhost (alias@127.0.0.1) by localhost with QMTP; 9 Feb 2003 03:08:08 -0000 Original-Received: (qmail 1108 invoked by uid 1000); 9 Feb 2003 03:07:20 -0000 Original-To: ding@gnus.org X-Attribution: VK Mail-Copies-To: never In-Reply-To: (Lars Magne Ingebrigtsen's message of "Sat, 08 Feb 2003 21:47:03 +0100") User-Agent: Gnus/5.090016 (Oort Gnus v0.16) XEmacs/21.4 (Portable Code, linux) Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:49969 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:49969 --==-=-= Content-Type: multipart/mixed; boundary="=-=-=" --=-=-= Content-Transfer-Encoding: quoted-printable >>>>> "LMI" =3D=3D Lars Magne Ingebrigtsen writes: LMI> Jesper Harder writes: >>> I think software should try to err on the side of not revealing stuff >>> that people possibly don't want to reveal.=20=20 >>=20 >> We could limit it to `system-type' instead of `system-configuration'. LMI> That's a possibility... Will we switch to use gnus-version-expose-system t by default? --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=gnus-msg.el.patch Content-Transfer-Encoding: quoted-printable =2D-- gnus-msg.el~ Fri Feb 7 17:17:17 2003 +++ gnus-msg.el Sun Feb 9 06:04:11 2003 @@ -284,7 +284,7 @@ :type 'boolean) =20 (defcustom gnus-version-expose-system nil =2D "If non-nil, `system-configuration' is exposed in `gnus-extended-versi= on'." + "If non-nil, `system-type' is exposed in `gnus-extended-version'." :group 'gnus-message :type 'boolean) =20 @@ -1034,7 +1034,7 @@ ((string-match "^\\(\\([.0-9]+\\)*\\)\\.[0-9]+$" emacs-version) (concat "Emacs/" (match-string 1 emacs-version) (if gnus-version-expose-system =2D " (" system-configuration ")" + (concat " (" (symbol-name system-type) ")") ""))) ((string-match "\\([A-Z]*[Mm][Aa][Cc][Ss]\\)[^(]*\\(\\((beta.*)\\|'\\)= \\)?" emacs-version) @@ -1044,10 +1044,11 @@ (match-string 3 emacs-version) "") (if (boundp 'xemacs-codename) =2D (if gnus-version-expose-system =2D (concat " (" xemacs-codename ", " system-configuration ")") =2D (concat " (" xemacs-codename ")")) =2D ""))) + (if gnus-version-expose-system + (concat " (" xemacs-codename ", " + (symbol-name system-type) ")") + (concat " (" xemacs-codename ")")) + ""))) (t emacs-version)))) =20 --=-=-= Content-Transfer-Encoding: quoted-printable =2D-=20 I accept RFC3156 and RFC1991-compatible encrypted mail. PGP key fingerprint: 123A 7CCE 6E26 6233 0D87 E01A A0F8 3524 FCD8 1841 --=-=-=-- --==-=-= Content-Type: application/pgp-signature -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.2.1 (GNU/Linux) iD8DBQE+RcXooPg1JPzYGEERAqqdAKDiqklQOzSCQx57uFvIH16zFWW79QCfSENe s6PcxCG0GpbhJS9tWiShvbM= =JkP0 -----END PGP SIGNATURE----- --==-=-=--