From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: michael.cadilhac@lrde.org (=?iso-8859-1?Q?Micha=EBl?= Cadilhac) Newsgroups: gmane.emacs.devel Subject: Re: [Proposal] Retrieve MAILADDRESS as user-mail-address default value. Date: Thu, 20 Jul 2006 18:58:56 +0200 Organization: Epita/LRDE Message-ID: <87r70gjjqn.fsf@lrde.org> References: <8764htizd5.fsf@lrde.org> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="===============0393343032==" X-Trace: sea.gmane.org 1153414826 4782 80.91.229.2 (20 Jul 2006 17:00:26 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Thu, 20 Jul 2006 17:00:26 +0000 (UTC) Cc: emacs-devel@gnu.org Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Thu Jul 20 19:00:18 2006 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1G3bsF-0002Wj-Gm for ged-emacs-devel@m.gmane.org; Thu, 20 Jul 2006 18:59:43 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1G3bsE-0005F8-W1 for ged-emacs-devel@m.gmane.org; Thu, 20 Jul 2006 12:59:43 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1G3brn-00055a-04 for emacs-devel@gnu.org; Thu, 20 Jul 2006 12:59:15 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1G3brf-00052e-0u for emacs-devel@gnu.org; Thu, 20 Jul 2006 12:59:14 -0400 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1G3bre-00052W-G0 for emacs-devel@gnu.org; Thu, 20 Jul 2006 12:59:06 -0400 Original-Received: from [62.39.139.2] (helo=kualalumpur.lrde.epita.fr) by monty-python.gnu.org with esmtps (TLS-1.0:RSA_AES_256_CBC_SHA:32) (Exim 4.52) id 1G3brp-0005fh-5z; Thu, 20 Jul 2006 12:59:17 -0400 Original-Received: from mahaena.lrde.epita.fr ([192.168.101.66] helo=mahaena.lrde) by kualalumpur.lrde.epita.fr with esmtp (Exim 4.50) id 1G3brX-0006gw-4h; Thu, 20 Jul 2006 18:58:59 +0200 Original-To: rms@gnu.org Face: iVBORw0KGgoAAAANSUhEUgAAADAAAAAwBAMAAAClLOS0AAAAElBMVEU/JREXDATg1LV8UCao i1fQpmoP3Nd6AAACa0lEQVQ4jWWUQW7jMAxFqZEPICJzAjXeM6W8dyNqX9ji/a8yn04xnWIEJLD9 LJH85DcJFyJV3erqPty8ExHfBikXSdn0WVezC0hOAQiA2nCsAHOqEnPe4k+puU8zw/t+xquqjRKA 4lHsmQBT8C5pDtBwfwH8VdcHI5+FHtjRxrQRwZsf3hNjZRKAPEzHEdH9mFNSYb5dQK3r8KM6ftNy KikAirDZFWdVkDqbxjGFbAcwbQCxxc8mPRHUGOcCIMgMACV23RfJTch3gC6ofT3qCdG0NyUUPfYF yQrKCIAnuYsgX2qPzW2i9sNrfSOSPPZQiygtCNlCjlpXJV38lIKshF/AZzsAMoArdCKNHfXukPuJ ImbLh+9J2gXwap0QpZ7NjZ7ekdkFcDiqPiLGcHmuvaG/AHgy62s52Lae1ABoA7D6d2kDoAvgbnyD ZutEd6lTHOXfYPHVJDH1K8a1+oyrjoZpAGn1x5pfwPr2E9yjxSpk50/gEyKgD/+BD/KzN3tQ13b8 Cx5loF0AgnZf5IUny9hRHQOYBllHDM+6s3oviZBu77mFjDm621Np3hkjR90wE1BkTYvhdDgDgCmR xWChFfcYAOqMm5NZkVWMur8AL5+oeMQOob2FmY76FiM+PrDDZypwGdqokSlAaQOmGH6mW8KpsOwl 0YOLedjSITr6scNRF8D4PesH33QmLrx8AzjpV/3kkg025w2gfAFYKCLluJAc4Ap+h18oo4S8wzaY klDsBUTiY8EZFkg5Iass75FubC9wd8qa0u9+gRxAsAKEaRAo6iB+vwCMGmdBjvgidQGA1ntMX4CS ZYGV/wADyL80LIX/UAAAAABJRU5ErkJggg== In-Reply-To: (Richard Stallman's message of "Thu, 20 Jul 2006 11:33:26 -0400") User-Agent: Gnus/5.110006 (No Gnus v0.6) Emacs/22.0.50 (gnu/linux) X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:57383 Archived-At: --===============0393343032== Content-Type: multipart/signed; boundary="==-=-="; micalg=pgp-sha1; protocol="application/pgp-signature" --==-=-= Content-Type: multipart/mixed; boundary="=-=-=" --=-=-= Richard Stallman writes: > Is the envvar MAILADDRESS customarily used by other mailers? EMAIL is. At least in, for instance, Mutt, debian's reportbug binary, darcs, yafc, ... If you prefer this envvar, please consider the following modified patches. --=-=-= Content-Type: text/x-patch; charset=iso-8859-1 Content-Disposition: attachment; filename=startup.patch Content-Transfer-Encoding: quoted-printable Index: lisp/ChangeLog =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D RCS file: /sources/emacs/emacs/lisp/ChangeLog,v retrieving revision 1.9820 diff -c -0 -r1.9820 ChangeLog *** lisp/ChangeLog 17 Jul 2006 04:07:48 -0000 1.9820 =2D-- lisp/ChangeLog 19 Jul 2006 11:21:17 -0000 *************** *** 0 **** =2D-- 1,6 ---- + 2006-07-19 Micha=EBl Cadilhac +=20 + * startup.el (user-mail-address): Initialize with `EMAIL' + environment variable first. Document it. + (command-line): Ditto. +=20 Index: lisp/startup.el =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D RCS file: /sources/emacs/emacs/lisp/startup.el,v retrieving revision 1.409 diff -c -r1.409 startup.el *** lisp/startup.el 24 May 2006 13:22:12 -0000 1.409 =2D-- lisp/startup.el 19 Jul 2006 11:44:05 -0000 *************** *** 247,260 **** :group 'mail) =20=20 (defcustom user-mail-address (if command-line-processed ! (concat (user-login-name) "@" ! (or mail-host-address ! (system-name))) ;; Empty string means "not set yet". "") "*Full mailing address of this user. ! This is initialized based on `mail-host-address', ! after your init file is read, in case it sets `mail-host-address'." :type 'string :group 'mail) =20=20 =2D-- 247,262 ---- :group 'mail) =20=20 (defcustom user-mail-address (if command-line-processed ! (or (getenv "EMAIL") ! (concat (user-login-name) "@" ! (or mail-host-address ! (system-name)))) ;; Empty string means "not set yet". "") "*Full mailing address of this user. ! This is initialized with environment variable `EMAIL' or, as a ! fallback, using `mail-host-address'. This is done after your ! init file is read, in case it sets `mail-host-address'." :type 'string :group 'mail) =20=20 *************** *** 977,985 **** =20=20 ;; Do this here in case the init file sets mail-host-address. (if (equal user-mail-address "") ! (setq user-mail-address (concat (user-login-name) "@" ! (or mail-host-address ! (system-name))))) =20=20 ;; Originally face attributes were specified via ;; `font-lock-face-attributes'. Users then changed the default =2D-- 979,988 ---- =20=20 ;; Do this here in case the init file sets mail-host-address. (if (equal user-mail-address "") ! (setq user-mail-address (or (getenv "EMAIL") ! (concat (user-login-name) "@" ! (or mail-host-address ! (system-name)))))) =20=20 ;; Originally face attributes were specified via ;; `font-lock-face-attributes'. Users then changed the default --=-=-= Content-Type: text/x-patch; charset=iso-8859-1 Content-Disposition: attachment; filename=NEWS.patch Content-Transfer-Encoding: quoted-printable Index: etc/ChangeLog =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D RCS file: /sources/emacs/emacs/etc/ChangeLog,v retrieving revision 1.430 diff -c -r1.430 ChangeLog *** etc/ChangeLog 14 Jul 2006 15:04:08 -0000 1.430 =2D-- etc/ChangeLog 19 Jul 2006 11:42:59 -0000 *************** *** 1,3 **** =2D-- 1,7 ---- + 2006-07-19 Micha=EBl Cadilhac +=20 + * NEWS: Document `user-mail-address' initialization. +=20 2006-07-14 Kim F. Storm =20=20 * PROBLEMS: Emacs now requires ws2_32.dll on Windows. Index: etc/NEWS =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D RCS file: /sources/emacs/emacs/etc/NEWS,v retrieving revision 1.1376 diff -c -r1.1376 NEWS *** etc/NEWS 14 Jul 2006 23:29:43 -0000 1.1376 =2D-- etc/NEWS 19 Jul 2006 11:42:59 -0000 *************** *** 238,243 **** =2D-- 238,248 ---- modified buffers, it saves the abbrevs too if they have changed. It can do this either silently or asking for confirmation first, according to the value of `save-abbrevs'. +=20 + +++ + ** Initialize `user-mail-address' with env variable `EMAIL' first. + The variable `user-mail-address' is initialized with the environment + variable `EMAIL' before defaulting it to `user-login-name'@host. * Incompatible Editing Changes in Emacs 22.1 =20=20 --=-=-= Content-Type: text/plain; charset=iso-8859-1 Content-Transfer-Encoding: quoted-printable TIA ! =2D-=20 | Micha=EBl `Micha' Cadilhac | Would someone please DTRT with this= , | | Epita/LRDE Promo 2007 | then ACK? = | | http://www.lrde.org/~cadilh_m | -- Richard Stallman = | `-- - JID: micha@amessage.be --' - -= -' --=-=-=-- --==-=-= Content-Type: application/pgp-signature -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.2 (GNU/Linux) iD8DBQFEv7ZSZYNf4qobZ7kRAgaKAJ90QlM3N/w+d3oWat6Itmil/0BBjACgxvLe MQgalvXhOckENBIQ9Szo4PY= =EUio -----END PGP SIGNATURE----- --==-=-=-- --===============0393343032== Content-Type: text/plain; charset="us-ascii" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Content-Disposition: inline _______________________________________________ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel --===============0393343032==--