🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: gnu.epoch.misc
Article #130

bug in sendmail.el in Emacs 18.58 distribution

#130
From: Stephan Oepen
Date: Fri, 07 Aug 1992 19:15
56 lines
3044 bytes
marca@ncsa.uiuc.edu (Marc Andreessen) writes:

> This isn't Epoch's fault, it's Emacs's.  (Epoch 4.0 is based on a
> later version of GNU Emacs than 3.2.)

yes, true.  however, i consider having the timezone go _behind_ the
year a bug in sendmail.el as it comes with Emacs 18.58 (as well as the
`feature' that always gives you a `Sender:' field whether you want it
or not ... :-{).

this is what i did to our copy of {Emacs | Epoch} ... works fine.


  oe@disco-sol (~) 41 $ diff /usr/gnu/emacs/lisp/sendmail.el \
                             /usr/gnu/emacs/local-lisp/sendmail.el
  20a21,27
  > ;; routine mail-do-fcc() has been hacked to insert the timezone _before_
  > ;; the year instead of at the end of the line, hence allowing to
  > ;; rmail-input() files written from `FCC:' fields.
  > ;; sendmail-send-it() has been fixed not to include a `Sender:' field in
  > ;; every message having a `From:' field only.         26-jun-1992 -- oe.
  > 
  > 
  214,221c221,228
  <           (goto-char (point-min))
  <           (and (re-search-forward "^From:"  delimline t)
  <                (not (save-excursion
  <                       (goto-char (point-min))
  <                       (re-search-forward "^Sender:" delimline t)))
  <                (progn
  <                  (forward-line 1)
  <                  (insert "Sender: " (user-login-name) "\n")))
  ---
  > ;         (goto-char (point-min))
  > ;         (and (re-search-forward "^From:"  delimline t)
  > ;              (not (save-excursion
  > ;                     (goto-char (point-min))
  > ;                     (re-search-forward "^Sender:" delimline t)))
  > ;              (progn
  > ;                (forward-line 1)
  > ;                (insert "Sender: " (user-login-name) "\n")))
  286c293,296
  <             (current-time-string) " " timezone "\n")
  ---
  >             (current-time-string) "\n")
  >       (forward-word -1)
  >       (insert timezone " ")
  >       (goto-char (point-max))


                                                    \relax\bye  -  oe

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; Stephan Oepen, Hanna-Kirchner-Str. 8, 66oo Saarbruecken, (o681) - 63 59 24
;;;      - oe@dfki.uni-sb.de | oe@cs.tu-berlin.de | oe@gnu.ai.mit.edu -
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Technical Details
Message-ID: <OE.92Aug7211623@disco-sol.dfki.uni-sb.de>
Path: arc1-ca.pugleaf.net!sparky!uunet!mcsun!Germany.EU.net!unido!sbsvax!sbsvax.cs.uni-sb.de!oe
References: <9208051740.AA05638@gwydir.cam.sri.com> <9208052300.AA08003@wintermute.ncsa.uiuc.edu>

Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!sparky!uunet!mcsun!Germany.EU.net!unido!sbsvax!sbsvax.cs.uni-sb.de!oe
From: oe@disco-sol.dfki.uni-sb.de (Stephan Oepen)
Newsgroups: gnu.epoch.misc
Subject: bug in sendmail.el in Emacs 18.58 distribution
Message-ID: <OE.92Aug7211623@disco-sol.dfki.uni-sb.de>
Date: 7 Aug 92 19:15:45 GMT
References: <9208051740.AA05638@gwydir.cam.sri.com>
     <9208052300.AA08003@wintermute.ncsa.uiuc.edu>
Sender: news@sbsvax.cs.uni-sb.de
Reply-To: oe@dfki.uni-sb.de
Distribution: gnu
Organization: DFKI Saarbruecken GmbH, D-W 6600 Saarbruecken
Lines: 56
In-reply-to: marca@ncsa.uiuc.edu's message of 5 Aug 92 09:00:19 GMT