mm-bidy-7-or-8 seems bogus to me [pgnus 0.95]

[Soren Dayton <dayton@overx.com>]

Consider a body that is nothing but nulls.  This body is not
encoded. (see the skip-chars-forward below)  (note that
mm-find-charset-region has a similar test in it)  

It seems to me that it ought to be encoded 

Concretely it means that tar files don't get encoded.  And that people 
on the other side can't read them.  MIME is supposed to fix this
problem. 



Perhaps this should be "\001-\177" or even something like
"\027-\177".  What do people think?

Thanks
Soren




(defun mm-body-7-or-8 ()
  "Say whether the body is 7bit or 8bit."
  (cond
   ((not (featurep 'mule))
    (if (save-excursion
	  (goto-char (point-min))
	  (re-search-forward mm-8bit-char-regexp nil t))
	'8bit
      '7bit))
   (t
    ;; Mule version
    (if (and (null (delq 'ascii
			 (mm-find-charset-region (point-min) (point-max))))
	     ;;!!!The following is necessary because the function
	     ;;!!!above seems to return the wrong result under
	     ;;!!!Emacs 20.3.  Sometimes.
	     (save-excursion
	       (goto-char (point-min))
	       (skip-chars-forward "\0-\177")
	       (eobp)))
	'7bit
      '8bit))))