From: Kevin Rodgers <ihs_4664@yahoo.com>
Subject: Re: buffer-local add-log-mailing-address (was: change-log-mode)
Date: Tue, 12 Oct 2004 15:56:13 -0600 [thread overview]
Message-ID: <416C52FD.5030304@yahoo.com> (raw)
In-Reply-To: m3u0szkb31.fsf_-_@jochen-kuepper.de
Jochen K?pper wrote:
> On Tue, 12 Oct 2004 14:07:13 +0200 Johan Bockg?rd wrote:
> Johan> `add-log-mailing-address'
>
> Thanks for the hint. However, that variable shows the same behavior.
>
> Now I found out that the same issue was brought up before:
> ,----
> | http://lists.gnu.org/archive/html/bug-gnu-emacs/2003-04/msg00072.html
> `----
> I could not find a solution using google, and apparently add-log from
> GNU Emacs 21.3.1 still shows the same problem. Any takers?
Is it as easy as setting add-log-mailing-address (and -full-name, while
we're at it) after visiting the ChangeLog file (instead of before)?
*** emacs-21.3/lisp/add-log.el~ Tue Oct 12 15:49:37 2004
--- emacs-21.3/lisp/add-log.el Tue Oct 12 15:47:48 2004
***************
*** 416,434 ****
non-nil, otherwise in local time."
(interactive (list current-prefix-arg
(prompt-for-change-log-name)))
- (or add-log-full-name
- (setq add-log-full-name (user-full-name)))
- (or add-log-mailing-address
- (setq add-log-mailing-address user-mail-address))
- (if whoami
- (progn
- (setq add-log-full-name (read-input "Full name: " add-log-full-name))
- ;; Note that some sites have room and phone number fields in
- ;; full name which look silly when inserted. Rather than do
- ;; anything about that here, let user give prefix argument so that
- ;; s/he can edit the full name field in prompter if s/he wants.
- (setq add-log-mailing-address
- (read-input "Mailing address: " add-log-mailing-address))))
(let* ((defun (add-log-current-defun))
(version (and change-log-version-info-enabled
--- 416,421 ----
***************
*** 449,454 ****
--- 436,454 ----
(find-file file-name))
(or (eq major-mode 'change-log-mode)
(change-log-mode))
+ (or add-log-full-name
+ (setq add-log-full-name (user-full-name)))
+ (or add-log-mailing-address
+ (setq add-log-mailing-address user-mail-address))
+ (if whoami
+ (progn
+ (setq add-log-full-name (read-input "Full name: " add-log-full-name))
+ ;; Note that some sites have room and phone number fields in
+ ;; full name which look silly when inserted. Rather than do
+ ;; anything about that here, let user give prefix argument so that
+ ;; s/he can edit the full name field in prompter if s/he wants.
+ (setq add-log-mailing-address
+ (read-input "Mailing address: " add-log-mailing-address))))
(undo-boundary)
(goto-char (point-min))
(let ((new-entry (concat (funcall add-log-time-format)
next prev parent reply other threads:[~2004-10-12 21:56 UTC|newest]
Thread overview: 3+ messages / expand[flat|nested] mbox.gz Atom feed top
[not found] <m3is9in72a.fsf@jochen-kuepper.de>
[not found] ` <yoijmzys5edq.fsf@frealaf.dd.chalmers.se>
2004-10-12 19:09 ` buffer-local add-log-mailing-address (was: change-log-mode) Jochen Küpper
2004-10-12 21:56 ` Kevin Rodgers [this message]
2004-10-17 16:08 ` Richard Stallman
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.gnu.org/software/emacs/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=416C52FD.5030304@yahoo.com \
--to=ihs_4664@yahoo.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).