Mercurial > hg > xemacs-beta

diff lisp/w3/mm.el @ 179:9ad43877534d r20-3b16

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b16
author cvs
date Mon, 13 Aug 2007 09:52:19 +0200
parents 5a88923fcbfe
children
line wrap: on
line diff
--- a/lisp/w3/mm.el	Mon Aug 13 09:51:18 2007 +0200
+++ b/lisp/w3/mm.el	Mon Aug 13 09:52:19 2007 +0200
@@ -1033,7 +1033,7 @@
 (defun mm-extension-to-mime (extn)
   "Return the MIME content type of the file extensions EXTN"
   (if (and (stringp extn)
-	   (not (= (string-to-char extn) ?.)))
+	   (not (eq (string-to-char extn) ?.)))
       (setq extn (concat "." extn)))
   (cdr (assoc (downcase extn) mm-mime-extensions)))