[Emacs-diffs] Changes to emacs/lisp/gnus/message.el

[Miles Bader]

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 ----