nmh-workers
[Top] [All Lists]

Re: suggestion: regress inc -help behavior

1998-07-29 14:30:07
Eric Ding <ericding(_at_)applix(_dot_)com> writes:
the new nmh behavior of inc -help vs. inc -version (or for any other mh
command) is nice, but it breaks mh-e.  Is it possible to include the
version: string back in the output of inc -help so that mh-e will still
be able to find out the MH version it is using?

  I agree.  In the meantime, I've been using the following code to set
  my X-Mailer header field:

(save-window-excursion
  (mh-version)
  (set-buffer mh-temp-buffer)
  (if (not (search-forward-regexp "^version: MH \\(\\S +\\)" nil t))
      (progn                            ;nmh?
        (condition-case err-data
            (mh-exec-cmd-output "inc" nil "-version")
          (file-error (insert (mapconcat 'concat (cdr err-data) ": "))))
        (search-forward-regexp "^inc -- \\(\\S +\\)")))
  (let ((x-mailer-mh (buffer-substring (match-beginning 1) (match-end 1))))
    (setq x-mailer-string
          (format "X-Mailer: MH [Version %s];  mh-e [Emacs version %d.%d]"
                  x-mailer-mh emacs-major-version emacs-minor-version))))
Bill Wohler <wohler(_at_)newt(_dot_)com>
Say it with MIME.  Maintainer of comp.mail.mh and news.software.nn FAQs.
If you're passed on the right, you're in the wrong lane.


<Prev in Thread] Current Thread [Next in Thread>