X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=mailcap.el;h=0a3c5e177ab71bef64b9892735ff926be05ca0d4;hb=a9f6affa35f2ad8d48be9d2850feed91fbede445;hp=266c564e6b7bd980261415c80635dff73213eeaa;hpb=2d6c5838a24c491b9e210c9a504e453abbce62dc;p=elisp%2Fsemi.git

diff --git a/mailcap.el b/mailcap.el
index 266c564..0a3c5e1 100644
--- a/mailcap.el
+++ b/mailcap.el
@@ -4,7 +4,7 @@
 
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;; Created: 1997/6/27
-;; Version: $Id: mailcap.el,v 0.1 1997-07-02 16:43:23 morioka Exp $
+;; Version: $Id: mailcap.el,v 0.2 1997-09-05 07:12:46 morioka Exp $
 ;; Keywords: mailcap, setting, configuration, MIME, multimedia
 
 ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
@@ -31,8 +31,9 @@
 
 (defsubst mailcap-skip-comment ()
   (let ((chr (char-after (point))))
-    (when (or (= chr ?\n)
-	      (= chr ?#))
+    (when (and chr
+	       (or (= chr ?\n)
+		   (= chr ?#)))
       (forward-line)
       t)))