(mailcap-skip-comment): Check `chr' is nil.

diff --git a/mailcap.el b/mailcap.el
index 266c564..0a3c5e1 100644 (file)
--- 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)))