[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/gnus/message.el
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/gnus/message.el |
Date: |
Thu, 29 Sep 2005 23:03:59 -0400 |
Index: emacs/lisp/gnus/message.el
diff -c emacs/lisp/gnus/message.el:1.89 emacs/lisp/gnus/message.el:1.90
*** emacs/lisp/gnus/message.el:1.89 Wed Sep 28 05:26:01 2005
--- emacs/lisp/gnus/message.el Fri Sep 30 03:03:51 2005
***************
*** 1454,1461 ****
(file-error))
(mm-coding-system-p 'utf-8)
(executable-find idna-program)
! 'ask)
! "Whether to encode non-ASCII in domain names into ASCII according to IDNA."
:version "22.1"
:group 'message-headers
:link '(custom-manual "(message)IDNA")
--- 1454,1466 ----
(file-error))
(mm-coding-system-p 'utf-8)
(executable-find idna-program)
! (string= (idna-to-ascii "räksmörgås")
! "xn--rksmrgs-5wao1o")
! t)
! "Whether to encode non-ASCII in domain names into ASCII according to IDNA.
! GNU Libidn, and in particular the elisp package \"idna.el\" and
! the external program \"idn\", must be installed for this
! functionality to work."
:version "22.1"
:group 'message-headers
:link '(custom-manual "(message)IDNA")
***************
*** 1807,1813 ****
;;; Suggested by Jonas Steverud @ www.dtek.chalmers.se/~d4jonas/
- ;;;###autoload
(defun message-change-subject (new-subject)
"Ask for NEW-SUBJECT header, append (was: <Old Subject>)."
;;
<URL:http://www.landfield.com/usefor/drafts/draft-ietf-usefor-useage--1.02.unpaged>
--- 1812,1817 ----
***************
*** 1839,1845 ****
" (was: "
old-subject ")\n")))))))))
- ;;;###autoload
(defun message-mark-inserted-region (beg end)
"Mark some region in the current article with enclosing tags.
See `message-mark-insert-begin' and `message-mark-insert-end'."
--- 1843,1848 ----
***************
*** 1851,1857 ****
(goto-char beg)
(insert message-mark-insert-begin)))
- ;;;###autoload
(defun message-mark-insert-file (file)
"Insert FILE at point, marking it with enclosing tags.
See `message-mark-insert-begin' and `message-mark-insert-end'."
--- 1854,1859 ----
***************
*** 1864,1870 ****
(goto-char p)
(insert message-mark-insert-begin)))
- ;;;###autoload
(defun message-add-archive-header ()
"Insert \"X-No-Archive: Yes\" in the header and a note in the body.
The note can be customized using `message-archive-note'. When called with a
--- 1866,1871 ----
***************
*** 1884,1890 ****
(message-add-header message-archive-header)
(message-sort-headers)))
- ;;;###autoload
(defun message-cross-post-followup-to-header (target-group)
"Mangles FollowUp-To and Newsgroups header to point to TARGET-GROUP.
With prefix-argument just set Follow-Up, don't cross-post."
--- 1885,1890 ----
***************
*** 1928,1934 ****
(insert (concat "\nFollowup-To: " target-group)))
(setq message-cross-post-old-target target-group))
- ;;;###autoload
(defun message-cross-post-insert-note (target-group cross-post in-old
old-groups)
"Insert a in message body note about a set Followup or Crosspost.
--- 1928,1933 ----
***************
*** 1961,1967 ****
(insert (concat message-followup-to-note target-group "\n"))
(insert (concat message-cross-post-note target-group "\n")))))
- ;;;###autoload
(defun message-cross-post-followup-to (target-group)
"Crossposts message and set Followup-To to TARGET-GROUP.
With prefix-argument just set Follow-Up, don't cross-post."
--- 1960,1965 ----
***************
*** 2003,2009 ****
;;; Reduce To: to Cc: or Bcc: header
- ;;;###autoload
(defun message-reduce-to-to-cc ()
"Replace contents of To: header with contents of Cc: or Bcc: header."
(interactive)
--- 2001,2006 ----