/[emacs]/emacs/lisp/gnus/gnus-msg.el
ViewVC logotype

Diff of /emacs/lisp/gnus/gnus-msg.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.16.4.6 by miles, Mon Oct 25 04:19:42 2004 UTC revision 1.16.4.7 by miles, Thu Nov 4 13:12:16 2004 UTC
# Line 281  If nil, Gnus will never ask for confirma Line 281  If nil, Gnus will never ask for confirma
281    "If non-nil, Gnus tries to suggest a default address to resend to.    "If non-nil, Gnus tries to suggest a default address to resend to.
282  If nil, the address field will always be empty after invoking  If nil, the address field will always be empty after invoking
283  `gnus-summary-resend-message'."  `gnus-summary-resend-message'."
284      :version "21.4"
285    :group 'gnus-message    :group 'gnus-message
286    :type 'boolean)    :type 'boolean)
287    
# Line 1871  this is a reply." Line 1872  this is a reply."
1872                (setq v (with-temp-buffer                (setq v (with-temp-buffer
1873                          (insert-file-contents v)                          (insert-file-contents v)
1874                          (goto-char (point-max))                          (goto-char (point-max))
1875                          (while (bolp)                          (skip-chars-backward "\n")
1876                            (delete-char -1))                          (delete-region (+ (point) (if (bolp) 0 1))
1877                                           (point-max))
1878                          (buffer-string))))                          (buffer-string))))
1879              (setq results (delq (assoc element results) results))              (setq results (delq (assoc element results) results))
1880              (push (cons element v) results))))              (push (cons element v) results))))

Legend:
Removed from v.1.16.4.6  
changed lines
  Added in v.1.16.4.7

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26