update.
[elisp/flim.git] / mmgeneric.el
index 532dfd9..d215dc6 100644 (file)
@@ -19,8 +19,8 @@
 
 ;; You should have received a copy of the GNU General Public License
 ;; along with GNU Emacs; see the file COPYING.  If not, write to the
 
 ;; You should have received a copy of the GNU General Public License
 ;; along with GNU Emacs; see the file COPYING.  If not, write to the
-;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
-;; Boston, MA 02111-1307, USA.
+;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
 
 ;;; Code:
 
 
 ;;; Code:
 
@@ -59,7 +59,7 @@
 (luna-define-method mime-entity-fetch-field ((entity mime-entity)
                                             field-name)
   (or (symbolp field-name)
 (luna-define-method mime-entity-fetch-field ((entity mime-entity)
                                             field-name)
   (or (symbolp field-name)
-      (setq field-name (intern (capitalize (capitalize field-name)))))
+      (setq field-name (intern (capitalize field-name))))
   (cdr (assq field-name
             (mime-entity-original-header-internal entity))))
 
   (cdr (assq field-name
             (mime-entity-original-header-internal entity))))